~ruther/guix-local

702f23b3b85cd8a6aa11d3ebe1ad032faca3954b — Ricardo Wurmus 8 years ago bb3b359
gnu: texlive-latex-base: Fix xetex and xelatex formats.

* gnu/packages/tex.scm (texlive-latex-base)[arguments]: Build xetex and
xelatex formats with matching interpreters.
1 files changed, 9 insertions(+), 6 deletions(-)

M gnu/packages/tex.scm
M gnu/packages/tex.scm => gnu/packages/tex.scm +9 -6
@@ 743,25 743,28 @@ book).")
                    ;; leading asterisk).  We should not use luatex here,
                    ;; because that would make the generated format files
                    ;; incompatible with any other TeX engine.

                    ;; FIXME: XeTeX fails to build because neither
                    ;; \XeTeXuseglyphmetrics nor \XeTeXdashbreakstate are
                    ;; defined.
                    (every
                     (lambda (format)
                       (zero? (system* "latex" "-ini" "-interaction=batchmode"
                                       "-output-directory=web2c"
                                       "-translate-file=cp227.tcx"
                                       (string-append "*" format ".ini"))))
                     '("latex" ;"xetex"
                     '("latex"
                       "pdflatex"
                       "pdfetex"))
                    (every
                     (lambda (format)
                       (zero? (system* format "-ini" "-interaction=batchmode"
                                       "-output-directory=web2c"
                                       (string-append "*" format ".ini"))))
                     '("xetex"
                       "xelatex"))
                    (every
                     (lambda (format)
                       (zero? (system* "luatex" "-ini" "-interaction=batchmode"
                                       "-output-directory=web2c"
                                       (string-append format ".ini"))))
                     '("dviluatex" "dvilualatex" "luatex" "lualatex" "xelatex")))))
                     '("dviluatex" "dvilualatex" "luatex" "lualatex")))))
           (replace 'install
             (lambda* (#:key outputs #:allow-other-keys)
               (let* ((out (assoc-ref outputs "out"))