~ruther/guix-local: gexp: Use a relative file name.

a9601e23528c6018a3a6d4ad44b7d119df67ab6b — Ludovic Courtès 9 years ago de7e0e8

gexp: Use a relative file name.

This is a followup to cbbbb7be0fbaa11ff75bce92f2d82131ff8db104.

* guix/gexp.scm (%utils-module): Use a file name relative to this file
instead of using 'search-path'.

patch browse .tar.gz

1 files changed, 4 insertions(+), 2 deletions(-)

M guix/gexp.scm

M guix/gexp.scm => guix/gexp.scm +4 -2

@@ 856,8 856,10 @@ and in the current monad setting (system type, etc.)"
 
 (define %utils-module
   ;; This file provides 'mkdir-p', needed to implement 'imported-files' and
-  ;; other primitives below.
-  (local-file (search-path %load-path "guix/build/utils.scm")
+  ;; other primitives below.  Note: We give the file name relative to this
+  ;; file you are currently reading; 'search-path' could return a file name
+  ;; relative to the current working directory.
+  (local-file "build/utils.scm"
               "build-utils.scm"))
 
 (define* (imported-files files