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

[guix-commits]

rekado pushed a commit to branch wip-texlive
in repository guix.

commit 0e851b7675a9fb6f4cc8c918d388b45d2bc13d74
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 43aefd57e6..a959ba1371 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/")