notid/gitea-docker
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

implemented feedback.

Browse Source
This commit is contained in:
Bryce Covert
2015-12-08 08:57:31 -08:00
parent a7cb87cf8d
commit 3163b8181c
2 changed files with 8 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
desktop/src-common/advent/screens/safe.clj
View File

@@ -21,6 +21,7 @@
(defn close [entities] (defn close [entities]
(screen! @(resolve 'advent.screens.scene/scene) :on-reactivate) (screen! @(resolve 'advent.screens.scene/scene) :on-reactivate)
(screen! @(resolve 'advent.screens.scene/scene) :on-end-safe)
(-> entities (-> entities
(assoc :shown? false) (assoc :shown? false)
(assoc :start-showing? false))) (assoc :start-showing? false)))

7
desktop/src-common/advent/screens/scene.clj
View File

@@ -1309,6 +1309,13 @@ void main ()
(assoc-in [:state :active?] true) (assoc-in [:state :active?] true)
(assoc-in [:cursor :override] nil))) (assoc-in [:cursor :override] nil)))
:on-end-safe (fn [screen [entities]]
((actions/get-script entities
(actions/play-animation entities :ego :end-squat)) entities)
(-> entities
(assoc-in [:state :active?] true)
(assoc-in [:cursor :override] nil)))
:on-chose-item (fn [{:keys [item]} [entities]] :on-chose-item (fn [{:keys [item]} [entities]]
(assoc-in entities [:cursor :current] item)) (assoc-in entities [:cursor :current] item))