diff --git a/distro/packages/util-linux.scm b/distro/packages/util-linux.scm index ad6b03b..bc91839 100644 --- a/distro/packages/util-linux.scm +++ b/distro/packages/util-linux.scm @@ -19,6 +19,7 @@ (define-module (distro packages util-linux) #:use-module (distro packages compression) #:use-module (distro packages ncurses) + #:use-module (distro packages perl) #:use-module (guix packages) #:use-module (guix download) #:use-module (guix build-system gnu)) @@ -37,9 +38,19 @@ (base32 "1rpgghf7n0zx0cdy8hibr41wvkm2qp1yvd8ab1rxr193l1jmgcir")))) (build-system gnu-build-system) - (arguments `(#:configure-flags '("--disable-use-tty-group"))) + (arguments + `(#:configure-flags '("--disable-use-tty-group") + #:phases (alist-cons-after + 'install 'patch-chkdupexe + (lambda* (#:key outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (substitute* (string-append out "/bin/chkdupexe") + ;; Allow `patch-shebang' to do its work. + (("@PERL@") "/bin/perl")))) + %standard-phases))) (inputs `(("zlib" ,zlib) - ("ncurses" ,ncurses))) + ("ncurses" ,ncurses) + ("perl" ,perl))) (home-page "https://www.kernel.org/pub/linux/utils/util-linux/") (synopsis "util-linux is a random collection of utilities for the Linux kernel")