notid/play-clj
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Break skin initialization into separate function

Browse Source
This commit is contained in:
oakes
2014-09-24 12:18:56 -04:00
parent c6baf326ff
commit 5f5e1e6e8b
1 changed files with 8 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
src/play_clj/ui.clj
View File

@@ -35,17 +35,20 @@
(str (u/key->pascal k) "Style.")) (str (u/key->pascal k) "Style."))
~@options)) ~@options))
(defn skin*
[path]
(or (u/load-asset path Skin)
(Skin. (if (string? path)
(.internal ^Files (Gdx/files) path)
path))))
(defmacro skin (defmacro skin
"Returns a [Skin](http://libgdx.badlogicgames.com/nightlies/docs/api/com/badlogic/gdx/scenes/scene2d/ui/Skin.html) "Returns a [Skin](http://libgdx.badlogicgames.com/nightlies/docs/api/com/badlogic/gdx/scenes/scene2d/ui/Skin.html)
based on the file at `path`. based on the file at `path`.
(skin \"uiskin.json\")" (skin \"uiskin.json\")"
[path & options] [path & options]
`(u/calls! ^Skin (or (u/load-asset ~path Skin) `(u/calls! ^Skin (skin* ~path) ~@options))
(Skin. (if (string? ~path)
(.internal ^Files (Gdx/files) ~path)
~path)))
~@options))
(defmacro skin! (defmacro skin!
"Calls a single method on a `skin`." "Calls a single method on a `skin`."