[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
274/418: gnu: texlive-mflogo: Refresh package definition.
From: |
guix-commits |
Subject: |
274/418: gnu: texlive-mflogo: Refresh package definition. |
Date: |
Fri, 2 Jun 2023 17:25:34 -0400 (EDT) |
ngz pushed a commit to branch tex-team-next
in repository guix.
commit 0b3483352629ffd1615acd55bbec56c396d7f19a
Author: Nicolas Goaziou <mail@nicolasgoaziou.fr>
AuthorDate: Tue May 16 00:13:07 2023 +0200
gnu: texlive-mflogo: Refresh package definition.
* gnu/packages/tex.scm (texlive-mflogo): Remove SIMPLE-TEXLIVE-PACKAGE
call.
[arguments]<#:phases>: Build font metrics.
---
gnu/packages/tex.scm | 68 +++++++++++++++++++++++++++++++++++++++-------------
1 file changed, 52 insertions(+), 16 deletions(-)
diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index f950ef6bd4..35d9ccef9b 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -1594,24 +1594,60 @@ circle fonts (for use in the picture environment) and
LaTeX symbol fonts.")
(define-deprecated-package texlive-fonts-latex texlive-latex-fonts)
(define-public texlive-mflogo
- (let ((template (simple-texlive-package
- "texlive-mflogo"
- (list "/doc/latex/mflogo/"
- "/source/latex/mflogo/"
- "/fonts/source/public/mflogo/logosl8.mf")
- (base32
- "1vb4mg7fh4k54g7nqwiw3qm4iir8whpfnspis76l4sddzar1amh7"))))
- (package
- (inherit template)
- (native-inputs
- (list texlive-bin texlive-metafont texlive-knuth-lib))
- (home-page "http://www.ctan.org/pkg/mflogo")
- (synopsis "LaTeX support for Metafont logo fonts")
- (description
- "This package provides LaTeX and font definition files to access the
+ (package
+ (name "texlive-mflogo")
+ (version (number->string %texlive-revision))
+ (source (texlive-origin
+ name version
+ (list "doc/latex/mflogo/"
+ "fonts/source/public/mflogo/"
+ "fonts/tfm/public/mflogo/"
+ "source/latex/mflogo/"
+ "tex/latex/mflogo/")
+ (base32
+ "1r53qlrcqfwc0dfr7ji1nxnqrj6n0qrlg1rl7fjlw6ap3q9y434k")))
+ (outputs '("out" "doc"))
+ (build-system texlive-build-system)
+ (arguments
+ (list
+ #:phases
+ #~(modify-phases %standard-phases
+ (add-after 'build 'build-font-metrics
+ (lambda* (#:key inputs #:allow-other-keys)
+ (let ((root (assoc-ref inputs "source"))
+ (mf #$(this-package-native-input "texlive-metafont"))
+ (kl #$(this-package-native-input "texlive-knuth-lib")))
+ ;; Tell mf where to find mf.base.
+ (setenv "MFBASES"
+ (string-append mf "/share/texmf-dist/web2c"))
+ ;; Tell mf where to look for source files.
+ (setenv "MFINPUTS"
+ (string-append root ":"
+ mf "/share/texmf-dist/metafont/base:"
+ kl
"/share/texmf-dist/fonts/source/public/knuth-lib:"
+ root "/fonts/source/public/mflogo/"))
+ (for-each (lambda (font)
+ (format #t "building font ~a\n" font)
+ (invoke "mf" "-progname=mf"
+ "-output-directory=build"
+ (string-append "\\"
+ "mode:=ljfour; "
+ "mag:=1; "
+ "scrollmode; "
+ "input " (basename font))))
+ (find-files
+ (string-append root
+ "/fonts/source/public/mflogo/")
+ "\\.mf$"))))))))
+ (native-inputs
+ (list texlive-bin texlive-knuth-lib texlive-metafont))
+ (home-page "https://ctan.org/pkg/mflogo")
+ (synopsis "LaTeX support for Metafont logo fonts")
+ (description
+ "This package provides LaTeX and font definition files to access the
Knuthian mflogo fonts described in The Metafontbook and to typeset Metafont
logos in LaTeX documents.")
- (license license:lppl))))
+ (license license:lppl)))
(define-deprecated-package texlive-latex-mflogo texlive-mflogo)
- 237/418: gnu: texlive-pdftexcmds: Refresh package definition., (continued)
- 237/418: gnu: texlive-pdftexcmds: Refresh package definition., guix-commits, 2023/06/02
- 239/418: gnu: texlive-capt-of: Refresh package definition., guix-commits, 2023/06/02
- 244/418: gnu: texlive-fancyhdr: Refresh package definition., guix-commits, 2023/06/02
- 243/418: gnu: texlive-fontspec: Refresh package definition., guix-commits, 2023/06/02
- 252/418: gnu: texlive-lh: Refresh package definition., guix-commits, 2023/06/02
- 253/418: gnu: texlive-acronym: Refresh package definition., guix-commits, 2023/06/02
- 257/418: gnu: texlive-atbegshi: Refresh package definition., guix-commits, 2023/06/02
- 263/418: gnu: texlive-intcalc: Refresh package definition., guix-commits, 2023/06/02
- 266/418: gnu: texlive-ltxcmds: Refresh package definition., guix-commits, 2023/06/02
- 270/418: gnu: texlive-pdfx: Refresh package definition., guix-commits, 2023/06/02
- 274/418: gnu: texlive-mflogo: Refresh package definition.,
guix-commits <=
- 281/418: gnu: Add texlive-hopatch., guix-commits, 2023/06/02
- 285/418: gnu: texlive-oberdiek: Refresh package definition., guix-commits, 2023/06/02
- 284/418: gnu: texlive-hyperref: Refresh package definition., guix-commits, 2023/06/02
- 290/418: gnu: texlive-txfonts: Refresh package definition., guix-commits, 2023/06/02
- 291/418: gnu: texlive-stix2-otf: Refresh package definition., guix-commits, 2023/06/02
- 283/418: gnu: texlive-xcolor: Refresh package definition., guix-commits, 2023/06/02
- 294/418: gnu: texlive-zhspacing: Refresh package definition., guix-commits, 2023/06/02
- 295/418: gnu: texlive-zapfding: Refresh package definition., guix-commits, 2023/06/02
- 300/418: gnu: texlive-textcase: Refresh package definition., guix-commits, 2023/06/02
- 299/418: gnu: texlive-ae: Refresh package definition., guix-commits, 2023/06/02