nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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.
This commit is contained in:
Ricardo Wurmus 2017-07-09 11:29:17 +02:00
parent bb3b35975c
commit 702f23b3b8
No known key found for this signature in database
GPG Key ID: 197A5888235FACAC
1 changed files with 9 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
gnu/packages/tex.scm
View File

@ -743,25 +743,28 @@ book).")
;; leading asterisk). We should not use luatex here, ;; leading asterisk). We should not use luatex here,
;; because that would make the generated format files ;; because that would make the generated format files
;; incompatible with any other TeX engine. ;; incompatible with any other TeX engine.
;; FIXME: XeTeX fails to build because neither
;; \XeTeXuseglyphmetrics nor \XeTeXdashbreakstate are
;; defined.
(every (every
(lambda (format) (lambda (format)
(zero? (system* "latex" "-ini" "-interaction=batchmode" (zero? (system* "latex" "-ini" "-interaction=batchmode"
"-output-directory=web2c" "-output-directory=web2c"
"-translate-file=cp227.tcx" "-translate-file=cp227.tcx"
(string-append "*" format ".ini")))) (string-append "*" format ".ini"))))
'("latex" ;"xetex" '("latex"
"pdflatex" "pdflatex"
"pdfetex")) "pdfetex"))
(every
(lambda (format)
(zero? (system* format "-ini" "-interaction=batchmode"
"-output-directory=web2c"
(string-append "*" format ".ini"))))
'("xetex"
"xelatex"))
(every (every
(lambda (format) (lambda (format)
(zero? (system* "luatex" "-ini" "-interaction=batchmode" (zero? (system* "luatex" "-ini" "-interaction=batchmode"
"-output-directory=web2c" "-output-directory=web2c"
(string-append format ".ini")))) (string-append format ".ini"))))
'("dviluatex" "dvilualatex" "luatex" "lualatex" "xelatex"))))) '("dviluatex" "dvilualatex" "luatex" "lualatex")))))
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))