25/40: gnu: code: Add 'bash' input for 'wrap-program'.

[guix-commits]

apteryx pushed a commit to branch core-updates
in repository guix.

commit b0c64256ecb7c69f5163072f355cd2441bb0c7e0
Author: Maxime Devos <maximedevos@telenet.be>
AuthorDate: Fri Jul 2 12:06:54 2021 +0200

    gnu: code: Add 'bash' input for 'wrap-program'.
    
    It is required for cross-compilation.
    
    * gnu/packages/code.scm
    (cloc)[inputs]: Add 'bash-minimal'.
    (lcov)[inputs]: Likewise.
    
    Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
    Change-Id: I54a60b1b9c6322132faf6f05939b24f1441bc49c
---
 gnu/packages/code.scm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/gnu/packages/code.scm b/gnu/packages/code.scm
index 21a9f10a11..a3c8d2139b 100644
--- a/gnu/packages/code.scm
+++ b/gnu/packages/code.scm
@@ -340,7 +340,8 @@ COCOMO model or user-provided parameters.")
         (base32 "0j7qwc5n1y05jl3rq83mf1d0pavkz9z0waqi8dxblkgw4pwwnjyv"))))
     (build-system gnu-build-system)
     (inputs
-     (list coreutils
+     (list bash-minimal
+           coreutils
            perl
            perl-algorithm-diff
            perl-digest-md5
@@ -585,9 +586,8 @@ stack traces.")
            (lambda* (#:key outputs #:allow-other-keys)
              (let ((out (assoc-ref outputs "out")))
                (wrap-program (string-append out "/bin/geninfo")
-                 `("PERL5LIB" ":" prefix (,(getenv "PERL5LIB")))))
-             #t)))))
-    (inputs (list perl perl-io-compress perl-json))
+                 `("PERL5LIB" ":" prefix (,(getenv "PERL5LIB"))))))))))
+    (inputs (list bash-minimal perl perl-io-compress perl-json))
     (home-page "https://ltp.sourceforge.net/coverage/lcov.php";)
     (synopsis "Code coverage tool that enhances GNU gcov")
     (description "LCOV is an extension of @command{gcov}, a tool part of the