Rename function for consistency
This commit is contained in:
@@ -142,19 +142,19 @@
|
|||||||
[screen new-width]
|
[screen new-width]
|
||||||
(size! screen new-width (* new-width (/ (game :height) (game :width)))))
|
(size! screen new-width (* new-width (/ (game :height) (game :width)))))
|
||||||
|
|
||||||
(defn move-x!
|
(defn x!
|
||||||
[{:keys [^Camera camera]} x]
|
[{:keys [^Camera camera]} x]
|
||||||
(assert camera)
|
(assert camera)
|
||||||
(when x (set! (. (. camera position) x) x))
|
(when x (set! (. (. camera position) x) x))
|
||||||
(.update camera))
|
(.update camera))
|
||||||
|
|
||||||
(defn move-y!
|
(defn y!
|
||||||
[{:keys [^Camera camera]} y]
|
[{:keys [^Camera camera]} y]
|
||||||
(assert camera)
|
(assert camera)
|
||||||
(when y (set! (. (. camera position) y) y))
|
(when y (set! (. (. camera position) y) y))
|
||||||
(.update camera))
|
(.update camera))
|
||||||
|
|
||||||
(defn move!
|
(defn position!
|
||||||
[screen x y]
|
[screen x y]
|
||||||
(move-x! screen x)
|
(x! screen x)
|
||||||
(move-y! screen y))
|
(y! screen y))
|
||||||
|
|||||||
Reference in New Issue
Block a user