diff --git a/src/play_clj/core.clj b/src/play_clj/core.clj
index bf9dd34..056a92f 100644
--- a/src/play_clj/core.clj
+++ b/src/play_clj/core.clj
@@ -43,8 +43,8 @@
     (compare-and-set! e-atom e-old e-new)))
 
 (defn ^:private wrapper
-  [screen f]
-  (f))
+  [screen screen-fn]
+  (screen-fn))
 
 (defn defscreen*
   [{:keys [screen entities