diff options
-rw-r--r-- | ice-9/slib.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/ice-9/slib.scm b/ice-9/slib.scm index 1ef5c5a87..9b4916df4 100644 --- a/ice-9/slib.scm +++ b/ice-9/slib.scm @@ -113,13 +113,14 @@ (set-current-module slib-module) (let* ((errinfo (catch 'system-error (lambda () - (basic-load name) + (primitive-load-path name) #f) (lambda args args))) (errinfo (and errinfo (catch 'system-error (lambda () - (basic-load (string-append name ".scm")) + (primitive-load-path + (string-append name ".scm")) #f) (lambda args args))))) (if errinfo |