1 files changed, 1 insertions(+), 1 deletions(-)

M fairy.lisp

@@ 105,7 105,7 @@
         (draw (cdr e)))))
 
 (defmethod add-child ((el layer) child &key with-key)
-  (setf (children el) (cons (cons with-key child) (children el))))
+  (setf (children el) (append (children el) (list (cons with-key child)))))
 
 (defmethod get-child ((el layer) key &key test)
   (if test