~ruther/guix-local: gnu: texlive-bin: Fix the tlmgr utility.

9e78ea79f81d9eec0fab9cbe204899e384973649 — Maxim Cournoyer 5 years ago ec14d5f

gnu: texlive-bin: Fix the tlmgr utility.

Previously, it would error out, not finding its Perl modules, and later not
finding config.guess.  This utility is useful to query the local TeX Live
package database (texlive.tlpdb).

(texlive-bin)[inputs]{config}: New input.
[phases]{postint}: Add a symlink to the 'config.guess' script.  Patch the
tlmgr.pl script so that it can find its Perl modules and other resources.

patch browse .tar.gz .zip

1 files changed, 11 insertions(+), 0 deletions(-)

M gnu/packages/tex.scm

M gnu/packages/tex.scm => gnu/packages/tex.scm +11 -0

@@ 279,6 279,7 @@ files from LOCATIONS with expected checksum HASH.  CODE is not currently in use.
     (build-system gnu-build-system)
     (inputs
      `(("texlive-extra-src" ,texlive-extra-src)
+       ("config" ,config)
        ("texlive-scripts"
         ,(origin
            (method svn-fetch)


@@ 452,6 453,16 @@ files from LOCATIONS with expected checksum HASH.  CODE is not currently in use.
                  (("\\$TEXMFROOT/")
                   (string-append share "/")))
 
+               ;; Likewise for the tlmgr.
+               (substitute* (string-append scripts "/tlmgr.pl")
+                 ((".*\\$::installerdir = \\$Master.*" all)
+                  (format #f "  $Master = ~s;~%~a" share all)))
+
+               ;; Install the config.guess script, required by tlmgr.
+               (with-directory-excursion share
+                 (mkdir-p "tlpkg/installer/")
+                 (symlink config.guess "tlpkg/installer/config.guess"))
+
                ;; texlua shebangs are not patched by the patch-source-shebangs
                ;; phase because the texlua executable does not exist at that
                ;; time.