From e756c88a8ccf8579b57eb3370d2ccc8cec23b5cd Mon Sep 17 00:00:00 2001 From: Efraim Flashner Date: Mon, 5 Aug 2019 06:01:24 -0500 Subject: gn: contra: Update package definition. * gn/packages/bioinformatics.scm (contra)[arguments]: Update custom 'install phase. --- gn/packages/bioinformatics.scm | 18 ++++++++---------- 1 file changed, 8 insertions(+), 10 deletions(-) (limited to 'gn') 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") -- cgit v1.2.3