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

gnu: texlive-fonts-rsfs: Use 'invoke'. 

* gnu/packages/tex.scm (texlive-fonts-rsfs)[arguments]: Use 'invoke' in
place of 'system*'.
This commit is contained in:
Efraim Flashner 2018-03-14 21:00:29 +02:00
parent e26de9c928
commit d5fb4a3a9f
No known key found for this signature in database
GPG Key ID: 41AAE7DCCA3D8351
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
gnu/packages/tex.scm
View File

@ -2995,13 +2995,13 @@ texlive-2017.1/Master/texmf-dist/doc/fonts/ec/copyrite.txt"))))
(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)