several nice tweaks.
This commit is contained in:
@@ -101,12 +101,14 @@
|
||||
(utils/save @~entities "autosave" "Autosave"))))))))
|
||||
|
||||
(defn force-end [entities current-action key]
|
||||
(do (put! (get-channel current-action) :end)
|
||||
(do (when current-action
|
||||
(put! (get-channel current-action) :end))
|
||||
(screen! dialogue/talking-screen :stop-talk :id key)
|
||||
(-> entities
|
||||
(assoc-in [key :script-running?] false)
|
||||
(assoc-in [key :current] nil)
|
||||
(assoc-in [key :started?] false))))
|
||||
(assoc-in [key :started?] false)
|
||||
(assoc-in [key :channel] (chan)))))
|
||||
|
||||
(defmacro get-unsaved-script [entities & forms]
|
||||
`(fn [starting-entities#]
|
||||
|
||||
Reference in New Issue
Block a user