Archived
1
0
Fork 0

gnu: Add texlive-xypic.

* gnu/packages/tex.scm (texlive-xypic): New variable.
(texlive-fonts-xypic, texlive-generic-xypic): Deprecate them.
This commit is contained in:
Ricardo Wurmus 2019-07-16 13:15:21 +02:00
parent 0901f1b042
commit 8bc9afeb9e
No known key found for this signature in database
GPG key ID: 197A5888235FACAC

View file

@ -7200,119 +7200,45 @@ titles.")
;; No version of the GPL is specified. ;; No version of the GPL is specified.
(license license:gpl3+))) (license license:gpl3+)))
(define-public texlive-generic-xypic (define-public texlive-xypic
(package (let ((template (simple-texlive-package
(name "texlive-generic-xypic") "texlive-xypic"
(version (number->string %texlive-revision)) (list "/doc/generic/xypic/"
(source "/dvips/xypic/xy389dict.pro"
(origin "/fonts/enc/dvips/xypic/"
(method svn-fetch) "/fonts/map/dvips/xypic/xypic.map"
(uri (svn-reference
(url (string-append "svn://www.tug.org/texlive/tags/" "/fonts/source/public/xypic/"
%texlive-tag "/Master/texmf-dist/" "/fonts/afm/public/xypic/"
"/tex/generic/xypic")) "/fonts/tfm/public/xypic/"
(revision %texlive-revision))) "/fonts/type1/public/xypic/"
(file-name (string-append name "-" version "-checkout"))
(sha256 ;;"/tex/generic/xypic/" ; I guess these are generated
(base32 )
"1g5cyxwdfznq4lk9zl6fkjkapmhmwd2cm4m5aibxj20qgwnaggfz")))) (base32
(build-system trivial-build-system) "0sqkkvjzzsiazvh8803qqyrcv4is3m1qs9x9v2m35jjikbqc08y8"))))
(arguments (package
`(#:modules ((guix build utils)) (inherit template)
#:builder (arguments
(begin (substitute-keyword-arguments (package-arguments template)
(use-modules (guix build utils)) ((#:tex-directory _ #t)
(let ((target (string-append (assoc-ref %outputs "out") "tex/generic/xypic")
"/share/texmf-dist/tex/generic/xypic"))) ((#:phases phases)
(mkdir-p target) `(modify-phases ,phases
(copy-recursively (assoc-ref %build-inputs "source") target) (delete 'reset-gzip-timestamps)))))
#t)))) (home-page "https://www.ctan.org/pkg/xypic")
(home-page "https://www.ctan.org/pkg/xypic") (synopsis "Flexible diagramming macros")
(synopsis "Flexible diagramming macros for TeX") (description "This is a package for typesetting a variety of graphs and
(description diagrams with TeX. Xy-pic works with most formats (including LaTeX,
"A package for typesetting a variety of graphs and diagrams with TeX. AMS-LaTeX, AMS-TeX, and plain TeX). The distribution includes Michael Barr's
Xy-pic works with most formats (including LaTeX, AMS-LaTeX, AMS-TeX, and plain @code{diag} package, which was previously distributed stand-alone.")
TeX).") (license license:gpl3+))))
(license license:gpl3+)))
(define-public texlive-fonts-xypic (define-public texlive-fonts-xypic
(package (deprecated-package "texlive-fonts-xypic" texlive-xypic))
(name "texlive-fonts-xypic")
(version (number->string %texlive-revision)) (define-public texlive-generic-xypic
(source (origin (deprecated-package "texblive-generic-xypic" texlive-xypic))
(method svn-fetch)
(uri (svn-reference
(url (string-append "svn://www.tug.org/texlive/tags/"
%texlive-tag "/Master/texmf-dist/"
"/fonts/source/public/xypic"))
(revision %texlive-revision)))
(file-name (string-append name "-" version "-checkout"))
(sha256
(base32
"0p20v1257kwsqnrk98cdhhiz2viv8l3ly4xay4by0an3j37m9xs3"))))
(build-system trivial-build-system)
(arguments
`(#:modules ((guix build utils)
(ice-9 match))
#:builder
(begin
(use-modules (guix build utils)
(ice-9 match))
(let ((root (string-append (assoc-ref %outputs "out")
"/share/texmf-dist/"))
(pkgs '(("source" . "fonts/source/public/xypic")
("xypic-afm" . "fonts/afm/public/xypic")
("xypic-type1" . "fonts/type1/public/xypic")
("xypic-enc" . "fonts/enc/dvips/xypic"))))
(for-each (match-lambda
((pkg . dir)
(let ((target (string-append root dir)))
(mkdir-p target)
(copy-recursively (assoc-ref %build-inputs pkg)
target))))
pkgs)
#t))))
(native-inputs
`(("xypic-afm"
,(origin
(method svn-fetch)
(uri (svn-reference
(url (string-append "svn://www.tug.org/texlive/tags/"
%texlive-tag "/Master/texmf-dist/"
"/fonts/afm/public/xypic"))
(revision %texlive-revision)))
(file-name (string-append name "-afm-" version "-checkout"))
(sha256
(base32
"149xdijxp8lw3s0qv2aqxxxyyn748z57dpr596rjvkqdffpnsddh"))))
("xypic-type1"
,(origin
(method svn-fetch)
(uri (svn-reference
(url (string-append "svn://www.tug.org/texlive/tags/"
%texlive-tag "/Master/texmf-dist/"
"/fonts/type1/public/xypic"))
(revision %texlive-revision)))
(file-name (string-append name "-type1-" version "-checkout"))
(sha256
(base32
"1bln89wib7g3hcv2jny3qi6jb73k9d2vbgx3wnnjwp3ryg0846if"))))
("xypic-enc"
,(origin
(method svn-fetch)
(uri (svn-reference
(url (string-append "svn://www.tug.org/texlive/tags/"
%texlive-tag "/Master/texmf-dist/"
"/fonts/enc/dvips/xypic"))
(revision %texlive-revision)))
(file-name (string-append name "-enc-" version "-checkout"))
(sha256
(base32
"0yi8vms3203l3p5slnhrrlzzp0f0jw77fkcvcaicrz2vmw9z99x7"))))))
(home-page "https://www.ctan.org/pkg/xypic")
(synopsis "Fonts for XY-pic")
(description "This package provides the XY-pic fonts.")
(license license:gpl3+)))
(define-public texlive-bibtex (define-public texlive-bibtex
(package (package