From: jsancho Date: Tue, 20 Sep 2011 20:37:38 +0000 (+0000) Subject: (no commit message) X-Git-Url: https://git.jsancho.org/?a=commitdiff_plain;h=1f09eadc325f54c80278ea6beb625566954ab9b8;p=gacela.git --- diff --git a/src/gacela_mobs.scm b/src/gacela_mobs.scm index 313848c..f9594cf 100755 --- a/src/gacela_mobs.scm +++ b/src/gacela_mobs.scm @@ -94,7 +94,7 @@ ((get-type) ,type-symbol) (else - (display ,(cons 'list (map (lambda (x) `(acons ',(car x) ,(car x) '())) publish))) + (display ,(cons 'list (map (lambda (x) `(cons ',(car x) ,(car x))) publish))) (newline) (catch #t (lambda () ,@body)