1 files changed, 7 insertions(+), 11 deletions(-)

M gnu/packages/bioinformatics.scm

@@ 6467,8 6467,7 @@ and utility programs for sequence analysis.")
                        (substitute* "rchive.go"
                          ;; This go library does not have any license.
                          (("github.com/fiam/gounidecode/unidecode")
-                          "golang.org/rainycape/unidecode"))
-                       #t))))
+                          "golang.org/rainycape/unidecode"))))))
     (build-system perl-build-system)
     (arguments
      `(#:phases


@@ 6481,8 6480,7 @@ and utility programs for sequence analysis.")
              ;; Ignore errors about missing xtract.Linux and rchive.Linux.
               (substitute* "pm-refresh"
                 (("cat \\\"\\$target")
-                 "grep ^[[:digit:]] \"$target"))
-              #t))
+                 "grep ^[[:digit:]] \"$target"))))
          (replace 'install
            (lambda* (#:key inputs outputs #:allow-other-keys)
              (let ((bin (string-append (assoc-ref outputs "out") "/bin"))


@@ 6498,8 6496,7 @@ and utility programs for sequence analysis.")
                (symlink (string-append edirect-go "/bin/xtract.Linux")
                         (string-append bin "/xtract"))
                (symlink (string-append edirect-go "/bin/rchive.Linux")
-                        (string-append bin "/rchive")))
-             #t))
+                        (string-append bin "/rchive")))))
          (add-after 'install 'wrap-program
            (lambda* (#:key outputs #:allow-other-keys)
               ;; Make sure everything can run in a pure environment.


@@ 6516,16 6513,15 @@ and utility programs for sequence analysis.")
                                            ,(dirname (which "grep"))
                                            ,(dirname (which "perl"))
                                            ,(dirname (which "uname"))))))
-                  (find-files out ".")))
-              #t))
+                  (find-files out ".")))))
          (add-after 'wrap-program 'check
            (lambda* (#:key outputs #:allow-other-keys)
              (invoke (string-append (assoc-ref outputs "out")
                                     "/bin/edirect.pl")
-                     "-filter" "-help")
-             #t)))))
+                     "-filter" "-help"))))))
     (inputs
-     (list edirect-go-programs
+     (list bash-minimal
+           edirect-go-programs
            perl-html-parser
            perl-encode-locale
            perl-file-listing