From 99a69f5d47c0a53e608d9497ce3c6fd3ae9eff7f Mon Sep 17 00:00:00 2001
From: oakes <zsoakes@gmail.com>
Date: Thu, 6 Feb 2014 20:42:06 -0500
Subject: [PATCH] Make the entities list a vector

---
 src/play_clj/core.clj | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/play_clj/core.clj b/src/play_clj/core.clj
index 1cbe465..ecdce96 100644
--- a/src/play_clj/core.clj
+++ b/src/play_clj/core.clj
@@ -39,7 +39,7 @@
   [{:keys [on-show on-render on-hide on-pause on-resize on-resume]
     :as options}]
   (let [screen (atom {})
-        entities (atom '())
+        entities (atom [])
         execute-fn! (fn [func & {:keys [] :as options}]
                       (when func
                         (let [old-entities @entities]
@@ -47,6 +47,7 @@
                                    list
                                    flatten
                                    (remove nil?)
+                                   vec
                                    (reset-changed! entities old-entities)))))]
     ; update screen when either the screen or entities are changed
     (add-watch screen :changed (fn [_ _ _ new-screen]