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

ending progress

Browse Source
This commit is contained in:
Bryce Covert
2015-11-13 21:43:23 -08:00
parent 3260b1cca5
commit 756be88a81
5 changed files with 103 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
desktop/src-common/advent/actions.clj
View File

@@ -235,7 +235,7 @@
(skip-type [this screen entities]
:none))))
(defn play-animation [entities target-id anim & {:keys [stop? continue?]}]
(defn play-animation [entities target-id anim & {:keys [stop? continue? next]}]
(run-action entities
(begin [this screen entities]
(update-in entities [:room :entities target-id] #(start-animation screen % anim) ))
@@ -252,7 +252,7 @@
entities
(if (or (nil? stop?) stop?)
(stop screen entities target-id)
(assoc-in entities [:room :entities target-id :anim] nil))))
(assoc-in entities [:room :entities target-id :anim] next))))
(skip-type [this screen entities]
:none)))