Fixed bug in create-node for single-argument call

This commit is contained in:
Mattias Holmqvist 2011-04-29 10:34:34 +02:00
parent c499990366
commit 4deb91b877
1 changed files with 1 additions and 2 deletions

View File

@ -155,8 +155,7 @@
TODO: Examples TODO: Examples
" "
([group compute] ([group compute]
(create-nodes group 1 (default-template compute))) (create-node group compute (default-template compute)))
([group compute template] ([group compute template]
(first (create-nodes group 1 template compute)))) (first (create-nodes group 1 template compute))))