Get function directly from screen object

2014-09-01 11:16:36 -04:00
parent 27786d6b2a
commit b7c33a563b
1 changed files with 1 additions and 1 deletions
--- a/src/play_clj/core.clj
+++ b/src/play_clj/core.clj
@@ -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-change-color :color :blue)"
  [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))]
    (apply execute-fn! screen-fn options)
    nil))