diff options
| -rw-r--r-- | guix/build/utils.scm | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/guix/build/utils.scm b/guix/build/utils.scm index de1cfcea42..01ac8961d8 100644 --- a/guix/build/utils.scm +++ b/guix/build/utils.scm @@ -629,9 +629,7 @@ When KEEP-MTIME? is true, the atime/mtime of FILE are kept unchanged." ;; XXX: Unlike with `patch-shebang', FILE is always touched. (define (find-shell name) - (let ((shell - (search-path (search-path-as-string->list (getenv "PATH")) - name))) + (let ((shell (which name))) (unless shell (format (current-error-port) "patch-makefile-SHELL: warning: no binary for shell `~a' found in $PATH~%" |