~ruther/guix-local

c809ec94d11f1c7e23cccb988dfb1412aff72636 — Ludovic Courtès 11 years ago 5e5deea
utils: Change 'patch-makefile-SHELL' to support ":=" assignments.

Reported by Ricardo Wurmus <ricardo.wurmus@mdc-berlin.de>.

* guix/build/utils.scm (patch-makefile-SHELL): Update regexp to match
  ":=" assignments.
1 files changed, 1 insertions(+), 1 deletions(-)

M guix/build/utils.scm
M guix/build/utils.scm => guix/build/utils.scm +1 -1
@@ 638,7 638,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:]]+)(.*)$"
     (("^ *SHELL[[:blank:]]*:?=[[:blank:]]*([[:graph:]]*/)([[:graph:]]+)(.*)$"
       _ dir shell args)
      (let* ((old (string-append dir shell))
             (new (or (find-shell shell) old)))