summaryrefslogtreecommitdiff
path: root/examples/nine-patch.scm
diff options
context:
space:
mode:
Diffstat (limited to 'examples/nine-patch.scm')
-rw-r--r--examples/nine-patch.scm6
1 files changed, 2 insertions, 4 deletions
diff --git a/examples/nine-patch.scm b/examples/nine-patch.scm
index 7e0db1a..d20ba06 100644
--- a/examples/nine-patch.scm
+++ b/examples/nine-patch.scm
@@ -7,14 +7,12 @@
(chickadee sdl))
(define image #f)
-(define font #f)
(define (load)
- (set! image (load-image "images/dialog-box.png"))
- (set! font (load-font "fonts/good_neighbors_starling.xml")))
+ (set! image (load-image "images/dialog-box.png")))
(define (draw alpha)
(draw-nine-patch image (make-rect 192.0 192.0 256.0 96.0) #:margin 6)
- (draw-text font "I am error." #v(200.0 266.0)))
+ (draw-text "I am error." #v(200.0 266.0)))
(run-game/sdl #:load load #:draw draw)