guix/guix
3
5
Fork 0
mirror of git://git.savannah.gnu.org/guix.git synced 2023-12-14 03:33:07 +01:00
Code Issues Releases Wiki Activity

gnu: w3m: Use 'modify-phases' syntax.

Browse source 
* gnu/packages/w3m.scm (w3m)[arguments]: Use 'modify-phases' syntax.
This commit is contained in:
Efraim Flashner 2016-11-22 12:33:43 +02:00
parent ee7518a009
commit 83a3e805be
Signed by untrusted user: efraim
GPG key ID: F4C1D3917EACEE93
1 changed files with 10 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
gnu/packages/w3m.scm
View file

@ -2,6 +2,7 @@
;;; Copyright © 2013 Nikita Karetnikov <nikita@karetnikov.org> ;;; Copyright © 2013 Nikita Karetnikov <nikita@karetnikov.org>
;;; Copyright © 2016 Leo Famulari <leo@famulari.name> ;;; Copyright © 2016 Leo Famulari <leo@famulari.name>
;;; Copyright © 2016 Kei Kebreau <kei@openmailbox.org> ;;; Copyright © 2016 Kei Kebreau <kei@openmailbox.org>
;;; Copyright © 2016 Efraim Flashner <efraim@flashner.co.il>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -48,14 +49,15 @@
(base32 (base32
"142vkkmsk76wj9w6r4y2pa1hmy1kkzmc73an9zchx0ikm2z92x6s")))) "142vkkmsk76wj9w6r4y2pa1hmy1kkzmc73an9zchx0ikm2z92x6s"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments `(#:tests? #f ; no check target (arguments
#:phases (alist-cons-before '(#:tests? #f ; no check target
'configure 'fix-perl #:phases
(lambda _ (modify-phases %standard-phases
(substitute* '("scripts/w3mmail.cgi.in" (add-before 'configure 'fix-perl
"scripts/dirlist.cgi.in") (lambda _ (substitute* '("scripts/w3mmail.cgi.in"
(("@PERL@") (which "perl")))) "scripts/dirlist.cgi.in")
%standard-phases))) (("@PERL@") (which "perl")))
#t)))))
(inputs (inputs
`(("libgc" ,libgc) `(("libgc" ,libgc)
("ncurses" ,ncurses) ("ncurses" ,ncurses)