diff --git a/desktop/last-release b/desktop/last-release index d6b24041..209e3ef4 100644 --- a/desktop/last-release +++ b/desktop/last-release @@ -1 +1 @@ -19 +20 diff --git a/desktop/src-common/advent/screens/scene.clj b/desktop/src-common/advent/screens/scene.clj index 203dc8a7..607735b5 100644 --- a/desktop/src-common/advent/screens/scene.clj +++ b/desktop/src-common/advent/screens/scene.clj @@ -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)))