run triangulation

jsk-ros-pkg/jsk_model_tools#208 (comment)
euslisp · Jun 11, 2020 · 177b7e4 · 177b7e4
1 parent ee49b6a
commit 177b7e4
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/irteus/irtstl.l b/irteus/irtstl.l
@@ -213,7 +213,7 @@
 (defun eus2stl (fname _faceset &key (scale 0.001))
   (send _faceset :worldpos)
   (with-open-file (f fname :direction :output)
-    (let ((faces (send _faceset :faces)))
+    (let ((faces (send (body-to-faces _faceset) :faces)))
       (write-stl-header f (length faces))
       (dolist (_face faces)
         (write-stl-face f _face :scale scale))))