01/01: gnu: surfraw: Point to the correct Perl executable.

[Leo Famulari]

lfam pushed a commit to branch master
in repository guix.

commit 72687ca5d2d8d1dd55b152823a164606fa421d9c
Author: Mark Meyer <address@hidden>
Date:   Thu Jan 4 18:17:38 2018 +0100

    gnu: surfraw: Point to the correct Perl executable.
    
    * gnu/packages/web.scm (surfraw)[arguments]: Hardcode the path to Perl
    in a 'patch-perl' phase.
    
    Signed-off-by: Leo Famulari <address@hidden>
---
 gnu/packages/web.scm | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm
index 30d5e51..f67f415 100644
--- a/gnu/packages/web.scm
+++ b/gnu/packages/web.scm
@@ -4765,6 +4765,13 @@ handling many of the web standards in use today.")
     (arguments
      `(#:phases
        (modify-phases %standard-phases
+         (add-before 'configure 'patch-perl
+           (lambda* (#:key inputs #:allow-other-keys)
+             (let ((perl (assoc-ref inputs "perl")))
+               (substitute* "surfraw.IN"
+                 (("perl -e")
+                  (string-append perl "/bin/perl -e")))
+               #t)))
          (add-after 'install 'compress-elvi.1sr
            (lambda* (#:key outputs #:allow-other-keys)
              ;; The manpages of the elvis are symlinks to elvi.1sr.gz