06/73: gnu: texlive-luatex: Set proper default values for "texmfcnf.lua".

[guix-commits]

ngz pushed a commit to branch tex-team
in repository guix.

commit 0a56f48f3294e0eaa57490993b7f23fbcbd5f334
Author: Nicolas Goaziou <mail@nicolasgoaziou.fr>
AuthorDate: Tue May 28 18:48:42 2024 +0200

    gnu: texlive-luatex: Set proper default values for "texmfcnf.lua".
    
    * gnu/packages/tex.scm (texlive-luatex)[arguments]<#:phases>: Make TeX
    specific environment variables match those in "texmf.cnf".
    
    Change-Id: Idb80dbe849c1dcdeea234dbedba6d8f3668e2b3f
---
 gnu/packages/tex.scm | 13 +++++++++++--
 1 file changed, 11 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index 5062830b66..5e126e9528 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -48031,8 +48031,17 @@ in the same way as BSD/GNU @code{getopt_long(3)} 
functions do.")
     (outputs '("out" "doc"))
     (build-system texlive-build-system)
     (arguments
-     (list #:texlive-latex-bin? #f
-           #:create-formats #~(list "dviluatex" "luatex")))
+     (list
+      #:texlive-latex-bin? #f
+      #:create-formats #~(list "dviluatex" "luatex")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'customize-texmfcnf.lua
+            (lambda _
+              (substitute* "web2c/texmfcnf.lua"
+                (("TEXMFDIST *=.*") "TEXMFDIST = os.getenv(\"GUIX_TEXMF\"),\n")
+                (("TEXMF *=.*")
+                 "TEXMF = 
\"{$TEXMFCONFIG;$TEXMFVAR;$TEXMFHOME;$TEXMFLOCAL;$TEXMFDIST}\",\n")))))))
     (propagated-inputs
      (list texlive-cm
            texlive-etex