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

gnu: texlive-latex-base: Use invoke. 

* gnu/packages/tex.scm (texlive-latex-base)[arguments]: Use invoke and remove
vestigial plumbing.
This commit is contained in:
Mark H Weaver 2018-03-23 04:10:00 -04:00
parent d8ac82c209
commit 4f2f53f939
No known key found for this signature in database
GPG Key ID: 7CEF29847562C516
1 changed files with 29 additions and 31 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
gnu/packages/tex.scm
View File

@ -949,7 +949,7 @@ book).")
(mkdir "build") (mkdir "build")
(mkdir "web2c") (mkdir "web2c")
(and (invoke "luatex" "-ini" "-interaction=batchmode" (invoke "luatex" "-ini" "-interaction=batchmode"
"-output-directory=build" "unpack.ins") "-output-directory=build" "unpack.ins")
(invoke "tex" "-ini" "-interaction=batchmode" (invoke "tex" "-ini" "-interaction=batchmode"
"-output-directory=web2c" "tex.ini") "-output-directory=web2c" "tex.ini")
@ -958,8 +958,7 @@ 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.
(every (for-each (lambda (format)
(lambda (format)
(invoke "latex" "-ini" "-interaction=batchmode" (invoke "latex" "-ini" "-interaction=batchmode"
"-output-directory=web2c" "-output-directory=web2c"
"-translate-file=cp227.tcx" "-translate-file=cp227.tcx"
@ -967,19 +966,18 @@ book).")
'("latex" '("latex"
"pdflatex" "pdflatex"
"pdfetex")) "pdfetex"))
(every (for-each (lambda (format)
(lambda (format)
(invoke format "-ini" "-interaction=batchmode" (invoke format "-ini" "-interaction=batchmode"
"-output-directory=web2c" "-output-directory=web2c"
(string-append "*" format ".ini"))) (string-append "*" format ".ini")))
'("xetex" '("xetex"
"xelatex")) "xelatex"))
(every (for-each (lambda (format)
(lambda (format)
(invoke "luatex" "-ini" "-interaction=batchmode" (invoke "luatex" "-ini" "-interaction=batchmode"
"-output-directory=web2c" "-output-directory=web2c"
(string-append format ".ini"))) (string-append format ".ini")))
'("dviluatex" "dvilualatex" "luatex" "lualatex"))))) '("dviluatex" "dvilualatex" "luatex" "lualatex"))
#t))
(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"))