Refactor and add groups

2014-01-11 22:40:40 -05:00
parent 140a21ea8a
commit 330f2a347d
4 changed files with 64 additions and 35 deletions
--- a/src/play_clj/core_2d.clj
+++ b/src/play_clj/core_2d.clj
@@ -70,9 +70,9 @@
 (defmacro animation
  [duration textures & args]
  `(Animation. ~duration
-               (u/gdx-into-array (map :object ~textures))
-               (u/gdx-static-field :graphics :g2d :Animation
-                                   ~(or (first args) :normal))))
+               (u/convert-array (map :object ~textures))
+               (u/static-field-upper :graphics :g2d :Animation
+                                     ~(or (first args) :normal))))

 (defn animation->texture
  ([{:keys [total-time]} ^Animation animation]