unnecessary function.
This commit is contained in:
@@ -61,13 +61,6 @@
|
|||||||
entities))
|
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]
|
(defn left-click [screen entities]
|
||||||
(let [{:keys [x y]} (input->screen screen {:x (:input-x screen) :y (:input-y screen)})
|
(let [{:keys [x y]} (input->screen screen {:x (:input-x screen) :y (:input-y screen)})
|
||||||
interaction (first (filter #(mouse-in? % [x y])
|
interaction (first (filter #(mouse-in? % [x y])
|
||||||
|
|||||||
Reference in New Issue
Block a user