diff options
| -rw-r--r-- | sly/audio.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/sly/audio.scm b/sly/audio.scm index 5a437a9..bac3ab0 100644 --- a/sly/audio.scm +++ b/sly/audio.scm @@ -64,10 +64,10 @@ sample? (audio sample-audio)) -(define (load-sample filename) - "Load audio sample from FILENAME or return #f if the file cannot be +(define (load-sample file) + "Load audio sample from FILE or return #f if the file cannot be loaded" - (let ((audio (sdl2:load-chunk filename))) + (let ((audio (sdl2:load-chunk file))) (if audio (make-sample audio) #f))) (define (set-sample-volume volume) |