Commit f3ff315e authored by steckerhalter's avatar steckerhalter

fix bug with list

parent 30fea49e
......@@ -61,7 +61,7 @@
((pred listp) (cond
((listp (car arg)) arg)
((string-match "^:" (symbol-name (car arg))) (cons name-symbol arg))
((symbolp (car arg)) arg)
((symbolp (car arg)) args)
((t nil))))
(_ nil))))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment