summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--sly/render/texture.scm12
1 files changed, 6 insertions, 6 deletions
diff --git a/sly/render/texture.scm b/sly/render/texture.scm
index b2b747e..a42bb05 100644
--- a/sly/render/texture.scm
+++ b/sly/render/texture.scm
@@ -178,17 +178,17 @@ vector to be returned."
(vector2 (/ w 2)
(/ h 2)))
('top-left
- (vector2 0 0))
+ (vector2 0 h))
('top-right
- (vector2 w 0))
+ (vector2 w h))
('bottom-left
- (vector2 0 h))
+ (vector2 0 0))
('bottom-right
- (vector2 w h))
+ (vector2 w 0))
('top-center
- (vector2 (/ w 2) 0))
- ('bottom-center
(vector2 (/ w 2) h))
+ ('bottom-center
+ (vector2 (/ w 2) 0))
(_ (error "Invalid anchor type: " anchor)))))
;;;