From 80d17783f24d61becdb07b41089c60ff9bc11104 Mon Sep 17 00:00:00 2001 From: oakes Date: Mon, 13 Jan 2014 16:47:10 -0500 Subject: [PATCH] Rename function for consistency --- src/play_clj/core_render.clj | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/src/play_clj/core_render.clj b/src/play_clj/core_render.clj index 1836530..e92fa0f 100644 --- a/src/play_clj/core_render.clj +++ b/src/play_clj/core_render.clj @@ -142,19 +142,19 @@ [screen new-width] (size! screen new-width (* new-width (/ (game :height) (game :width))))) -(defn move-x! +(defn x! [{:keys [^Camera camera]} x] (assert camera) (when x (set! (. (. camera position) x) x)) (.update camera)) -(defn move-y! +(defn y! [{:keys [^Camera camera]} y] (assert camera) (when y (set! (. (. camera position) y) y)) (.update camera)) -(defn move! +(defn position! [screen x y] - (move-x! screen x) - (move-y! screen y)) + (x! screen x) + (y! screen y))