summaryrefslogtreecommitdiff
path: root/2d/font.scm
diff options
context:
space:
mode:
Diffstat (limited to '2d/font.scm')
-rw-r--r--2d/font.scm7
1 files changed, 6 insertions, 1 deletions
diff --git a/2d/font.scm b/2d/font.scm
index 688f9e9..1e5f6ef 100644
--- a/2d/font.scm
+++ b/2d/font.scm
@@ -27,6 +27,7 @@
#:use-module (system foreign)
#:use-module (2d wrappers ftgl)
#:use-module (2d color)
+ #:use-module (2d config)
#:use-module (2d vector2))
;;;
@@ -63,12 +64,16 @@ upper-left corner rather than the bottom-left."
text
(ftgl-render-mode all))))
+(define default-font
+ (load-font (string-append %pkgdatadir "/fonts/DejaVuSans.ttf") 12))
+
(export <font>
make-font
font?
font-size
load-font
- draw-font)
+ draw-font
+ default-font)
;;;
;;; Textbox