From c11933c920dd7b7cdf68e13e6b3718602129210a Mon Sep 17 00:00:00 2001 From: Efraim Flashner Date: Wed, 19 Oct 2016 17:08:35 +0300 Subject: gnu: zile: Use 'modify-phases' syntax. * gnu/packages/zile.scm (zile)[arguments]: Use 'modify-phases' syntax. --- gnu/packages/zile.scm | 20 +++++++++++--------- 1 file changed, 11 insertions(+), 9 deletions(-) (limited to 'gnu/packages/zile.scm') diff --git a/gnu/packages/zile.scm b/gnu/packages/zile.scm index 88aaf75c50..13a5440eea 100644 --- a/gnu/packages/zile.scm +++ b/gnu/packages/zile.scm @@ -1,6 +1,7 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2012, 2013 Ludovic Courtès ;;; Copyright © 2014 Eric Bavier +;;; Copyright © 2016 Efraim Flashner ;;; ;;; This file is part of GNU Guix. ;;; @@ -42,15 +43,16 @@ "03mcg0bxkzprlsx8y6h22w924pzx4a9zr7zm3g11j8j3x9lz75f7")))) (build-system gnu-build-system) (arguments - '(#:phases (alist-cons-before - 'configure 'patch-/bin/sh - (lambda* (#:key inputs #:allow-other-keys) - (let ((bash (assoc-ref inputs "bash"))) - ;; Refer to the actual shell. - (substitute* '("lib/spawni.c" "src/funcs.c") - (("/bin/sh") - (string-append bash "/bin/sh"))))) - %standard-phases))) + '(#:phases + (modify-phases %standard-phases + (add-before 'configure 'patch-/bin/sh + (lambda* (#:key inputs #:allow-other-keys) + (let ((bash (assoc-ref inputs "bash"))) + ;; Refer to the actual shell. + (substitute* '("lib/spawni.c" "src/funcs.c") + (("/bin/sh") + (string-append bash "/bin/sh"))) + #t)))))) (inputs `(("boehm-gc" ,libgc) ("ncurses" ,ncurses) -- cgit v1.2.3