Scale support variations over time

diff --git a/gacela/image.scm b/gacela/image.scm
index 6acff1dbe0e0d5717f7ae040f6d0de54e4d244f0..236ac744fd420e83bf770e606346c46c02cf0d3a 100644 (file)
--- a/gacela/image.scm
+++ b/gacela/image.scm
@@ -75,7 +75,9 @@
   (make-scene
    "scale"
    (lambda ()
-     (gl-scale x y z)
+     (gl-scale (calculate x)
+               (calculate y)
+               (calculate z))
      (display-scene scene))))
 
 (define (over . scenes)