gnu: texlive-fonts-ec: Use 'invoke'.
* gnu/packages/tex.scm (texlive-fonts-ec)[arguments]: Use 'invoke' in place of 'system*'.master
parent
ca816eb3ca
commit
6f2442a1fd
|
@ -2913,13 +2913,13 @@ in SGML; use maths minus in text as appropriate; simple Young tableaux.")
|
||||||
(mkdir "build")
|
(mkdir "build")
|
||||||
(every (lambda (font)
|
(every (lambda (font)
|
||||||
(format #t "building font ~a\n" font)
|
(format #t "building font ~a\n" font)
|
||||||
(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 " (basename font ".mf")))))
|
"input " (basename font ".mf"))))
|
||||||
(find-files "." "[0-9]+\\.mf$"))))
|
(find-files "." "[0-9]+\\.mf$"))))
|
||||||
(replace 'install
|
(replace 'install
|
||||||
(lambda* (#:key outputs #:allow-other-keys)
|
(lambda* (#:key outputs #:allow-other-keys)
|
||||||
|
|
Reference in New Issue