reset cursor on reactivate.
This commit is contained in:
@@ -1 +1 @@
|
||||
19
|
||||
20
|
||||
|
||||
@@ -1159,7 +1159,10 @@ void main ()
|
||||
(apply-state screen entities)
|
||||
entities)))))
|
||||
|
||||
:on-resume (fn [screen [entities]]
|
||||
:on-resume (fn [screen [{{:keys [current override last active was-active]} :cursor :as entities}]]
|
||||
(let [current (or override current)
|
||||
image-path (if active "cursor_light.png" "cursor.png")]
|
||||
(input! :set-cursor-image (utils/cursor image-path (or (:cursor current) current)) 0 0))
|
||||
(doseq [[k [start time fn]] (get-in entities [:room :timers])]
|
||||
(add-timer! screen k start time)))
|
||||
|
||||
@@ -1301,6 +1304,7 @@ void main ()
|
||||
(assoc-in entities [:state :active?] false))
|
||||
|
||||
:on-reactivate (fn [screen [entities]]
|
||||
|
||||
(-> entities
|
||||
(assoc-in [:state :active?] true)
|
||||
(assoc-in [:cursor :override] nil)))
|
||||
|
||||
Reference in New Issue
Block a user