Limit to re-exports (a game must load all modules it needs).

[gacela.git] / src / gacela.scm

diff --git a/src/gacela.scm b/src/gacela.scm
index f3e69e2756b5b6c0d087fe60085ed04f2139d66c..9be50b087b342f8d694503c05fc8fcf804d6d658 100644 (file)
--- a/src/gacela.scm
+++ b/src/gacela.scm
@@ -52,29 +52,8 @@
                   define-mob
                   lambda-mob
                   define-checking-mobs)
-  #:re-export (get-current-color
-              get-texture-properties
-              set-current-color
-              with-color
-              progn-textures
-              draw
-              draw-texture
-              draw-line
-              draw-quad
-              draw-rectangle
-              draw-square
-              draw-cube
-              translate
-              rotate
-              to-origin
-              add-light
-              set-camera
-              camera-look
-              render-text
+  #:re-export (translate
               get-frame-time
-              key?
-              key-pressed?
-              key-released?
               3d-mode?))
 
 
@@ -341,7 +320,7 @@
                 (else
                  (set! ,mob-id-z-index (+ ,mob-id-z-index z))
                  (translate-mob x y))))
-        (let ,attr
+        (let* ,attr
           ,@(map
              (lambda (a)
                `(let ((val (assoc-ref ,data-symbol ',(car a))))