gnu: texlive-fonts-knuth-lib: Use invoke.
* gnu/packages/tex.scm (texlive-fonts-knuth-lib)[arguments]: Use invoke in the custom build phase.master
parent
c4fc86e4f8
commit
849527e531
|
@ -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"))
|
||||||
|
|
Reference in New Issue