03/09: gnu: texlive-bin: Patch references to sed and awk.

[guix-commits]

rekado pushed a commit to branch version-1.4.0
in repository guix.

commit a6499572b3cc564c197bc86d36a23ed7034944b8
Author: Ricardo Wurmus <rekado@elephly.net>
AuthorDate: Tue Jan 4 15:22:31 2022 +0100

    gnu: texlive-bin: Patch references to sed and awk.
    
    * gnu/packages/tex.scm (texlive-bin)[arguments]: Patch texlive scripts in
    'post-install phase to satisfy references to sed and awk.
---
 gnu/packages/tex.scm | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index 7f1aedaa19..f75b61a59a 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -498,6 +498,14 @@ files from LOCATIONS with expected checksum HASH.  CODE is 
not currently in use.
                                   source "/texlive-scripts/source/")
                                  scripts)
 
+               ;; Patch them.
+               (let ((dirs (map dirname (list (which "sed") (which "awk")))))
+                 (with-directory-excursion scripts
+                   (substitute* '("mktexpk" "mktexmf" "mktexlsr")
+                     (("^version=" m)
+                      (format #false "PATH=\"~{~a:~}$PATH\"; export PATH~%~a"
+                              dirs m)))))
+
                ;; Make sure that fmtutil can find its Perl modules.
                (substitute* (string-append scripts "/fmtutil.pl")
                  (("\\$TEXMFROOT/")