me/guix
Archived
1
0
Fork 0
Code Activity

gnu: zsh: Use 'modify-phases'.

Browse source 
* gnu/packages/shells.scm (zsh)[arguments]: Use ‘modify-phases’
instead of ‘alist-delete’.
This commit is contained in:
Tobias Geerinckx-Rice 2016-08-02 02:34:36 +02:00
parent 318c0aee1e
commit ddee9a6e8b
No known key found for this signature in database
GPG key ID: 91CCDB9B48541B99
1 changed files with 21 additions and 21 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

42
gnu/packages/shells.scm
View file

@ -233,27 +233,27 @@ history mechanism, job control and a C-like syntax.")
"0dsr450v8nydvpk8ry276fvbznlrjgddgp7zvhcw4cv69i9lr4ps"))))
(build-system gnu-build-system)
(arguments `(#:configure-flags '("--with-tcsetpgrp" "--enable-pcre")
#:phases (alist-cons-before
'configure 'fix-sh
(lambda _
;; Some of the files are ISO-8859-1 encoded.
(with-fluids ((%default-port-encoding #f))
(substitute*
'("configure"
"configure.ac"
"Src/exec.c"
"Src/mkmakemod.sh"
"Config/installfns.sh"
"Config/defs.mk.in"
"Test/E01options.ztst"
"Test/A05execution.ztst"
"Test/A01grammar.ztst"
"Test/A06assign.ztst"
"Test/B02typeset.ztst"
"Completion/Unix/Command/_init_d"
"Util/preconfig")
(("/bin/sh") (which "sh")))))
%standard-phases)))
#:phases
(modify-phases %standard-phases
(add-before 'configure 'fix-sh
(lambda _
;; Some of the files are ISO-8859-1 encoded.
(with-fluids ((%default-port-encoding #f))
(substitute*
'("configure"
"configure.ac"
"Src/exec.c"
"Src/mkmakemod.sh"
"Config/installfns.sh"
"Config/defs.mk.in"
"Test/E01options.ztst"
"Test/A05execution.ztst"
"Test/A01grammar.ztst"
"Test/A06assign.ztst"
"Test/B02typeset.ztst"
"Completion/Unix/Command/_init_d"
"Util/preconfig")
(("/bin/sh") (which "sh")))))))))
(native-inputs `(("autoconf" ,autoconf)))
(inputs `(("ncurses" ,ncurses)
("pcre" ,pcre)