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

Use update-fn! instead of swap!

Browse Source
This commit is contained in:
oakes
2014-05-25 16:58:06 -04:00
parent d6f9d6a944
commit 70cea243ca
1 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
src/play_clj/core.clj
View File

@@ -90,8 +90,9 @@
:input-listeners (input-listeners options execute-fn!)
:ui-listeners (ui-listeners options execute-fn!)])
(execute-fn! on-show)
(->> (contact-listener @screen options execute-fn!)
(swap! screen assoc :contact-listener)))
(some->> (contact-listener @screen options execute-fn!)
(vector :contact-listener)
(update-fn! assoc)))
:render (fn [d]
(swap! screen #(assoc % :total-time (+ (:total-time %) d)))
(execute-fn! on-render :delta-time d))