guix-commits
[Top][All Lists]
Advanced

[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



reply via email to

[Prev in Thread] Current Thread [Next in Thread]