diff options
-rw-r--r-- | guix/build/utils.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/guix/build/utils.scm b/guix/build/utils.scm index f7fb7938e5..d17346607f 100644 --- a/guix/build/utils.scm +++ b/guix/build/utils.scm @@ -486,7 +486,9 @@ FILE are kept unchanged." "patch-shebang: ~a: changing `~a' to `~a'~%" file interp bin) (patch p bin - (string-append " " arg1 rest))))) + (if (string-null? arg1) + "" + (string-append " " arg1 rest)))))) (begin (format (current-error-port) "patch-shebang: ~a: warning: no binary for interpreter `~a' found in $PATH~%" |