making cat toys.

This commit is contained in:
2014-10-30 18:18:36 -07:00
parent 825912e2c3
commit 51ae5e3a09
6 changed files with 26 additions and 11 deletions

View File

@@ -9,7 +9,7 @@
(if (= :main cursor)
(:script spec)
(when-let [scripts (:scripts spec)]
(scripts cursor))))}))
(scripts (:value cursor)))))}))
entities (into {} (for [[id entity] entities]
[id (merge entity
{:mouse-in? (fn [entities x y]
@@ -22,7 +22,7 @@
(if (= :main cursor)
(:script entity)
(when-let [scripts (:scripts entity)]
(scripts cursor))))}))]))]
(scripts (:value cursor)))))}))]))]
(merge params {:collision (advent.pathfind/map-from-resource collision)
:interactions interactions-as-list
:entities entities})))