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

gnu: texlive-fonts-knuth-lib: Build all tfm files. 

* gnu/packages/tex.scm (texlive-fonts-knuth-lib)[arguments]: Build all tfm
files in "build" phase.
This commit is contained in:
Ricardo Wurmus 2019-03-01 19:21:18 +01:00
parent 5e9bf5a2e0
commit 96f5377d5e
No known key found for this signature in database
GPG Key ID: 197A5888235FACAC
1 changed files with 11 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
gnu/packages/tex.scm
View File

@ -892,13 +892,17 @@ Computers & Typesetting series.")
(string-append (getcwd) ":" (string-append (getcwd) ":"
mf "/share/texmf-dist/metafont/base"))) mf "/share/texmf-dist/metafont/base")))
(mkdir "build") (mkdir "build")
(invoke "mf" "-progname=mf" (for-each (lambda (font)
"-output-directory=build" (format #t "building font ~a\n" font)
(string-append "\\" (invoke "mf" "-progname=mf"
"mode:=ljfour; " "-output-directory=build"
"mag:=1; " (string-append "\\"
"batchmode; " "mode:=ljfour; "
"input manfnt")))) "mag:=1; "
"batchmode; "
"input " font)))
(find-files "." "(manfnt|logo.+)\\.mf$"))
#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"))