Fixed bug where script* wasn't evaluating its arguments as promised.

diff --git a/src/compilation-interface.lisp b/src/compilation-interface.lisp
index b271914..6fee0a3 100644 (file)
--- a/src/compilation-interface.lisp
+++ b/src/compilation-interface.lisp
@@ -167,11 +167,10 @@ then it will be named the same as SOURCE-FILE but with js extension."
 (defmacro ps (&body body)
   `(script ,@body))
 
-(defmacro script* (&body body)
+(defun script* (&rest body)
   "Return the javascript string representing BODY.
-
 Body is evaluated."
-  `(compile-script (progn ,@body)))
+  (compile-script `(progn ,@body)))
 
 (defmacro ps* (&body body)
-  `(script* ,@body))
\ No newline at end of file
+  `(script* ,@body))