gnu: texlive-fonts-knuth-lib: Use invoke.

* gnu/packages/tex.scm (texlive-fonts-knuth-lib)[arguments]: Use invoke in the
custom build phase.
This commit is contained in:
Mark H Weaver 2018-03-23 04:05:40 -04:00
parent c4fc86e4f8
commit 849527e531
No known key found for this signature in database
GPG Key ID: 7CEF29847562C516
1 changed files with 7 additions and 7 deletions

View File

@ -628,13 +628,13 @@ display, and mathematical fonts in a range of styles, based on Monotype Modern
(string-append (getcwd) ":" (string-append (getcwd) ":"
mf "/share/texmf-dist/metafont/base"))) mf "/share/texmf-dist/metafont/base")))
(mkdir "build") (mkdir "build")
(zero? (system* "mf" "-progname=mf" (invoke "mf" "-progname=mf"
"-output-directory=build" "-output-directory=build"
(string-append "\\" (string-append "\\"
"mode:=ljfour; " "mode:=ljfour; "
"mag:=1; " "mag:=1; "
"batchmode; " "batchmode; "
"input manfnt"))))) "input manfnt"))))
(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"))