Force entities list to be a vector, and rename function

2013-12-31 13:33:13 -05:00
parent 8d01b4da17
commit 39e80a1be3
2 changed files with 5 additions and 2 deletions
--- a/common/src/play_clj/core.clj
+++ b/common/src/play_clj/core.clj
@@ -36,6 +36,7 @@
                    :total-time 0
                    :delta-time 0)
             on-show
+             vec
             (reset! entities)))
      (render [delta-time]
        (let [total-time (+ (:total-time @screen) delta-time)
@@ -43,6 +44,8 @@
                                :total-time total-time
                                :delta-time delta-time)]
          (->> (on-render screen-map @entities)
+               (remove nil?)
+               vec
               (reset! entities)
               (draw! screen-map))))
      (hide [] (on-hide @screen))