-
This commit is contained in:
@@ -63,7 +63,9 @@
|
||||
(unless (soundlibs-available?)
|
||||
(download-soundlibs))
|
||||
(if (null? libs-to-try)
|
||||
(error (format "Cannot find library, tried ~a" orig-libs))
|
||||
(begin
|
||||
(displayln (format "Warning: Cannot find library, tried ~a" orig-libs))
|
||||
#f)
|
||||
(ffi-lib (car libs-to-try) versions
|
||||
#:get-lib-dirs (λ () (cons (build-lib-path) (get-lib-search-dirs)))
|
||||
#:fail (λ () (get-lib* (cdr libs-to-try) orig-libs versions))
|
||||
|
||||
Reference in New Issue
Block a user