Merge bundle into internal entities

2014-04-09 18:35:22 -04:00
parent a8a980a569
commit ad73891910
2 changed files with 7 additions and 5 deletions
--- a/src/play_clj/entities.clj
+++ b/src/play_clj/entities.clj
@@ -75,6 +75,6 @@
    (.end object)))

 (defrecord BundleEntity [entities] Entity
-  (draw-entity! [{:keys [entities]} screen batch]
+  (draw-entity! [{:keys [entities] :as entity} screen batch]
    (doseq [e entities]
-      (draw-entity! e screen batch))))
+      (draw-entity! (merge e entity) screen batch))))