gnu: autogen: Use 'modify-phases'.
* gnu/packages/autogen.scm (autogen)[arguments]: Use 'modify-phases'.
This commit is contained in:
parent
e85ff3e2fd
commit
99e4aa54a6
|
@ -46,16 +46,16 @@
|
||||||
(inputs `(("which" ,which)
|
(inputs `(("which" ,which)
|
||||||
("guile" ,guile-2.0)))
|
("guile" ,guile-2.0)))
|
||||||
(arguments
|
(arguments
|
||||||
'(#:phases (alist-cons-before
|
'(#:phases
|
||||||
'patch-source-shebangs 'patch-test-scripts
|
(modify-phases %standard-phases
|
||||||
|
(add-before 'patch-source-shebangs 'patch-test-scripts
|
||||||
(lambda _
|
(lambda _
|
||||||
(let ((sh (which "sh")))
|
(let ((sh (which "sh")))
|
||||||
(substitute*
|
(substitute*
|
||||||
(append (find-files "agen5/test" "\\.test$")
|
(append (find-files "agen5/test" "\\.test$")
|
||||||
(find-files "autoopts/test" "\\.(test|in)$"))
|
(find-files "autoopts/test" "\\.(test|in)$"))
|
||||||
(("/bin/sh") sh)
|
(("/bin/sh") sh)
|
||||||
(("/usr/bin/tr") "tr"))))
|
(("/usr/bin/tr") "tr"))))))))
|
||||||
%standard-phases)))
|
|
||||||
(home-page "http://www.gnu.org/software/autogen/")
|
(home-page "http://www.gnu.org/software/autogen/")
|
||||||
(synopsis "Automated program generator")
|
(synopsis "Automated program generator")
|
||||||
(description
|
(description
|
||||||
|
|
Loading…
Reference in New Issue