01/02: gnu: star: Use "modify-phases" syntax.

[Ricardo Wurmus]

rekado pushed a commit to branch master
in repository guix.

commit c0266e8d031852931d1cc324dd56cf075cecc9a2
Author: Ricardo Wurmus <address@hidden>
Date:   Tue Jan 19 16:04:01 2016 +0100

    gnu: star: Use "modify-phases" syntax.
    
    * gnu/packages/bioinformatics.scm (star)[arguments]: Use "modify-phases"
      syntax.
---
 gnu/packages/bioinformatics.scm |   18 +++++++++---------
 1 files changed, 9 insertions(+), 9 deletions(-)

diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm
index e579afe..485faef 100644
--- a/gnu/packages/bioinformatics.scm
+++ b/gnu/packages/bioinformatics.scm
@@ -3037,15 +3037,15 @@ of these reads to align data quickly through a 
hash-based indexing scheme.")
      '(#:tests? #f ;no check target
        #:make-flags '("STAR")
        #:phases
-       (alist-cons-after
-        'unpack 'enter-source-dir (lambda _ (chdir "source"))
-        (alist-replace
-         'install
-         (lambda* (#:key outputs #:allow-other-keys)
-           (let ((bin (string-append (assoc-ref outputs "out") "/bin/")))
-             (install-file "STAR" bin)))
-         (alist-delete
-          'configure %standard-phases)))))
+       (modify-phases %standard-phases
+         (add-after 'unpack 'enter-source-dir
+           (lambda _ (chdir "source") #t))
+         (replace 'install
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let ((bin (string-append (assoc-ref outputs "out") "/bin/")))
+               (install-file "STAR" bin))
+             #t))
+         (delete 'configure))))
     (native-inputs
      `(("vim" ,vim))) ; for xxd
     (inputs