From 94240558cdbef1f722a4078b4bf8ded5baeda09d Mon Sep 17 00:00:00 2001 From: Bryce Covert Date: Mon, 17 Oct 2016 08:29:28 -0700 Subject: [PATCH] slightly better positioning. --- desktop/src-common/advent/screens/scene.clj | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/desktop/src-common/advent/screens/scene.clj b/desktop/src-common/advent/screens/scene.clj index 4df44adb..68fd4dd7 100644 --- a/desktop/src-common/advent/screens/scene.clj +++ b/desktop/src-common/advent/screens/scene.clj @@ -1351,7 +1351,7 @@ void main () utils/mobile? (update-in [:label] (fn [l] (let [[x y] (utils/unproject screen options [(.getScreenX (:viewport screen)) (.getScreenHeight (:viewport screen))])] - (assoc l :x (+ 25 x) :y y)))) + (assoc l :x (unchecked-add 25 x) :y (unchecked-add 3 y))))) (not utils/mobile?) (update-in [:label] ensure-on-screen)) @@ -1363,7 +1363,7 @@ void main () (assoc (texture (aget all-items 0 (.indexOf utils/+all-cursors+ (or (:cursor (first (:last (:cursor entities)))) (first (:last (:cursor entities))))))) - :x x :y y + :x x :y (unchecked-add 1 y) :baseline 9000) (catch Exception e nil) )))))