Don't set default x and y values, and change some key names

2014-01-19 17:00:07 -05:00
parent ebdb097462
commit f582f18392
3 changed files with 6 additions and 7 deletions
--- a/src/play_clj/core_graphics.clj
+++ b/src/play_clj/core_graphics.clj
@@ -159,7 +159,8 @@
  (.draw object batch 1))

 (defmethod draw-entity! :texture
-  [^SpriteBatch batch {:keys [^TextureRegion object x y width height]}]
+  [^SpriteBatch batch {:keys [^TextureRegion object x y width height]
+                       :or {x 0 y 0}}]
  (assert object)
  (.draw batch object (float x) (float y) (float width) (float height)))