17/22: gnu: inxi-minimal: Reduce reliance on input names.

[guix-commits]

nckx pushed a commit to branch master
in repository guix.

commit bd268c21e531f0cc88f8920e0abcf1f33bf822b2
Author: Tobias Geerinckx-Rice <me@tobias.gr>
AuthorDate: Sun Dec 11 01:00:02 2022 +0100

    gnu: inxi-minimal: Reduce reliance on input names.
    
    * gnu/packages/admin.scm (inxi-minimal)[arguments]:
    Use SEARCH-INPUT-FILE.
---
 gnu/packages/admin.scm | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index 4f39aa3350..654fd55e17 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -4332,10 +4332,14 @@ Python loading in HPC environments.")
            (use-modules (guix build utils)
                         (ice-9 match)
                         (srfi srfi-26))
-           (setenv "PATH" (string-append
-                           (assoc-ref %build-inputs "bash") "/bin" ":"
-                           (assoc-ref %build-inputs "gzip") "/bin" ":"
-                           (assoc-ref %build-inputs "perl") "/bin" ":"))
+           (setenv "PATH" (string-join
+                           (map (lambda (file)
+                                  (dirname (search-input-file %build-inputs
+                                                              file)))
+                                (list "bin/bash"
+                                      "bin/gzip"
+                                      "bin/perl"))
+                           ":"))
            (copy-recursively (assoc-ref %build-inputs "source")
                              ,(string-append real-name "-" version))
            (with-directory-excursion ,(string-append real-name "-" version)