[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/03: gnu: zip: Use 'modify-phases'.
From: |
Tobias Geerinckx-Rice |
Subject: |
01/03: gnu: zip: Use 'modify-phases'. |
Date: |
Tue, 27 Sep 2016 22:20:36 +0000 (UTC) |
nckx pushed a commit to branch master
in repository guix.
commit 8c120e4f3b5b18321a6545cbf60fa496f3774df3
Author: Tobias Geerinckx-Rice <address@hidden>
Date: Sat Aug 20 19:27:20 2016 +0200
gnu: zip: Use 'modify-phases'.
* gnu/packages/zip.scm (zip)[arguments]: Use 'modify-phases'.
---
gnu/packages/zip.scm | 11 ++++++-----
1 file changed, 6 insertions(+), 5 deletions(-)
diff --git a/gnu/packages/zip.scm b/gnu/packages/zip.scm
index 6defbda..c9fb70c 100644
--- a/gnu/packages/zip.scm
+++ b/gnu/packages/zip.scm
@@ -48,11 +48,12 @@
(list "-f" "unix/Makefile"
(string-append "prefix=" out)
(string-append "MANDIR=" out "/share/man/man1")))
- #:phases (alist-replace
- 'build
- (lambda* (#:key (make-flags '()) #:allow-other-keys)
- (zero? (apply system* "make" "generic_gcc" make-flags)))
- (alist-delete 'configure %standard-phases))))
+ #:phases
+ (modify-phases %standard-phases
+ (replace 'build
+ (lambda* (#:key (make-flags '()) #:allow-other-keys)
+ (zero? (apply system* "make" "generic_gcc" make-flags))))
+ (delete 'configure))))
(home-page "http://www.info-zip.org/Zip.html")
(synopsis "Compression and file packing utility")
(description