From ea5d238dae574d08bd25ecc6c1fb3bf009707257 Mon Sep 17 00:00:00 2001 From: Tobias Geerinckx-Rice Date: Tue, 20 Feb 2018 21:21:03 +0100 Subject: gnu: cook: Update phase style. * gnu/packages/cook.scm (cook)[arguments]: Use MODIFY-PHASES syntax and end phase with #t. --- gnu/packages/cook.scm | 37 +++++++++++++++++++------------------ 1 file changed, 19 insertions(+), 18 deletions(-) (limited to 'gnu') diff --git a/gnu/packages/cook.scm b/gnu/packages/cook.scm index e149968f24..17e090d725 100644 --- a/gnu/packages/cook.scm +++ b/gnu/packages/cook.scm @@ -1,5 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2014 John Darrington +;;; Copyright © 2018 Tobias Geerinckx-Rice ;;; ;;; This file is part of GNU Guix. ;;; @@ -41,26 +42,26 @@ (arguments `(#:parallel-build? #f ; There are some nasty racy rules in the Makefile. #:phases - (alist-cons-before - 'configure 'pre-conf - (lambda _ - (substitute* (append '("common/env.c") - (find-files "test" "\\.sh")) - (("/bin/sh") (which "sh"))) + (modify-phases %standard-phases + (add-before 'configure 'pre-conf + (lambda _ + (substitute* (append '("common/env.c") + (find-files "test" "\\.sh")) + (("/bin/sh") (which "sh"))) - ;; Guix's binutils (because it wants bit-reproducable builds) is - ;; is configured with the --enable-deterministic-archives flag. - ;; This means the timestamp of files appended to an ar archive - ;; are automatically and silently mutated to 00:00 1 Jan 1970 - ;; which plays havoc with this test, for which correct timestamps - ;; are very important. Adding the U flag undoes the effect of - ;; --enable-deterministic-archives and allows this test to work - ;; again. - (substitute* "test/00/t0077a.sh" - (("ar qc") "ar qcU")) + ;; Guix's binutils (because it wants bit-reproducable builds) is + ;; is configured with the --enable-deterministic-archives flag. + ;; This means the timestamp of files appended to an ar archive + ;; are automatically and silently mutated to 00:00 1 Jan 1970 + ;; which plays havoc with this test, for which correct timestamps + ;; are very important. Adding the U flag undoes the effect of + ;; --enable-deterministic-archives and allows this test to work + ;; again. + (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) -- cgit 1.4.1