aboutsummaryrefslogtreecommitdiff
path: root/gnu/packages
diff options
context:
space:
mode:
authorMark H Weaver <mhw@netris.org>2018-03-23 03:59:55 -0400
committerMark H Weaver <mhw@netris.org>2018-03-23 04:43:58 -0400
commit2762023aad7c1e3d032810302d4c96b7070ba4be (patch)
treebb8db124a15301bdc9e983213ef5af789c5431f7 /gnu/packages
parent24fe4b596d004bca179b2e55bc3071e5f8e7891f (diff)
downloadpatches-2762023aad7c1e3d032810302d4c96b7070ba4be.tar
patches-2762023aad7c1e3d032810302d4c96b7070ba4be.tar.gz
gnu: texlive-fonts-amsfonts: Use invoke.
* gnu/packages/tex.scm (texlive-fonts-amsfonts)[arguments]: Use invoke and remove vestigial plumbing in the custom build phase.
Diffstat (limited to 'gnu/packages')
-rw-r--r--gnu/packages/tex.scm27
1 files changed, 14 insertions, 13 deletions
diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index 9fcf31752d..c8a293b4de 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -773,19 +773,20 @@ symbol fonts.")
(assoc-ref inputs "texlive-fonts-cm")
"/share/texmf-dist/fonts/source/public/cm")))
(mkdir "build")
- (every (lambda (font)
- (format #t "building font ~a\n" (basename font ".mf"))
- (with-directory-excursion (dirname font)
- (zero? (system* "mf" "-progname=mf"
- "-output-directory=../build"
- (string-append "\\"
- "mode:=ljfour; "
- "mag:=1; "
- "nonstopmode; "
- "input "
- (getcwd) "/"
- (basename font ".mf"))))))
- (find-files "." "[0-9]+\\.mf$"))))
+ (for-each (lambda (font)
+ (format #t "building font ~a\n" (basename font ".mf"))
+ (with-directory-excursion (dirname font)
+ (invoke "mf" "-progname=mf"
+ "-output-directory=../build"
+ (string-append "\\"
+ "mode:=ljfour; "
+ "mag:=1; "
+ "nonstopmode; "
+ "input "
+ (getcwd) "/"
+ (basename font ".mf")))))
+ (find-files "." "[0-9]+\\.mf$"))
+ #t))
(replace 'install
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))