diff --git a/src/play_clj/core.clj b/src/play_clj/core.clj
index e1c7df0..961c2fe 100644
--- a/src/play_clj/core.clj
+++ b/src/play_clj/core.clj
@@ -68,8 +68,9 @@
                       (when func
                         (let [screen-map (merge @screen options)
                               old-entities @entities]
-                          (some->> (fn []
-                                     (normalize (func screen-map old-entities)))
+                          (some->> (with-meta
+                                     #(normalize (func screen-map old-entities))
+                                     (meta func))
                                    (wrapper screen)
                                    (reset-changed! entities old-entities)))))]
     ; add the input listeners to the screen atom