summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2021-10-24 12:51:32 -0400
committerDavid Thompson <dthompson2@worcester.edu>2021-10-24 12:51:32 -0400
commitb53203045e2960af1920eeebfb6f022047613914 (patch)
tree8866f09554a45745ace33b2d01d9aaf81b58e71d
parent380986f85d1d57b7a2d231aad29c876b9835ee78 (diff)
audio: Don't crash if there is no sound system to update.
-rw-r--r--chickadee/audio.scm4
1 files changed, 3 insertions, 1 deletions
diff --git a/chickadee/audio.scm b/chickadee/audio.scm
index b340f06..7b5b0f3 100644
--- a/chickadee/audio.scm
+++ b/chickadee/audio.scm
@@ -308,7 +308,9 @@
(define (update-audio)
"Update audio system."
- (update-sound-system (current-sound-system)))
+ (let ((sound-system (current-sound-system)))
+ (when sound-system
+ (update-sound-system sound-system))))
(define* (make-source #:key
audio