unnecessary function.

This commit is contained in:
=
2014-09-10 16:31:56 -07:00
parent 78e12296de
commit 8cb523468a

View File

@@ -61,13 +61,6 @@
entities))
(defn walk-override-click [screen entities [x y]]
(let [target-location (->> (get-in entities [:background :mouse-overrides])
(filter #((:mouse-in? %) x y))
first
:go-to)]
))
(defn left-click [screen entities]
(let [{:keys [x y]} (input->screen screen {:x (:input-x screen) :y (:input-y screen)})
interaction (first (filter #(mouse-in? % [x y])