diff options
author | Leo Famulari <leo@famulari.name> | 2017-05-29 04:42:37 -0400 |
---|---|---|
committer | Leo Famulari <leo@famulari.name> | 2017-06-02 14:13:49 -0400 |
commit | 1c09eb9948fcb5f6cfb85faafe24a8843c119f89 (patch) | |
tree | dad64ce8abca004e9bb160a63742251c1c58d630 | |
parent | d6158fe70dfef6c03357d75d36dc7cac813dea45 (diff) | |
download | guix-1c09eb9948fcb5f6cfb85faafe24a8843c119f89.tar guix-1c09eb9948fcb5f6cfb85faafe24a8843c119f89.tar.gz |
gnu: ijs: Use modify-phases syntax.
* gnu/packages/ghostscript.scm (ijs)[arguments]: Use modify-phases.
-rw-r--r-- | gnu/packages/ghostscript.scm | 35 |
1 files changed, 17 insertions, 18 deletions
diff --git a/gnu/packages/ghostscript.scm b/gnu/packages/ghostscript.scm index ffe6e018bd..32c2b444d5 100644 --- a/gnu/packages/ghostscript.scm +++ b/gnu/packages/ghostscript.scm @@ -5,6 +5,7 @@ ;;; Copyright © 2013, 2015, 2016 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2017 Alex Vong <alexvong1995@gmail.com> ;;; Copyright © 2017 Efraim Flashner <efraim@flashner.co.il> +;;; Copyright © 2017 Leo Famulari <leo@famulari.name> ;;; ;;; This file is part of GNU Guix. ;;; @@ -246,24 +247,22 @@ output file formats and printers.") ("autoconf" ,autoconf))) (arguments `(#:phases - (alist-cons-after - 'unpack 'autogen - (lambda _ - ;; need to regenerate macros - (system* "autoreconf" "-if") - ;; do not run configure - (substitute* "autogen.sh" - (("^.*\\$srcdir/configure.*") "")) - (system* "bash" "autogen.sh") - - ;; create configure script in ./ijs/ - (chdir "ijs") - ;; do not run configure - (substitute* "autogen.sh" - (("^.*\\$srcdir/configure.*") "") - (("^ + && echo Now type.*$") "")) - (zero? (system* "bash" "autogen.sh"))) - %standard-phases))) + (modify-phases %standard-phases + (add-after 'unpack 'autogen + (lambda _ + ;; need to regenerate macros + (system* "autoreconf" "-if") + ;; do not run configure + (substitute* "autogen.sh" + (("^.*\\$srcdir/configure.*") "")) + (system* "bash" "autogen.sh") + ;; create configure script in ./ijs/ + (chdir "ijs") + ;; do not run configure + (substitute* "autogen.sh" + (("^.*\\$srcdir/configure.*") "") + (("^ + && echo Now type.*$") "")) + (zero? (system* "bash" "autogen.sh"))))))) (synopsis "IJS driver framework for inkjet and other raster devices") (description "IJS is a protocol for transmission of raster page images. This package |