02/03: gnu: bismark: Fix references to gunzip.

[Ricardo Wurmus]

rekado pushed a commit to branch master
in repository guix.

commit 096589035ed154b6ecb4619ca8cdde208be1b8da
Author: Ricardo Wurmus <address@hidden>
Date:   Mon Mar 19 20:53:27 2018 +0100

    gnu: bismark: Fix references to gunzip.
    
    * gnu/packages/bioinformatics.scm (bismark)[arguments]: Keep reference to
    gunzip executable.
    [inputs]: Add gzip.
---
 gnu/packages/bioinformatics.scm | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm
index a6dcc63..af994c6 100644
--- a/gnu/packages/bioinformatics.scm
+++ b/gnu/packages/bioinformatics.scm
@@ -11514,7 +11514,7 @@ Browser.")
          (delete 'configure)
          (delete 'build)
          (replace 'install
-           (lambda* (#:key outputs #:allow-other-keys)
+           (lambda* (#:key inputs outputs #:allow-other-keys)
              (let ((bin (string-append (assoc-ref outputs "out")
                                        "/bin"))
                    (docdir  (string-append (assoc-ref outputs "out")
@@ -11537,7 +11537,16 @@ Browser.")
                          scripts)
                (for-each (lambda (file) (install-file file docdir))
                          docs)
+               ;; Fix references to gunzip
+               (substitute* (map (lambda (file)
+                                   (string-append bin "/" file))
+                                 scripts)
+                 (("\"gunzip -c")
+                  (string-append "\"" (assoc-ref inputs "gzip")
+                                 "/bin/gunzip -c")))
                #t))))))
+    (inputs
+     `(("gzip" ,gzip)))
     (home-page "http://www.bioinformatics.babraham.ac.uk/projects/bismark/";)
     (synopsis "Map bisulfite treated sequence reads and analyze methylation")
     (description "Bismark is a program to map bisulfite treated sequencing