summaryrefslogtreecommitdiff
path: root/sdl2.scm
diff options
context:
space:
mode:
Diffstat (limited to 'sdl2.scm')
-rw-r--r--sdl2.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/sdl2.scm b/sdl2.scm
index 3541596..04bb49a 100644
--- a/sdl2.scm
+++ b/sdl2.scm
@@ -45,7 +45,7 @@
color-a))
(define %default-init-flags
- '(timer audio video haptic game-controller events))
+ '(timer audio video joystick haptic game-controller events))
(define (sdl-error-string)
"Return the current SDL error string."
@@ -77,6 +77,7 @@ The possible flags are 'timer', 'audio', 'video', 'haptic',
('video ffi:SDL_INIT_VIDEO)
('haptic ffi:SDL_INIT_HAPTIC)
('game-controller ffi:SDL_INIT_GAMECONTROLLER)
+ ('joystick ffi:SDL_INIT_JOYSTICK)
('events ffi:SDL_INIT_EVENTS))
subsystems))))
(unless (zero? (ffi:sdl-init flags))