From 71b22c485a866ee26a3cb74c4afca878b66055bb Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson2@worcester.edu>
Date: Tue, 25 Jun 2013 19:48:50 -0400
Subject: Enable unicode characters in SDL.

---
 2d/window.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to '2d')

diff --git a/2d/window.scm b/2d/window.scm
index 5231efc..5675910 100644
--- a/2d/window.scm
+++ b/2d/window.scm
@@ -30,8 +30,10 @@
 (define* (open-window width height #:optional (depth 24))
   "Creates the game window with the specified dimensions and
 initializes OpenGL state."
-  ;; Open SDL window in OpenGL mode.
   (SDL:init '(SDL_INIT_VIDEO))
+  ;; Enable unicode key events
+  (SDL:enable-unicode #t)
+  ;; Open SDL window in OpenGL mode.
   (SDL:set-video-mode width height 24 '(SDL_OPENGL))
   ;; Initialize OpenGL orthographic view
   (gl-viewport 0 0 width height)
-- 
cgit v1.2.3