Allow nested bundles

This commit is contained in:
oakes
2014-05-24 16:21:12 -04:00
parent cf7fb7911f
commit 2a7607463a

View File

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