mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
gnu: cook: Update phase style.
* gnu/packages/cook.scm (cook)[arguments]: Use MODIFY-PHASES syntax and end phase with #t.
This commit is contained in:
parent
61faf24df6
commit
ea5d238dae
1 changed files with 19 additions and 18 deletions
|
@ -1,5 +1,6 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2014 John Darrington <jmd@gnu.org>
|
||||
;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
|
@ -41,8 +42,8 @@ (define-public cook
|
|||
(arguments
|
||||
`(#:parallel-build? #f ; There are some nasty racy rules in the Makefile.
|
||||
#:phases
|
||||
(alist-cons-before
|
||||
'configure 'pre-conf
|
||||
(modify-phases %standard-phases
|
||||
(add-before 'configure 'pre-conf
|
||||
(lambda _
|
||||
(substitute* (append '("common/env.c")
|
||||
(find-files "test" "\\.sh"))
|
||||
|
@ -59,8 +60,8 @@ (define-public cook
|
|||
(substitute* "test/00/t0077a.sh"
|
||||
(("ar qc") "ar qcU"))
|
||||
|
||||
(setenv "SH" (which "sh")))
|
||||
%standard-phases)))
|
||||
(setenv "SH" (which "sh"))
|
||||
#t)))))
|
||||
(native-inputs `(("bison" ,bison)
|
||||
;; For building the documentation:
|
||||
("groff" ,groff)
|
||||
|
|
Loading…
Reference in a new issue