gnu: Remove artefacts from previous TeX Live packaging.

* guix/build-system/texlive.scm (%texlive-tag):
(%texlive-revision):
(texlive-origin):
(texlive-ref): Remove variables.

Change-Id: Ic9b2fed76fc1dd1ff02fc567c3d88a941927452b
This commit is contained in:
Nicolas Goaziou 2024-06-21 12:03:15 +02:00 committed by Ludovic Courtès
parent 5e9bf599ae
commit 9faca7c25b
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -30,13 +30,9 @@ (define-module (guix build-system texlive)
#:use-module (guix svn-download)
#:export (%texlive-build-system-modules
%texlive-repository
%texlive-revision
%texlive-tag
texlive-build
texlive-build-system
texlive-origin
texlive-packages-repository
texlive-ref))
texlive-packages-repository))
;; Commentary:
;;
@ -51,38 +47,6 @@ (define (texlive-packages-repository version)
(string-append
%texlive-repository "tags/texlive-" version "/Master/texmf-dist"))
;; These variables specify the SVN tag and the matching SVN revision. They
;; are taken from https://www.tug.org/svn/texlive/tags/
(define %texlive-tag "texlive-2023.0")
(define %texlive-revision 66594)
(define (texlive-origin name version locations hash)
"Return an <origin> object for a TeX Live package consisting of multiple
LOCATIONS with a provided HASH. Use NAME and VERSION to compute a prettier
name for the checkout directory."
(origin
(method svn-multi-fetch)
(uri (svn-multi-reference
(url (string-append "svn://www.tug.org/texlive/tags/"
%texlive-tag "/Master/texmf-dist/"))
(locations locations)
(revision %texlive-revision)))
(file-name (string-append name "-" version "-checkout"))
(sha256 hash)))
(define* (texlive-ref component #:optional id)
"Return a <svn-reference> object for the package ID, which is part of the
given Texlive COMPONENT. If ID is not provided, COMPONENT is used as the top
level package ID."
(svn-reference
(url (string-append "svn://www.tug.org/texlive/tags/"
%texlive-tag "/Master/texmf-dist/"
"source/" component
(if id
(string-append "/" id)
"")))
(revision %texlive-revision)))
(define %texlive-build-system-modules
;; Build-side modules imported by default.
`((guix build texlive-build-system)