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

Get function directly from screen object

Browse Source
This commit is contained in:
oakes
2014-09-01 11:16:36 -04:00
parent 27786d6b2a
commit b7c33a563b
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/play_clj/core.clj
View File

@@ -553,7 +553,7 @@ of key-value pairs, which will be given to the function via its screen map.
(run! my-other-screen :on-show) (run! my-other-screen :on-show)
(run! my-other-screen :on-change-color :color :blue)" (run! my-other-screen :on-change-color :color :blue)"
[screen-object fn-name & options] [screen-object fn-name & options]
(let [execute-fn! (-> screen-object :screen deref :execute-fn!) (let [execute-fn! (:execute-fn! screen-object)
screen-fn (-> screen-object :options (get fn-name))] screen-fn (-> screen-object :options (get fn-name))]
(apply execute-fn! screen-fn options) (apply execute-fn! screen-fn options)
nil)) nil))