         :right (move-entity! :player move-speed 0)
         :up (move-entity! :player 0 (- move-speed))
         :down (move-entity! :player 0 move-speed)
+        :activate (try-activate!)
         nil))))
 
 (defn outside-bounds?

  (doseq [entity (sort-by z-order
                          (:entities @game-state))]
    (println entity)))

(defn keyboard-handler
  [event]

(def image-assets
  {:owl "owl.png"
   :cage "cage.png"})

(defn default-components
  [entity idx]
