normalize loadpath

First GERBIL_LOADPATH, then GERBIL_PATH, and then home
mighty-gerbils · Oct 15, 2023 · b92129c · b92129c
1 parent 5d24c1d
commit b92129c
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/src/gerbil/runtime/init.ss b/src/gerbil/runtime/init.ss
@@ -254,9 +254,9 @@ namespace: #f
             (path-expand "lib" (gerbil-path)))
            (loadpath
             (if (getenv "GERBIL_BUILD_PREFIX" #f)
-              loadpath
-              (cons userpath loadpath))))
-      (current-module-library-path (cons libdir loadpath)))
+              (cons loadpath libdir)
+              (cons* loadpath userpath libdir))))
+      (current-module-library-path loadpath))
 
     ;; initialize the modue registry
     (let* ((registry-entry (lambda (m) (cons m 'builtin)))