diff options
| author | Efraim Flashner <efraim@flashner.co.il> | 2017-10-18 17:01:25 +0300 |
|---|---|---|
| committer | Efraim Flashner <efraim@flashner.co.il> | 2017-10-19 09:04:43 +0300 |
| commit | 530d9e1555e8d0125dde6893f5f70c7a1ebc2564 (patch) | |
| tree | daf102401991c4060cd2ec98260af8cf459a475f /gnu | |
| parent | 8c88e0ba8c2f0ed653adbfbf512711d33055211c (diff) | |
| download | guix-530d9e1555e8d0125dde6893f5f70c7a1ebc2564.tar.gz | |
gnu: psutils: Use 'modify-phases'.
* gnu/packages/ghostscript.scm (psutils)[arguments]: Use 'modify-phases' syntax.
Diffstat (limited to 'gnu')
| -rw-r--r-- | gnu/packages/ghostscript.scm | 34 |
1 files changed, 17 insertions, 17 deletions
diff --git a/gnu/packages/ghostscript.scm b/gnu/packages/ghostscript.scm index 28477b2c42..c2e8a55cbc 100644 --- a/gnu/packages/ghostscript.scm +++ b/gnu/packages/ghostscript.scm @@ -100,23 +100,23 @@ paper size.") (arguments `(#:tests? #f ; none provided #:phases - (alist-replace - 'configure - (lambda* (#:key inputs outputs #:allow-other-keys #:rest args) - (let ((perl (assoc-ref inputs "perl")) - (out (assoc-ref outputs "out"))) - (copy-file "Makefile.unix" "Makefile") - (substitute* "Makefile" - (("/usr/local/bin/perl") (string-append perl "/bin/perl"))) - (substitute* "Makefile" - (("/usr/local") out)) - ;; for the install phase - (substitute* "Makefile" - (("-mkdir") "mkdir -p")) - ;; drop installation of non-free files - (substitute* "Makefile" - ((" install.include") "")))) - %standard-phases))) + (modify-phases %standard-phases + (replace 'configure + (lambda* (#:key inputs outputs #:allow-other-keys #:rest args) + (let ((perl (assoc-ref inputs "perl")) + (out (assoc-ref outputs "out"))) + (copy-file "Makefile.unix" "Makefile") + (substitute* "Makefile" + (("/usr/local/bin/perl") (string-append perl "/bin/perl"))) + (substitute* "Makefile" + (("/usr/local") out)) + ;; for the install phase + (substitute* "Makefile" + (("-mkdir") "mkdir -p")) + ;; drop installation of non-free files + (substitute* "Makefile" + ((" install.include") ""))) + #t))))) (synopsis "Collection of utilities for manipulating PostScript documents") (description "PSUtils is a collection of utilities for manipulating PostScript |