1 files changed, 1 insertions(+), 3 deletions(-)
M fairy.lisp
M fairy.lisp => fairy.lisp +1 -3
@@ 160,9 160,7 @@
(defmethod update ((el layer) dt)
(when (sort-with el)
- (sort (children el)
- (sort-with el)
- :key #'cdr))
+ (setf (children el) (sort (children el) (sort-with el) :key #'cdr)))
(dolist (e (children el))
(update (cdr e) dt))