picolisp

commit 89819073007a88c7688c38eb413281d3641a19ea
parent 6afaa8d9002f9c99045df9884432e3d872692e4c
Author: Alexander Burger <abu@software-lab.de>
Date:   Fri, 29 Mar 2013 11:09:26 +0100

Cosmetics
Diffstat:
M
rcsim/lib.l
 | 
4
++--

1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/rcsim/lib.l b/rcsim/lib.l
@@ -1,4 +1,4 @@
-# 20mar13abu
+# 29mar13abu
 # (c) Software Lab. Alexander Burger
 
 # *Pilot *Scene *Model
@@ -39,7 +39,7 @@
                   1.0 0.0 0.0  0.0 1.0 0.0  0.0 0.0 1.0
                   (mapcar
                      '((M)
-                        (if (and (car M) (sym? (car M)))
+                        (if (and (car M) (sym? @))
                            (model Obj M)
                            M ) )
                      Lst ) ) ) ) ) ) )