fix "collects" path setup in 3m build
This commit is contained in:
parent
da3ac6159d
commit
30a1c3565d
|
@ -15,11 +15,12 @@
|
||||||
(use-compiled-file-paths null)
|
(use-compiled-file-paths null)
|
||||||
|
|
||||||
(unless (with-handlers ([exn:fail:filesystem? (lambda (x) #f)])
|
(unless (with-handlers ([exn:fail:filesystem? (lambda (x) #f)])
|
||||||
(collection-path "mzlib"))
|
(collection-path "racket"))
|
||||||
(let ([p (build-path (current-load-relative-directory)
|
(let ([p (build-path (current-load-relative-directory)
|
||||||
'up
|
'up
|
||||||
'up
|
'up
|
||||||
'up
|
'up
|
||||||
|
"lib"
|
||||||
"collects")])
|
"collects")])
|
||||||
(printf "Setting collection path: ~s\n" p)
|
(printf "Setting collection path: ~s\n" p)
|
||||||
(current-library-collection-paths
|
(current-library-collection-paths
|
||||||
|
|
Loading…
Reference in New Issue
Block a user