aboutsummaryrefslogtreecommitdiff
path: root/gn
diff options
context:
space:
mode:
authorEfraim Flashner2019-08-05 06:01:24 -0500
committerEfraim Flashner2019-08-05 06:02:20 -0500
commite756c88a8ccf8579b57eb3370d2ccc8cec23b5cd (patch)
tree64fbb51fd00868e18501c732f34311f52fb7e79a /gn
parent9d2868360926c0a700cd57fd65fb1ea2b4bf16a1 (diff)
downloadguix-bioinformatics-e756c88a8ccf8579b57eb3370d2ccc8cec23b5cd.tar.gz
gn: contra: Update package definition.
* gn/packages/bioinformatics.scm (contra)[arguments]: Update custom 'install phase.
Diffstat (limited to 'gn')
-rw-r--r--gn/packages/bioinformatics.scm18
1 files changed, 8 insertions, 10 deletions
diff --git a/gn/packages/bioinformatics.scm b/gn/packages/bioinformatics.scm
index eb495f9..d6972d6 100644
--- a/gn/packages/bioinformatics.scm
+++ b/gn/packages/bioinformatics.scm
@@ -88,18 +88,16 @@
(delete 'configure)
(delete 'build) ; We can use Guix's BEDtools instead.
(replace 'install
- (lambda _
- (let* ((out (assoc-ref %outputs "out"))
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin"))
(doc (string-append out "/share/doc/contra")))
- (mkdir-p bin)
- (mkdir-p doc)
- (and
- (zero? (system* "cp" "--recursive" "scripts" bin))
- (zero? (system* "cp" "contra.py" bin))
- (zero? (system* "cp" "baseline.py" bin))
- ;; There's only a pre-built PDF available.
- (zero? (system* "cp" "CONTRA_User_Guide.2.0.pdf" doc)))))))))
+ (copy-recursively "scripts" (string-append bin "/scripts"))
+ (install-file "contra.py" bin)
+ (install-file "baseline.py" bin)
+ ;; There's only a pre-built PDF available.
+ (install-file "CONTRA_User_Guide.2.0.pdf" doc))
+ #t)))))
(home-page "http://contra-cnv.sourceforge.net/")
(synopsis "Tool for copy number variation (CNV) detection for targeted
resequencing data")