diff options
author | Ludovic Courtès <ludo@gnu.org> | 2015-06-04 11:13:54 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2015-06-04 11:18:59 +0200 |
commit | f683d67d66786efe003f6431a471aa7b36dcf7fa (patch) | |
tree | 5f80d0fb56420f4a8f9bdcbbb0d64287c478399b | |
parent | 2068559ba03b785ec5d118b4fdc6e8267ac34ba0 (diff) | |
download | guix-f683d67d66786efe003f6431a471aa7b36dcf7fa.tar.gz guix-f683d67d66786efe003f6431a471aa7b36dcf7fa.zip |
gnu: perl: Use 'modify-phases'.
* gnu/packages/perl.scm (perl)[arguments]: Use 'modify-phases' instead of
'alist-replace'.
-rw-r--r-- | gnu/packages/perl.scm | 44 |
1 files changed, 22 insertions, 22 deletions
diff --git a/gnu/packages/perl.scm b/gnu/packages/perl.scm index 80c476b2b1..5ace05d0f3 100644 --- a/gnu/packages/perl.scm +++ b/gnu/packages/perl.scm @@ -51,28 +51,28 @@ (arguments '(#:tests? #f #:phases - (alist-replace - 'configure - (lambda* (#:key inputs outputs #:allow-other-keys) - (let ((out (assoc-ref outputs "out")) - (libc (assoc-ref inputs "libc"))) - ;; Use the right path for `pwd'. - (substitute* "dist/Cwd/Cwd.pm" - (("/bin/pwd") - (which "pwd"))) - - (zero? - (system* "./Configure" - (string-append "-Dprefix=" out) - (string-append "-Dman1dir=" out "/share/man/man1") - (string-append "-Dman3dir=" out "/share/man/man3") - "-de" "-Dcc=gcc" - "-Uinstallusrbinperl" - "-Dinstallstyle=lib/perl5" - "-Duseshrplib" - (string-append "-Dlocincpth=" libc "/include") - (string-append "-Dloclibpth=" libc "/lib"))))) - %standard-phases))) + (modify-phases %standard-phases + (replace + 'configure + (lambda* (#:key inputs outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out")) + (libc (assoc-ref inputs "libc"))) + ;; Use the right path for `pwd'. + (substitute* "dist/Cwd/Cwd.pm" + (("/bin/pwd") + (which "pwd"))) + + (zero? + (system* "./Configure" + (string-append "-Dprefix=" out) + (string-append "-Dman1dir=" out "/share/man/man1") + (string-append "-Dman3dir=" out "/share/man/man3") + "-de" "-Dcc=gcc" + "-Uinstallusrbinperl" + "-Dinstallstyle=lib/perl5" + "-Duseshrplib" + (string-append "-Dlocincpth=" libc "/include") + (string-append "-Dloclibpth=" libc "/lib"))))))))) (native-search-paths (list (search-path-specification (variable "PERL5LIB") (files '("lib/perl5/site_perl"))))) |