02/16: gnu: uwufetch: Add and use missing inputs.

[guix-commits]

civodul pushed a commit to branch master
in repository guix.

commit 7b11cfd19e9cae1b8308fae974307168c1766723
Author: Juliana Sims <juli@incana.org>
AuthorDate: Wed Aug 9 22:37:16 2023 -0400

    gnu: uwufetch: Add and use missing inputs.
    
    * gnu/packages/admin.scm (uwufetch) [inputs]: Add missing inputs.
    [phases]: Use the fully-qualified paths of the input gawk and grep.
    
    Signed-off-by: Ludovic Courtès <ludo@gnu.org>
---
 gnu/packages/admin.scm | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index 33f9b703a7..6b6b05c4a0 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -4025,6 +4025,11 @@ you are running, what theme or icon set you are using, 
etc.")
           (delete 'configure)
           (add-before 'build 'patch-source-paths
             (lambda _
+              (substitute* "fetch.c"
+                (("grep")
+                 #$(file-append grep "/bin/grep"))
+                (("awk")
+                 #$(file-append gawk "/bin/awk")))
               (substitute* "uwufetch.c"
                 (("(/usr(/local)?)(.*;)" all _ _ rest)
                  (string-append #$output rest)))))
@@ -4033,6 +4038,8 @@ you are running, what theme or icon set you are using, 
etc.")
             (lambda _
               (mkdir-p (string-append #$output "/include")))))))
     (inputs (list lshw
+                  gawk
+                  grep
                   ;; viu XXX not yet packaged in Guix
                   xwininfo))
     (home-page "https://github.com/TheDarkBug/uwufetch";)