Set a texture entity's x and y when it is first created

src/play_clj/core_graphics.clj

@@ -159,8 +159,7 @@
   (.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)))
 

src/play_clj/utils.clj

@@ -140,6 +140,8 @@
   [^TextureRegion obj]
   {:type :texture
    :object obj
+   :x 0
+   :y 0
    :width (.getRegionWidth obj)
    :height (.getRegionHeight obj)})