gnu: qpdf: Use 'modify-phases'.

* gnu/packages/pdf.scm (qpdf)[arguments]: Use 'modify-phases'.
This commit is contained in:
Efraim Flashner 2016-08-15 11:47:08 +03:00
parent 74a3c4bb6c
commit 0adfe0ccbe
No known key found for this signature in database
GPG Key ID: F4C1D3917EACEE93
1 changed files with 11 additions and 11 deletions

View File

@ -527,8 +527,9 @@ eval '(exit $?0)' && eval 'exec perl -wS \"$0\" ${1+\"$@\"}'
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:disallowed-references (,perl) `(#:disallowed-references (,perl)
#:phases (alist-cons-before #:phases
'configure 'patch-paths (modify-phases %standard-phases
(add-before 'configure 'patch-paths
(lambda _ (lambda _
(substitute* "make/libtool.mk" (substitute* "make/libtool.mk"
(("SHELL=/bin/bash") (("SHELL=/bin/bash")
@ -536,8 +537,7 @@ eval '(exit $?0)' && eval 'exec perl -wS \"$0\" ${1+\"$@\"}'
(substitute* (append (substitute* (append
'("qtest/bin/qtest-driver") '("qtest/bin/qtest-driver")
(find-files "." "\\.test")) (find-files "." "\\.test"))
(("/usr/bin/env") (which "env")))) (("/usr/bin/env") (which "env"))))))))
%standard-phases)))
(native-inputs (native-inputs
`(("pkg-config" ,pkg-config) `(("pkg-config" ,pkg-config)
("perl" ,perl))) ("perl" ,perl)))