From f8c091946f5c344dc3fcb59c62c1af4b75e73d59 Mon Sep 17 00:00:00 2001 From: Hans Dijkema Date: Mon, 11 May 2026 12:04:41 +0200 Subject: [PATCH] only downloads for windows are needed --- private/downloader.rkt | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/private/downloader.rkt b/private/downloader.rkt index 855f867..325aef6 100644 --- a/private/downloader.rkt +++ b/private/downloader.rkt @@ -9,6 +9,7 @@ racket/system racket/string file/unzip + define-return ) (provide download-soundlibs @@ -91,7 +92,9 @@ ;; Provided functions ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -(define (soundlibs-available?) +(define/return (soundlibs-available?) + (unless (eq? (system-type 'os) 'windows) ; We only need to download libraries for windows. + (return #t)) (if (file-exists? version-file) (with-handlers ([exn:fail? (λ (e) #f)]) (let ((v (file->value version-file)))