summaryrefslogtreecommitdiff
path: root/guix
diff options
context:
space:
mode:
authorEric Bavier <bavier@member.fsf.org>2014-09-04 09:19:24 -0500
committerEric Bavier <bavier@member.fsf.org>2014-09-05 00:02:19 -0500
commit11459384968f654c42ad7dba4443dada35191f5b (patch)
tree074fdc0cd1ad48a244c2d6acac699805b9c86ec2 /guix
parent6646747c020402fd077a719af99627d9cf3fe54d (diff)
utils: Clean trailing whitespace at end of SHELL
* guix/build/utils.scm (patch-makefile-SHELL): Remove trailing whitespace.
Diffstat (limited to 'guix')
-rw-r--r--guix/build/utils.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/guix/build/utils.scm b/guix/build/utils.scm
index f38b2cabfc..d169053c7b 100644
--- a/guix/build/utils.scm
+++ b/guix/build/utils.scm
@@ -582,7 +582,7 @@ When KEEP-MTIME? is true, the atime/mtime of FILE are kept unchanged."
(let ((st (stat file)))
(substitute* file
- (("^ *SHELL[[:blank:]]*=[[:blank:]]*([[:graph:]]*/)([[:graph:]]+)[[:blank:]]*(.*)$"
+ (("^ *SHELL[[:blank:]]*=[[:blank:]]*([[:graph:]]*/)([[:graph:]]+)(.*)$"
_ dir shell args)
(let* ((old (string-append dir shell))
(new (or (find-shell shell) old)))
@@ -590,7 +590,7 @@ When KEEP-MTIME? is true, the atime/mtime of FILE are kept unchanged."
(format (current-error-port)
"patch-makefile-SHELL: ~a: changing `SHELL' from `~a' to `~a'~%"
file old new))
- (string-append "SHELL = " new " " args))))
+ (string-append "SHELL = " new args))))
(when keep-mtime?
(set-file-time file st))))