benwoodcroft pushed a commit to branch master
in repository guix.
commit 6573ac82ad83cacd264ae20f9266d21cb5852f12
Author: Ben Woodcroft <donttrust...@gmail.com>
Date: Mon Jan 11 00:28:25 2016 +1000
gnu: bedtools: Use modify-phases.
* gnu/packages/bioinformatics.scm (bedtools)[arguments]: Use modify-phases.
---
gnu/packages/bioinformatics.scm | 38 +++++++++++++++++++-------------------
1 files changed, 19 insertions(+), 19 deletions(-)
diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm
index c598327..df0e23d 100644
--- a/gnu/packages/bioinformatics.scm
+++ b/gnu/packages/bioinformatics.scm
@@ -224,25 +224,25 @@ computational cluster.")
(arguments
'(#:test-target "test"
#:phases
- (alist-cons-after
- 'unpack 'patch-makefile-SHELL-definition
- (lambda _
- ;; patch-makefile-SHELL cannot be used here as it does not
- ;; yet patch definitions with `:='. Since changes to
- ;; patch-makefile-SHELL result in a full rebuild, features
- ;; of patch-makefile-SHELL are reimplemented here.
- (substitute* "Makefile"
- (("^SHELL := .*$") (string-append "SHELL := " (which "bash") " -e
\n"))))
- (alist-delete
- 'configure
- (alist-replace
- 'install
- (lambda* (#:key outputs #:allow-other-keys)
- (let ((bin (string-append (assoc-ref outputs "out") "/bin/")))
- (for-each (lambda (file)
- (install-file file bin))
- (find-files "bin" ".*"))))
- %standard-phases)))))
+ (modify-phases %standard-phases
+ (add-after 'unpack 'patch-makefile-SHELL-definition
+ (lambda _
+ ;; patch-makefile-SHELL cannot be used here as it does not
+ ;; yet patch definitions with `:='. Since changes to
+ ;; patch-makefile-SHELL result in a full rebuild, features
+ ;; of patch-makefile-SHELL are reimplemented here.
+ (substitute* "Makefile"
+ (("^SHELL := .*$")
+ (string-append "SHELL := " (which "bash") " -e \n")))
+ #t))
+ (delete 'configure)
+ (replace 'install
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((bin (string-append (assoc-ref outputs "out") "/bin/")))
+ (for-each (lambda (file)
+ (install-file file bin))
+ (find-files "bin" ".*")))
+ #t)))))
(home-page "https://github.com/arq5x/bedtools2";)
(synopsis "Tools for genome analysis and arithmetic")
(description
