fixed issue with pinching.
This commit is contained in:
@@ -1450,10 +1450,11 @@
|
||||
:on-touch-up (fn [screen entities options]
|
||||
(let [currently-pressed (dec (get-in entities [:cursor :counter] 1))
|
||||
max-pressed (get-in entities [:cursor :max-counter] 1)]
|
||||
(println "touched up" currently-pressed max-pressed)
|
||||
(println "touched up" currently-pressed max-pressed (get-in entities [:state :hud-active?]) (get-in entities [:state :active?]) (get-in entities [:cam :pinching]))
|
||||
(cond
|
||||
(and (<= currently-pressed 0)
|
||||
(<= max-pressed 1))
|
||||
(<= max-pressed 1)
|
||||
(not (get-in entities [:cam :pinching])))
|
||||
(handle-touch-up screen
|
||||
(-> entities
|
||||
(assoc-in [:cursor :counter] 0)
|
||||
|
||||
Reference in New Issue
Block a user