summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson@member.fsf.org>2013-08-17 23:52:51 -0400
committerDavid Thompson <dthompson@member.fsf.org>2013-08-17 23:52:51 -0400
commit688af31061f35e6f6085f5dacf59eb05dab851f6 (patch)
treeb5bc36c828ee7272d1e68326f4007c2a047a67e2
parente5f352a7e47741e06bd96120d1bd1f8c1f83589a (diff)
Use color module in font module.
-rw-r--r--2d/font.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/2d/font.scm b/2d/font.scm
index f65e08a..80e90da 100644
--- a/2d/font.scm
+++ b/2d/font.scm
@@ -26,6 +26,7 @@
#:use-module (srfi srfi-9)
#:use-module (system foreign)
#:use-module (2d wrappers ftgl)
+ #:use-module (2d color)
#:export (<font>
make-font
font?
@@ -48,7 +49,7 @@
(make-font ftgl-font size)))
(define (render-font font text color alignment)
- (gl-color 1 1 1)
+ (apply-color color)
(ftgl-render-font (font-ftgl-font font)
text
(ftgl-render-mode all)))