scgame - display-msg

2012-01-18 19:35:06 +09:00
parent ca8cbcba4c
commit 152a3543f2
1 changed files with 2 additions and 2 deletions
@@ -45,9 +45,9 @@
 ;; debugging vars

 (load "config.scm")
-(define (display-msg msg)
+(define (display-msg . msg)
  (if SCGAMEDEBUG
-      (for-each display (list (aspectmsg) " " msg))
+      (for-each display (append (list (aspectmsg) " ") msg))
      (newline)))

 ;; override for scx-0.2