[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
59/66: gnu: texlive-fonts-cm: Use invoke.
From: |
Mark H. Weaver |
Subject: |
59/66: gnu: texlive-fonts-cm: Use invoke. |
Date: |
Fri, 23 Mar 2018 04:46:48 -0400 (EDT) |
mhw pushed a commit to branch core-updates
in repository guix.
commit ff440d62dc67e6483c65aac470a8fe28bbd54917
Author: Mark H Weaver <address@hidden>
Date: Fri Mar 23 04:01:37 2018 -0400
gnu: texlive-fonts-cm: Use invoke.
* gnu/packages/tex.scm (texlive-fonts-cm)[arguments]: Use invoke and remove
vestigial plumbing.
---
gnu/packages/tex.scm | 23 ++++++++++++-----------
1 file changed, 12 insertions(+), 11 deletions(-)
diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index c8a293b..6d3ec93 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -558,17 +558,18 @@ documents.")
(string-append (getcwd) ":"
mf "/share/texmf-dist/metafont/base")))
(mkdir "build")
- (every (lambda (font)
- (format #t "building font ~a\n" font)
- (zero? (system* "mf" "-progname=mf"
- "-output-directory=build"
- (string-append "\\"
- "mode:=ljfour; "
- "mag:=1; "
- "batchmode; "
- "input "
- (basename font ".mf")))))
- (find-files "." "cm(.*[0-9]+.*|inch)\\.mf$"))))
+ (for-each (lambda (font)
+ (format #t "building font ~a\n" font)
+ (invoke "mf" "-progname=mf"
+ "-output-directory=build"
+ (string-append "\\"
+ "mode:=ljfour; "
+ "mag:=1; "
+ "batchmode; "
+ "input "
+ (basename font ".mf"))))
+ (find-files "." "cm(.*[0-9]+.*|inch)\\.mf$"))
+ #t))
(replace 'install
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
- 61/66: gnu: texlive-fonts-knuth-lib: Use invoke., (continued)
- 61/66: gnu: texlive-fonts-knuth-lib: Use invoke., Mark H. Weaver, 2018/03/23
- 60/66: gnu: texlive-fonts-ec: Remove vestigial error code plumbing., Mark H. Weaver, 2018/03/23
- 66/66: gnu: texmaker: Use invoke., Mark H. Weaver, 2018/03/23
- 48/66: gnu: nasm: Use invoke., Mark H. Weaver, 2018/03/23
- 58/66: gnu: texlive-fonts-amsfonts: Use invoke., Mark H. Weaver, 2018/03/23
- 63/66: gnu: texlive-fonts-rsfs: Remove vestigial error plumbing., Mark H. Weaver, 2018/03/23
- 64/66: gnu: texlive-latex-base: Use invoke., Mark H. Weaver, 2018/03/23
- 62/66: gnu: texlive-fonts-latex: Use invoke., Mark H. Weaver, 2018/03/23
- 34/66: gnu: libelf: Use invoke., Mark H. Weaver, 2018/03/23
- 57/66: gnu: texlive-bin: Use invoke., Mark H. Weaver, 2018/03/23
- 59/66: gnu: texlive-fonts-cm: Use invoke.,
Mark H. Weaver <=
- 65/66: gnu: texlive-metafont-base: Use invoke., Mark H. Weaver, 2018/03/23