From: Javier Sancho <jsf@jsancho.org>
Date: Tue, 15 May 2012 19:01:44 +0000 (+0200)
Subject: Now mobs use let*
X-Git-Url: https://git.jsancho.org/?a=commitdiff_plain;h=f14c83835a29a6d94daf3b0dcfe88f59d8844e34;p=gacela.git

Now mobs use let*
---

diff --git a/src/gacela.scm b/src/gacela.scm
index f3e69e2..d941351 100644
--- a/src/gacela.scm
+++ b/src/gacela.scm
@@ -341,7 +341,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))))