diff --git a/src/std/build-script.ss b/src/std/build-script.ss index 63fa619af..5334bf1bf 100644 --- a/src/std/build-script.ss +++ b/src/std/build-script.ss @@ -46,9 +46,11 @@ (["spec"] (pretty-print build-spec)) (["deps"] - (cons-load-path @srcdir) - (let (build-deps (make-depgraph/spec @build-spec)) - (call-with-output-file "build-deps" (cut write build-deps <>)))) + (with-cons-load-path + (lambda () + (let (build-deps (make-depgraph/spec @build-spec)) + (call-with-output-file "build-deps" (cut write build-deps <>)))) + @srcdir)) (["compile"] (let (depgraph (call-with-input-file "build-deps" read)) (make srcdir: @srcdir