diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm
index 5973f522a3..f62f83c221 100644
--- a/gnu/packages/bioinformatics.scm
+++ b/gnu/packages/bioinformatics.scm
@@ -6467,8 +6467,7 @@ (define-public edirect
                        (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 @@ (define-public edirect
              ;; 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 @@ (define-public edirect
                (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 @@ (define-public edirect
                                            ,(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