diff options
| -rw-r--r-- | chickadee.scm | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/chickadee.scm b/chickadee.scm index 0b46237..7adb4b5 100644 --- a/chickadee.scm +++ b/chickadee.scm @@ -92,13 +92,6 @@ (define (remove-controller joystick-id) (hashv-remove! *controllers* joystick-id)) -(define (open-all-controllers) - (let loop ((i 0)) - (when (< i (num-joysticks)) - (when (sdl2:game-controller-index? i) - (add-controller i)) - (loop (+ i 1))))) - (define (controller-button-pressed? controller button) "Return #t if BUTTON is currently being pressed on CONTROLLER." (sdl2:game-controller-button-pressed? controller button)) @@ -145,7 +138,6 @@ not being pushed at all." (false-if-exception (mixer-init)) (open-audio) (start-text-input) - (open-all-controllers) (let* ((window (make-window #:opengl? #t #:title window-title #:size (list window-width window-height) |