summaryrefslogtreecommitdiff
path: root/2d/font.scm
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2014-06-07 19:57:06 -0400
committerDavid Thompson <dthompson2@worcester.edu>2014-06-07 19:57:06 -0400
commitc2a4f0636569978a40cb5c98875d798624909eb2 (patch)
treeca0d993826c0adde719e3a88aec255626281340d /2d/font.scm
parentdef69615603e49bb17b09c7352295578f9dd67af (diff)
Replace vector2 module with a more generic vector module.
* 2d/vector2.scm: Delete it. * 2d/vector.scm: New file. * Makefile.am (SOURCES): s/vector2/vector. * 2d/font.scm: * 2d/keyboard.scm: * 2d/mouse.scm: * 2d/rect.scm: * 2d/shader.scm: * 2d/sprite.scm: * 2d/texture.scm: * 2d/transform.scm: * 2d/window.scm: * examples/2048/2048: * examples/animation.scm: * examples/coroutine.scm: * examples/font.scm: * examples/particles.scm: * examples/simple.scm: * examples/tilemap.scm: Use vectors instead of defunct vector2.
Diffstat (limited to '2d/font.scm')
-rw-r--r--2d/font.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/2d/font.scm b/2d/font.scm
index 3f4674f..909f351 100644
--- a/2d/font.scm
+++ b/2d/font.scm
@@ -34,7 +34,7 @@
#:use-module (2d shader)
#:use-module (2d signal)
#:use-module (2d texture)
- #:use-module (2d vector2)
+ #:use-module (2d vector)
#:use-module (2d window)
#:use-module (2d wrappers gl)
#:export (enable-fonts
@@ -141,7 +141,7 @@ the given position. Optional arguments are COLOR with a default of
white and ANCHOR with a default of 'top-left."
(let* ((texture (render-text font text))
(vertices (and texture (make-label-vertices texture)))
- (anchor (if texture (anchor-texture texture anchor) null-vector2)))
+ (anchor (if texture (anchor-texture texture anchor) #(0 0))))
(%make-label font text position anchor color texture vertices)))
(define (draw-label label)