mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2025-01-12 06:06:53 -05:00
gnu: perl: Split configure phase.
* gnu/packages/perl.scm (perl)[arguments]: Split 'configure' phase into 'setup-configure' and 'configure' phases.
This commit is contained in:
parent
b5b5105c3d
commit
9f2989b6cc
1 changed files with 13 additions and 11 deletions
|
@ -62,11 +62,8 @@ (define-public perl
|
|||
'(#:tests? #f
|
||||
#: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")))
|
||||
(add-before 'configure 'setup-configure
|
||||
(lambda _
|
||||
;; Use the right path for `pwd'.
|
||||
(substitute* "dist/PathTools/Cwd.pm"
|
||||
(("/bin/pwd")
|
||||
|
@ -77,7 +74,12 @@ (define-public perl
|
|||
(substitute* "cflags.SH"
|
||||
(("-std=c89")
|
||||
"-std=gnu89"))
|
||||
|
||||
#t))
|
||||
(replace
|
||||
'configure
|
||||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||||
(let ((out (assoc-ref outputs "out"))
|
||||
(libc (assoc-ref inputs "libc")))
|
||||
(zero?
|
||||
(system* "./Configure"
|
||||
(string-append "-Dprefix=" out)
|
||||
|
|
Loading…
Reference in a new issue