ngz pushed a commit to branch tex-team-next
in repository guix.
commit 0cbcfa0341956a7238f103b349e6716d14548f4b
Author: Nicolas Goaziou <[email protected]>
AuthorDate: Thu May 18 14:37:59 2023 +0200
gnu: simple-texlive-package: Remove it.
* gnu/packages/tex.scm (simple-texlive-package): Remove variable.
---
gnu/packages/tex.scm | 27 ---------------------------
1 file changed, 27 deletions(-)
diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index 9dd974bd18..a5114ea4aa 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -103,33 +103,6 @@
#:use-module (ice-9 match)
#:use-module ((srfi srfi-1) #:hide (zip)))
-(define* (simple-texlive-package name locations hash
- #:key trivial?)
- "Return a template for a simple TeX Live package with the given NAME,
-downloading from a list of LOCATIONS in the TeX Live repository, and expecting
-the provided output HASH. The TRIVIAL? keyword is not used."
- (set! locations
- ;; Some locations may be manually inserted, so be tolerant with
- ;; leading slashes. Ignore them consistently.
- (map (lambda (location)
- (if (string-prefix? "/" location)
- (string-drop location 1)
- location))
- locations))
- (define with-documentation?
- (any (lambda (l) (string-prefix? "doc/" l))
- locations))
- (package
- (name name)
- (version (number->string %texlive-revision))
- (source (texlive-origin name version locations hash))
- (outputs (if with-documentation? '("out" "doc") '("out")))
- (build-system texlive-build-system)
- (home-page #f)
- (synopsis #f)
- (description #f)
- (license #f)))
-
(define hyph-utf8-scripts
(origin
(method svn-fetch)
