Use dummy function in defgame as well

This commit is contained in:
oakes
2014-01-01 03:54:23 -05:00
parent bd36cff1e3
commit 89f8e3463b

View File

@@ -51,9 +51,10 @@
`(defonce ~name (defscreen* ~options))) `(defonce ~name (defscreen* ~options)))
(defn defgame* (defn defgame*
[{:keys [on-create]}] [{:keys [on-create]
:or {on-create dummy}}]
(proxy [Game] [] (proxy [Game] []
(create [] (when on-create (on-create this))))) (create [] (on-create this))))
(defmacro defgame (defmacro defgame
[name & {:keys [] :as options}] [name & {:keys [] :as options}]