Show, hide and translate for meshes.

[gacela.git] / src / gacela.scm

diff --git a/src/gacela.scm b/src/gacela.scm
index 06986b8321737198920e44786781e5faeac358ad..70ac867c2b995108b5ed2a188f043d173c6c84dd 100644 (file)
--- a/src/gacela.scm
+++ b/src/gacela.scm
@@ -345,7 +345,7 @@
 (define* (draw-meshes #:optional (meshes (hash-map->list (lambda (k v) v) default-view)))
   (cond ((not (null? meshes))
         (catch #t
-                 (lambda () (glmatrix-block ((car meshes))))
+                 (lambda () ((car meshes) 'draw))
                  (lambda (key . args) #f))
         (draw-meshes (cdr meshes)))))