[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: |
Mon, 29 May 2023 17:39:27 -0400 (EDT) |
ngz pushed a commit to branch tex-team-next
in repository guix.
commit aa33055eb45a2cd4b38624d1fa22a5dc7dcd8a57
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)
- 227/418: gnu: texlive-pict2e: Refresh package definition., (continued)
- 227/418: gnu: texlive-pict2e: Refresh package definition., guix-commits, 2023/05/29
- 219/418: gnu: texlive-titlesec: Refresh package definition., guix-commits, 2023/05/29
- 218/418: gnu: texlive-marvosym: Refresh package definition., guix-commits, 2023/05/29
- 230/418: gnu: texlive-csplain: Refresh package definition., guix-commits, 2023/05/29
- 234/418: gnu: texlive-bigfoot: Refresh package definition., guix-commits, 2023/05/29
- 258/418: gnu: texlive-bigintcalc: Refresh package definition., guix-commits, 2023/05/29
- 259/418: gnu: texlive-bitset: Refresh package definition., guix-commits, 2023/05/29
- 268/418: gnu: texlive-uniquecounter: Refresh package definition., guix-commits, 2023/05/29
- 270/418: gnu: texlive-pdfx: Refresh package definition., guix-commits, 2023/05/29
- 272/418: gnu: texlive-alphalph: Refresh package definition., guix-commits, 2023/05/29
- 274/418: gnu: texlive-mflogo: Refresh package definition.,
guix-commits <=
- 277/418: gnu: texlive-auxhook: Refresh package definition., guix-commits, 2023/05/29
- 278/418: gnu: texlive-epstopdf-pkg: Refresh package definition., guix-commits, 2023/05/29
- 282/418: gnu: texlive-hycolor: Refresh package definition., guix-commits, 2023/05/29
- 283/418: gnu: texlive-xcolor: Refresh package definition., guix-commits, 2023/05/29
- 291/418: gnu: texlive-stix2-otf: Refresh package definition., guix-commits, 2023/05/29
- 292/418: gnu: texlive-enumitem: Refresh package definition., guix-commits, 2023/05/29
- 294/418: gnu: texlive-zhspacing: Refresh package definition., guix-commits, 2023/05/29
- 295/418: gnu: texlive-zapfding: Refresh package definition., guix-commits, 2023/05/29
- 298/418: gnu: texlive-inconsolata: Refresh package definition., guix-commits, 2023/05/29
- 301/418: gnu: texlive-etoolbox: Refresh package definition., guix-commits, 2023/05/29