[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/02: gnu: bowtie: Use 'modify-phases'.
From: |
Ben Woodcroft |
Subject: |
02/02: gnu: bowtie: Use 'modify-phases'. |
Date: |
Fri, 14 Jul 2017 07:12:40 -0400 (EDT) |
benwoodcroft pushed a commit to branch master
in repository guix.
commit 06e372360eed08a1cbbb2081a591fbfa4785a2f2
Author: Ben Woodcroft <address@hidden>
Date: Fri Jul 14 19:23:37 2017 +1000
gnu: bowtie: Use 'modify-phases'.
* gnu/packages/bioinformatics.scm (bowtie)[arguments]: Use 'modify-phases'
syntax.
---
gnu/packages/bioinformatics.scm | 18 ++++++++----------
1 file changed, 8 insertions(+), 10 deletions(-)
diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm
index a9f6259..b5ee9cc 100644
--- a/gnu/packages/bioinformatics.scm
+++ b/gnu/packages/bioinformatics.scm
@@ -1225,16 +1225,14 @@ errors at the end of reads.")
"WITH_TBB=1"
(string-append "prefix=" (assoc-ref %outputs "out")))
#:phases
- (alist-delete
- 'configure
- (alist-replace
- 'check
- (lambda* (#:key outputs #:allow-other-keys)
- (system* "perl"
- "scripts/test/simple_tests.pl"
- "--bowtie2=./bowtie2"
- "--bowtie2-build=./bowtie2-build"))
- %standard-phases))))
+ (modify-phases %standard-phases
+ (delete 'configure)
+ (replace 'check
+ (lambda* (#:key outputs #:allow-other-keys)
+ (zero? (system* "perl"
+ "scripts/test/simple_tests.pl"
+ "--bowtie2=./bowtie2"
+ "--bowtie2-build=./bowtie2-build")))))))
(home-page "http://bowtie-bio.sourceforge.net/bowtie2/index.shtml")
(synopsis "Fast and sensitive nucleotide sequence read aligner")
(description