Pass screen directly to wrapper function

This commit is contained in:
oakes
2014-03-23 20:19:03 -04:00
parent b385454313
commit fe3735fea8

View File

@@ -126,7 +126,7 @@ object"
run-fn! (fn [k & args] run-fn! (fn [k & args]
(doseq [screen screens] (doseq [screen screens]
(if wrap (if wrap
(wrap (get screen k) args) (wrap screen k args)
(apply (get screen k) args))))] (apply (get screen k) args))))]
(.setScreen game (reify Screen (.setScreen game (reify Screen
(show [this] (add-inputs!) (run-fn! :show)) (show [this] (add-inputs!) (run-fn! :show))