Fix macros

This commit is contained in:
oakes
2014-01-29 03:28:32 -05:00
parent 0efbe68fb5
commit 21ae11e3d2
4 changed files with 5 additions and 5 deletions

View File

@@ -21,7 +21,7 @@
(color 1 1 1 1)"
[& args]
`~(if (keyword? (first args))
`(Color. ^Color (u/static-field-upper :graphics :Color ~(first args)))
`(Color. ^Color (u/static-upper :graphics :Color ~(first args)))
`(Color. ~@args)))
; interop
@@ -99,7 +99,7 @@
(key-code :a)
(key-code :page-down)"
[k]
`~(u/static-upper "Input$Keys" k))
`(u/static-upper "Input$Keys" ~k))
(defmacro is-pressed?
"Returns a boolean indicating if the key cooresponding to `k` is being pressed

View File

@@ -144,7 +144,7 @@
(play-mode :normal)
(play-mode :reversed)"
[key]
`(u/static-field-upper :graphics :g2d :Animation ~key))
`(u/static-upper :graphics :g2d :Animation ~key))
(defn animation*
"The function version of `animation`"

View File

@@ -45,7 +45,7 @@ based on the file at `path`
(align :center)"
[k]
`(u/static-field-lower :scenes :scene2d :utils :Align ~k))
`(u/static-lower :scenes :scene2d :utils :Align ~k))
(defn cell!
"Calls a single method on a [Cell](https://github.com/libgdx/libgdx/blob/master/gdx/src/com/esotericsoftware/tablelayout/Cell.java)

View File

@@ -100,7 +100,7 @@ pascal case"
(scaling :stretch-x)
(scaling :stretch-y)"
[k]
`(static-field-lower :utils :Scaling ~k))
`(static-lower :utils :Scaling ~k))
; java interop