gnu: Add texlive-fontinst.
* gnu/packages/tex.scm (texlive-fontinst): New variable. (texlive-tex-fontinst-base): Deprecate package.master
Ricardo Wurmus
parent
7a9b737a8b
commit
e9816fcbb4
|
|
@ -570,41 +570,98 @@ to adapt the plain e-TeX source file to work with XeTeX and LuaTeX.")
|
||||||
build fonts using the Metafont system.")
|
build fonts using the Metafont system.")
|
||||||
(license license:knuth)))
|
(license license:knuth)))
|
||||||
|
|
||||||
(define-public texlive-tex-fontinst-base
|
(define-public texlive-fontinst
|
||||||
(package
|
(let ((template (simple-texlive-package
|
||||||
(name "texlive-tex-fontinst-base")
|
"texlive-fontinst"
|
||||||
(version (number->string %texlive-revision))
|
(list "/doc/fonts/fontinst/"
|
||||||
(source (origin
|
"/doc/man/man1/fontinst.1"
|
||||||
(method svn-fetch)
|
"/doc/man/man1/fontinst.man1.pdf"
|
||||||
(uri (svn-reference
|
|
||||||
(url (string-append "svn://www.tug.org/texlive/tags/"
|
;; This is used to build parts of
|
||||||
%texlive-tag "/Master/texmf-dist/"
|
;; /tex/fontinst/{base,misc}/ and
|
||||||
"/tex/fontinst/base"))
|
;; /tex/latex/fontinst/fontdoc.sty.
|
||||||
(revision %texlive-revision)))
|
"/source/fontinst/base/"
|
||||||
(file-name (string-append name "-" version "-checkout"))
|
|
||||||
(sha256
|
;; These are not generated.
|
||||||
(base32
|
"/tex/fontinst/base/bbox.sty"
|
||||||
"12gnb8hc45p47pqn31msvi4mpr3wxbbbf2k4xhmshjqykwzlx508"))))
|
"/tex/fontinst/base/multislot.sty"
|
||||||
(build-system trivial-build-system)
|
"/tex/fontinst/misc/glyphbox.mtx"
|
||||||
(arguments
|
"/tex/fontinst/misc/glyphoff.mtx"
|
||||||
`(#:modules ((guix build utils))
|
"/tex/fontinst/misc/glyphon.mtx"
|
||||||
#:builder
|
"/tex/fontinst/misc/kernoff.mtx"
|
||||||
(begin
|
"/tex/fontinst/misc/kernon.mtx"
|
||||||
(use-modules (guix build utils))
|
|
||||||
(let ((target (string-append (assoc-ref %outputs "out")
|
"/tex/fontinst/latinetx/"
|
||||||
"/share/texmf-dist/tex/fontinst/base")))
|
"/tex/fontinst/latinmtx/"
|
||||||
(mkdir-p target)
|
"/tex/fontinst/mathmtx/"
|
||||||
(copy-recursively (assoc-ref %build-inputs "source") target)
|
"/tex/fontinst/smblmtx/"
|
||||||
#t))))
|
|
||||||
(home-page "https://www.ctan.org/pkg/fontinst")
|
"/scripts/texlive/fontinst.sh")
|
||||||
(synopsis "Tools for converting and installing fonts for TeX and LaTeX")
|
(base32
|
||||||
(description "This package provides TeX macros for converting Adobe Font
|
"09drlb0krhnizw92xlm5wxzzpgn3shcxd684xlg0zc5p16l47w6h")
|
||||||
|
#:trivial? #t)))
|
||||||
|
(package
|
||||||
|
(inherit template)
|
||||||
|
(arguments
|
||||||
|
(substitute-keyword-arguments (package-arguments template)
|
||||||
|
((#:modules _ '())
|
||||||
|
'((guix build gnu-build-system)
|
||||||
|
(guix build utils)
|
||||||
|
(ice-9 match)))
|
||||||
|
((#:phases phases)
|
||||||
|
`(modify-phases ,phases
|
||||||
|
(replace 'build
|
||||||
|
(lambda* (#:key inputs #:allow-other-keys)
|
||||||
|
(setenv "TEXINPUTS"
|
||||||
|
(string-append (getcwd) "//:"
|
||||||
|
(getcwd) "/source/fontinst/base//:"
|
||||||
|
(assoc-ref inputs "texlive-docstrip") "//"))
|
||||||
|
(mkdir "build")
|
||||||
|
(invoke "tex" "-ini" "-interaction=scrollmode"
|
||||||
|
"-output-directory=build"
|
||||||
|
"fontinst.ins")))
|
||||||
|
;; Since we're using docstrip without LaTeX we can't set \UseTDS
|
||||||
|
;; or \BaseDirectory, so the generated files are just dumped in
|
||||||
|
;; the "build" directory.
|
||||||
|
(add-after 'install 'install-generated-files
|
||||||
|
(lambda* (#:key outputs #:allow-other-keys)
|
||||||
|
(let* ((out (assoc-ref outputs "out"))
|
||||||
|
(root (string-append out "/share/texmf-dist")))
|
||||||
|
(for-each (match-lambda
|
||||||
|
((dir files ...)
|
||||||
|
(for-each (lambda (file)
|
||||||
|
(install-file
|
||||||
|
(string-append "build/" file)
|
||||||
|
(string-append root dir)))
|
||||||
|
files)))
|
||||||
|
'(("/tex/fontinst/base"
|
||||||
|
"fontinst.sty"
|
||||||
|
"cfntinst.sty"
|
||||||
|
"xfntinst.sty"
|
||||||
|
"finstmsc.sty"
|
||||||
|
"fontinst.ini")
|
||||||
|
("/tex/fontinst/misc"
|
||||||
|
"csc2x.tex"
|
||||||
|
"csckrn2x.tex"
|
||||||
|
"osf2x.tex")
|
||||||
|
("/tex/latex/fontinst"
|
||||||
|
"fontdoc.sty")))
|
||||||
|
#t)))))))
|
||||||
|
(native-inputs
|
||||||
|
`(("texlive-bin" ,texlive-bin)
|
||||||
|
("texlive-docstrip" ,texlive-docstrip)))
|
||||||
|
(home-page "https://www.ctan.org/pkg/fontinst")
|
||||||
|
(synopsis "Tools for converting and installing fonts for TeX and LaTeX")
|
||||||
|
(description "This package provides TeX macros for converting Adobe Font
|
||||||
Metric files to TeX metric and virtual font format. Fontinst helps mainly
|
Metric files to TeX metric and virtual font format. Fontinst helps mainly
|
||||||
with the number crunching and shovelling parts of font installation. This
|
with the number crunching and shovelling parts of font installation. This
|
||||||
means in practice that it creates a number of files which give the TeX
|
means in practice that it creates a number of files which give the TeX
|
||||||
metrics (and related information) for a font family that TeX needs to do any
|
metrics (and related information) for a font family that TeX needs to do any
|
||||||
typesetting in these fonts.")
|
typesetting in these fonts.")
|
||||||
(license license:lppl1.1+)))
|
(license license:lppl1.1+))))
|
||||||
|
|
||||||
|
(define-public texlive-tex-fontinst-base
|
||||||
|
(deprecated-package "texlive-tex-fontinst-base" texlive-fontinst))
|
||||||
|
|
||||||
(define-public texlive-fontname
|
(define-public texlive-fontname
|
||||||
(package
|
(package
|
||||||
|
|
|
||||||
Reference in New Issue