HCoop / jackhill / guix / guix.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
gnu: Poppler: Update to 0.86.1.
[jackhill/guix/guix.git] / gnu / packages / tex.scm
CommitLineData
eb0119ef 1;;; GNU Guix --- Functional package management for GNU
4a6635f3 2;;; Copyright © 2013, 2014, 2015, 2016 Andreas Enge <andreas@enge.fr>
42e1394b 3;;; Copyright © 2014 Eric Bavier <bavier@member.fsf.org>
d2e84281 4;;; Copyright © 2015 Mark H Weaver <mhw@netris.org>
4791876c 5;;; Copyright © 2016 Roel Janssen <roel@gnu.org>
e5a03489 6;;; Copyright © 2016, 2018, 2019 Efraim Flashner <efraim@flashner.co.il>
2d634d9b 7;;; Copyright © 2016 Federico Beffa <beffa@fbengineering.ch>
bd917486 8;;; Copyright © 2016 Thomas Danckaert <post@thomasdanckaert.be>
d68c8017 9;;; Copyright © 2016, 2017, 2018, 2019 Ricardo Wurmus <rekado@elephly.net>
149f6688 10;;; Copyright © 2017 Leo Famulari <leo@famulari.name>
85892948 11;;; Copyright © 2017, 2020 Marius Bakke <mbakke@fastmail.com>
585be42f 12;;; Copyright © 2017, 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr>
ec40a050 13;;; Copyright © 2018 Danny Milosavljevic <dannym+a@scratchpost.org>
a9fda571 14;;; Copyright © 2018 Arun Isaac <arunisaac@systemreboot.net>
eb0119ef
AE		 15;;;
16;;; This file is part of GNU Guix.
17;;;
18;;; GNU Guix is free software; you can redistribute it and/or modify it
19;;; under the terms of the GNU General Public License as published by
20;;; the Free Software Foundation; either version 3 of the License, or (at
21;;; your option) any later version.
22;;;
23;;; GNU Guix is distributed in the hope that it will be useful, but
24;;; WITHOUT ANY WARRANTY; without even the implied warranty of
25;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
26;;; GNU General Public License for more details.
27;;;
28;;; You should have received a copy of the GNU General Public License
29;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
30
8f9ac901 31(define-module (gnu packages tex)
b5b73a82 32 #:use-module ((guix licenses) #:prefix license:)
eb0119ef
AE		 33 #:use-module (guix packages)
34 #:use-module (guix download)
ec40a050 35 #:use-module (guix build-system cmake)
eb0119ef 36 #:use-module (guix build-system gnu)
ebcf74da 37 #:use-module (guix build-system perl)
0aa34e82 38 #:use-module (guix build-system trivial)
205794c8 39 #:use-module (guix build-system texlive)
6b5eb840 40 #:use-module (guix utils)
83457fe0 41 #:use-module (guix git-download)
9d913b25 42 #:use-module (guix svn-download)
eb0119ef 43 #:use-module (gnu packages)
ec40a050 44 #:use-module (gnu packages algebra)
83457fe0 45 #:use-module (gnu packages autotools)
0aa34e82 46 #:use-module (gnu packages bash)
ec40a050 47 #:use-module (gnu packages boost)
eb0119ef 48 #:use-module (gnu packages compression)
a86177d6 49 #:use-module (gnu packages fontutils)
fd89b36b 50 #:use-module (gnu packages gd)
eb0119ef 51 #:use-module (gnu packages ghostscript)
769bb5e5 52 #:use-module (gnu packages graphviz)
fd89b36b 53 #:use-module (gnu packages gtk)
eb0119ef 54 #:use-module (gnu packages icu4c)
e55354b8 55 #:use-module (gnu packages image)
ec40a050 56 #:use-module (gnu packages libreoffice)
0aa34e82 57 #:use-module (gnu packages lua)
0256c746 58 #:use-module (gnu packages multiprecision)
eb0119ef
AE		 59 #:use-module (gnu packages pdf)
60 #:use-module (gnu packages perl)
5ccde207 61 #:use-module (gnu packages perl-check)
eb0119ef
AE		 62 #:use-module (gnu packages pkg-config)
63 #:use-module (gnu packages python)
5327e912 64 #:use-module (gnu packages python-xyz)
4791876c 65 #:use-module (gnu packages qt)
b32c8549 66 #:use-module (gnu packages ruby)
b7194849 67 #:use-module (gnu packages shells)
ce0614dd 68 #:use-module (gnu packages base)
c87d8a14 69 #:use-module (gnu packages gawk)
d4000680
RW		 70 #:use-module (gnu packages web)
71 #:use-module (gnu packages xml)
c0589f75 72 #:use-module (gnu packages xorg)
ece9b417 73 #:use-module (gnu packages xdisorg)
6a7c4636 74 #:use-module (gnu packages texinfo)
6b5eb840 75 #:use-module (ice-9 ftw)
cb7bc20a 76 #:use-module (ice-9 match)
e93f472d 77 #:use-module ((srfi srfi-1) #:hide (zip)))
eb0119ef 78
8ab600f8
RW		 79(define* (simple-texlive-package name locations hash
80 #:key trivial?)
81 "Return a template for a simple TeX Live package with the given NAME,
82downloading from a list of LOCATIONS in the TeX Live repository, and expecting
83the provided output HASH. If TRIVIAL? is provided, all files will simply be
84copied to their outputs; otherwise the TEXLIVE-BUILD-SYSTEM is used."
85 (define with-documentation?
86 (and trivial?
87 (any (lambda (location)
88 (string-prefix? "/doc" location))
89 locations)))
90 (package
91 (name name)
92 (version (number->string %texlive-revision))
93 (source (texlive-origin name version
94 locations hash))
95 (outputs (if with-documentation?
96 '("out" "doc")
97 '("out")))
98 (build-system (if trivial?
99 gnu-build-system
100 texlive-build-system))
101 (arguments
102 (let ((copy-files
103 `(lambda* (#:key outputs inputs #:allow-other-keys)
104 (let (,@(if with-documentation?
105 `((doc (string-append (assoc-ref outputs "doc")
106 "/share/texmf-dist/")))
107 '())
108 (out (string-append (assoc-ref outputs "out")
109 "/share/texmf-dist/")))
110 ,@(if with-documentation?
111 '((mkdir-p doc)
112 (copy-recursively
113 (string-append (assoc-ref inputs "source") "/doc")
114 (string-append doc "/doc")))
115 '())
116 (mkdir-p out)
117 (copy-recursively (assoc-ref inputs "source") out)
118 ,@(if with-documentation?
119 '((delete-file-recursively (string-append out "/doc")))
120 '())
121 #t))))
122 (if trivial?
123 `(#:tests? #f
124 #:phases
125 (modify-phases %standard-phases
126 (delete 'configure)
127 (replace 'build (const #t))
128 (replace 'install ,copy-files)))
129 `(#:phases
130 (modify-phases %standard-phases
131 (add-after 'install 'copy-files ,copy-files))))))
132 (home-page #f)
133 (synopsis #f)
134 (description #f)
135 (license #f)))
136
28e521e9
RW		 137(define hyph-utf8-scripts
138 (origin
139 (method svn-fetch)
140 (uri (texlive-ref "generic" "hyph-utf8"))
141 (file-name (string-append "hyph-utf8-scripts-"
142 (number->string %texlive-revision)
143 "-checkout"))
144 (sha256
145 (base32
85892948 146 "0lk7shx768sxvgr85y8bnmmnj8x4bbkgpxrz3z8jp8avi33prw83"))))
28e521e9 147
cf4c07b9 148(define (texlive-hyphen-package name code locations hash)
85892948
MB		 149 "Return a TeX Live hyphenation package with the given NAME, using source
150files from LOCATIONS with expected checksum HASH. CODE is not currently in use."
cf4c07b9
RW		 151 (let ((parent (simple-texlive-package
152 name locations hash #:trivial? #t)))
153 (package
154 (inherit parent)
155 (arguments
156 (substitute-keyword-arguments (package-arguments parent)
cf4c07b9
RW		 157 ((#:phases phases)
158 `(modify-phases ,phases
159 (replace 'build
160 (lambda* (#:key inputs outputs #:allow-other-keys)
161 (let* ((out (assoc-ref outputs "out"))
162 (root (string-append out "/share/texmf-dist"))
163 (patterns
164 (string-append root "/tex/generic/hyph-utf8/patterns/txt/"))
165 (loaders
166 (string-append root "/tex/generic/hyph-utf8/loadhyph"))
167 (ptex
168 (string-append root "/tex/generic/hyph-utf8/patterns/ptex"))
85892948
MB		 169 (quote
170 (string-append root "/tex/generic/hyph-utf8/patterns/quote")))
cf4c07b9
RW		 171 (mkdir "scripts")
172 (copy-recursively
173 (assoc-ref inputs "hyph-utf8-scripts") "scripts")
174
175 ;; Prepare target directories
176 (mkdir-p patterns)
177 (mkdir-p loaders)
178 (mkdir-p ptex)
85892948 179 (mkdir-p quote)
cf4c07b9
RW		 180
181 ;; Generate plain patterns
182 (with-directory-excursion "scripts"
85892948
MB		 183 (substitute* "lib/tex/hyphen/path.rb"
184 (("^([[:blank:]]+)TeXROOT = .*" _ indent)
185 (string-append indent "TeXROOT = \""
186 (getcwd) "/..\"\n")))
187
cf4c07b9
RW		 188 (substitute* "generate-plain-patterns.rb"
189 ;; Ruby 2 does not need this.
190 (("require 'unicode'") "")
cf4c07b9 191 ;; Write directly to the output directory
85892948
MB		 192 (("File\\.join\\(PATH::TXT")
193 (string-append "File.join(\"" patterns "\""))
194 (("File\\.join\\(PATH::QUOTE")
195 (string-append "File.join(\"" quote "\"")))
cf4c07b9
RW		 196 (invoke "ruby" "generate-plain-patterns.rb")
197
198 ;; Build pattern loaders
199 (substitute* "generate-pattern-loaders.rb"
85892948
MB		 200 (("File\\.join\\(PATH::LOADER")
201 (string-append "File.join(\"" loaders "\"")))
202
cf4c07b9
RW		 203 (invoke "ruby" "generate-pattern-loaders.rb")
204
205 ;; Build ptex patterns
206 (substitute* "generate-ptex-patterns.rb"
85892948
MB		 207 (("File\\.join\\(PATH::PTEX")
208 (string-append "File.join(\"" ptex "\"")))
cf4c07b9
RW		 209 (invoke "ruby" "generate-ptex-patterns.rb")))))))))
210 (native-inputs
211 `(("ruby" ,ruby)
85892948 212 ("ruby-hydra" ,ruby-hydra)
cf4c07b9
RW		 213 ("hyph-utf8-scripts" ,hyph-utf8-scripts)))
214 (home-page "https://ctan.org/pkg/hyph-utf8"))))
215
eb0119ef
AE		 216(define texlive-extra-src
217 (origin
218 (method url-fetch)
1f2ef813 219 (uri "ftp://tug.org/historic/systems/texlive/2019/texlive-20190410-extra.tar.xz")
eb0119ef 220 (sha256 (base32
1f2ef813 221 "13ncf2an4nlqv18lki6y2p6pcsgs1i54zqkhfwprax5j53bk70j8"))))
eb0119ef
AE		 222
223(define texlive-texmf-src
224 (origin
225 (method url-fetch)
85892948 226 (uri "ftp://tug.org/historic/systems/texlive/2019/texlive-20190410-texmf.tar.xz")
eb0119ef 227 (sha256 (base32
85892948 228 "00n4qh9fj8v9zzy3y488hpfq1g3dnnh72y4yjsaikfcqpi59gv62"))))
eb0119ef 229
3abe72bd 230(define-public texlive-bin
eb0119ef 231 (package
0aa34e82 232 (name "texlive-bin")
1f2ef813 233 (version "20190410")
0aa34e82
AE		 234 (source
235 (origin
3e1ebaab 236 (method url-fetch)
1f2ef813 237 (uri (string-append "ftp://tug.org/historic/systems/texlive/2019/"
149f6688 238 "texlive-" version "-source.tar.xz"))
3e1ebaab
RW		 239 (sha256
240 (base32
1f2ef813 241 "1dfps39q6bdr1zsbp9p74mvalmy3bycihv19sb9c6kg30kprz8nj"))
594156ec 242 (patches
0fa50555
MB		 243 (let ((arch-patch
244 (lambda (name revision hash)
245 (origin
246 (method url-fetch)
247 (uri (string-append "https://git.archlinux.org/svntogit/packages.git"
248 "/plain/trunk/" name "?h=packages/texlive-bin"
249 "&id=" revision))
250 (file-name (string-append "texlive-bin-" name))
251 (sha256 (base32 hash)))))
1f2ef813
MB		 252 (arch-revision "49d7fe25e5ea63f136ebc20270c1d8fc9b00041c"))
253 (list
254 (arch-patch "pdftex-poppler0.76.patch" arch-revision
255 "03vc88dz37mjjyaspzv0fik2fp5gp8qv82114869akd1dhszbaax")
256 (search-patch "texlive-bin-poppler-0.83.patch")
257 (arch-patch "texlive-poppler-0.84.patch" arch-revision
928fc7c5
MB		 258 "1ia6cr99krk4ipx4hdi2qdb98bh2h26mckjlpxdzrjnfhlnghksa"))))
259 (modules '((guix build utils)
260 (ice-9 ftw)))
261 (snippet
262 '(begin
263 (with-directory-excursion "libs"
264 (let ((preserved-directories '("." ".." "lua53" "luajit")))
265 ;; Delete bundled software, except Lua which cannot easily be
266 ;; used as an external dependency.
267 (for-each delete-file-recursively
268 (scandir "."
269 (lambda (file)
270 (and (not (member file preserved-directories))
271 (eq? 'directory (stat:type (stat file)))))))))
272 ;; TODO: Unbundle stuff in texk/dvisvgm/dvisvgm-src/libs too.
273 #t))))
eb0119ef 274 (build-system gnu-build-system)
0aa34e82
AE		 275 (inputs
276 `(("texlive-extra-src" ,texlive-extra-src)
dfdc002c
RW		 277 ("texlive-scripts"
278 ,(origin
279 (method svn-fetch)
280 (uri (svn-reference
281 (url (string-append "svn://www.tug.org/texlive/tags/"
282 %texlive-tag "/Master/texmf-dist/"
283 "/scripts/texlive"))
284 (revision %texlive-revision)))
285 (file-name (string-append "texlive-scripts-"
286 (number->string %texlive-revision)
287 "-checkout"))
288 (sha256
289 (base32
1f2ef813 290 "1cj04svl8bpfwjr4gqfcc04rmklz3aggrxvgj7q5bxrh7c7g18xh"))))
0aa34e82
AE		 291 ("cairo" ,cairo)
292 ("fontconfig" ,fontconfig)
293 ("fontforge" ,fontforge)
294 ("freetype" ,freetype)
295 ("gd" ,gd)
0256c746 296 ("gmp" ,gmp)
0aa34e82
AE		 297 ("ghostscript" ,ghostscript)
298 ("graphite2" ,graphite2)
299 ("harfbuzz" ,harfbuzz)
300 ("icu4c" ,icu4c)
301 ("libpaper" ,libpaper)
302 ("libpng" ,libpng)
303 ("libxaw" ,libxaw)
304 ("libxt" ,libxt)
0256c746 305 ("mpfr" ,mpfr)
0aa34e82
AE		 306 ("perl" ,perl)
307 ("pixman" ,pixman)
308 ("poppler" ,poppler)
309 ("potrace" ,potrace)
310 ("python" ,python-2) ; incompatible with Python 3 (print syntax)
311 ("ruby" ,ruby)
312 ("tcsh" ,tcsh)
313 ("teckit" ,teckit)
314 ("zlib" ,zlib)
315 ("zziplib" ,zziplib)))
c4c4cc05 316 (native-inputs
e9a6d225 317 `(("pkg-config" ,pkg-config)))
eb0119ef
AE		 318 (arguments
319 `(#:out-of-source? #t
320 #:configure-flags
46fd8303
MB		 321 '("--disable-static"
322 "--disable-native-texlive-build"
fd89b36b 323 "--with-system-cairo"
eb0119ef 324 "--with-system-freetype2"
fd89b36b 325 "--with-system-gd"
0256c746 326 "--with-system-gmp"
be2c88ca 327 "--with-system-graphite2"
c70cf7eb 328 "--with-system-harfbuzz"
eb0119ef
AE		 329 "--with-system-icu"
330 "--with-system-libgs"
609578a7 331 "--with-system-libpaper"
eb0119ef 332 "--with-system-libpng"
0256c746 333 "--with-system-mpfr"
fd89b36b 334 "--with-system-pixman"
eb0119ef 335 "--with-system-poppler"
75916982 336 "--with-system-potrace"
eb0119ef
AE		 337 "--with-system-teckit"
338 "--with-system-xpdf"
339 "--with-system-zlib"
340 "--with-system-zziplib")
2f4640e3 341
7683bf11
EB		 342 ;; Disable tests on mips64/aarch64 to cope with a failure of luajiterr.test.
343 ;; XXX FIXME fix luajit properly on mips64 and aarch64.
344 #:tests? ,(let ((s (or (%current-target-system)
345 (%current-system))))
346 (not (or (string-prefix? "aarch64" s)
347 (string-prefix? "mips64" s))))
eb0119ef 348 #:phases
3e1ebaab 349 (modify-phases %standard-phases
f1728d43 350 (add-after 'unpack 'configure-ghostscript-executable
3e1ebaab
RW		 351 ;; ps2eps.pl uses the "gswin32c" ghostscript executable on Windows,
352 ;; and the "gs" ghostscript executable on Unix. It detects Unix by
353 ;; checking for the existence of the /usr/bin directory. Since
59e80445 354 ;; Guix System does not have /usr/bin, it is also detected as Windows.
f1728d43 355 (lambda* (#:key inputs #:allow-other-keys)
3e1ebaab
RW		 356 (substitute* "utils/ps2eps/ps2eps-src/bin/ps2eps.pl"
357 (("gswin32c") "gs"))
f1728d43
RW		 358 (substitute* "texk/texlive/linked_scripts/epstopdf/epstopdf.pl"
359 (("\"gs\"")
360 (string-append "\"" (assoc-ref inputs "ghostscript") "/bin/gs\"")))
361 #t))
362 (add-after 'unpack 'use-code-for-new-poppler
363 (lambda _
1a753d56 364 (copy-file "texk/web2c/pdftexdir/pdftoepdf-poppler0.76.0.cc"
f1728d43 365 "texk/web2c/pdftexdir/pdftoepdf.cc")
1a753d56 366 (copy-file "texk/web2c/pdftexdir/pdftosrc-poppler0.76.0.cc"
f1728d43 367 "texk/web2c/pdftexdir/pdftosrc.cc")
3e1ebaab 368 #t))
1f2ef813 369 (add-after 'unpack 'patch-dvisvgm-build-files
9df39750 370 (lambda _
1f2ef813
MB		 371 ;; XXX: Ghostscript is detected, but HAVE_LIBGS is never set, so
372 ;; the appropriate linker flags are not added.
373 (substitute* "texk/dvisvgm/configure"
374 (("^have_libgs=yes" all)
375 (string-append all "\nHAVE_LIBGS=1")))
9df39750 376 #t))
be200ef3
MB		 377 (add-after 'unpack 'disable-failing-test
378 (lambda _
379 ;; FIXME: This test fails on 32-bit architectures since Glibc 2.28:
380 ;; <https://bugzilla.redhat.com/show_bug.cgi?id=1631847>.
381 (substitute* "texk/web2c/omegafonts/check.test"
21f7d88e 382 (("^\\./omfonts -ofm2opl \\$srcdir/tests/check tests/xcheck \\|\\| exit 1")
be200ef3
MB		 383 "./omfonts -ofm2opl $srcdir/tests/check tests/xcheck || exit 77"))
384 #t))
3e1ebaab
RW		 385 (add-after 'install 'postint
386 (lambda* (#:key inputs outputs #:allow-other-keys #:rest args)
387 (let* ((out (assoc-ref outputs "out"))
388 (share (string-append out "/share"))
389 (texlive-extra (assoc-ref inputs "texlive-extra-src"))
390 (unpack (assoc-ref %standard-phases 'unpack))
391 (patch-source-shebangs
392 (assoc-ref %standard-phases 'patch-source-shebangs)))
1574932d
RW		 393 (substitute* (string-append share "/texmf-dist/web2c/texmf.cnf")
394 ;; Don't truncate lines.
395 (("^error_line = .*$") "error_line = 254\n")
396 (("^half_error_line = .*$") "half_error_line = 238\n")
397 (("^max_print_line = .*$") "max_print_line = 1000\n"))
3e1ebaab
RW		 398 ;; Create symbolic links for the latex variants and their
399 ;; man pages.
400 (with-directory-excursion (string-append out "/bin/")
401 (for-each symlink
402 '("pdftex" "pdftex" "xetex" "luatex")
403 '("latex" "pdflatex" "xelatex" "lualatex")))
404 (with-directory-excursion (string-append share "/man/man1/")
405 (symlink "luatex.1" "lualatex.1"))
406 ;; Unpack texlive-extra and install tlpkg.
407 (mkdir "texlive-extra")
408 (with-directory-excursion "texlive-extra"
409 (apply unpack (list #:source texlive-extra))
410 (apply patch-source-shebangs (list #:source texlive-extra))
411 (invoke "mv" "tlpkg" share))
dfdc002c
RW		 412 (let ((scripts (string-append share "/texmf-dist/scripts/texlive/")))
413 (mkdir-p scripts)
414 (copy-recursively (assoc-ref inputs "texlive-scripts") scripts)
415 ;; Make sure that fmtutil can find its Perl modules.
416 (substitute* (string-append scripts "fmtutil.pl")
417 (("\\$TEXMFROOT/") (string-append share "/"))))
418
3e1ebaab
RW		 419 ;; texlua shebangs are not patched by the patch-source-shebangs
420 ;; phase because the texlua executable does not exist at that
421 ;; time.
422 (setenv "PATH" (string-append (getenv "PATH") ":" out "/bin"))
423 (with-directory-excursion out
424 (patch-source-shebangs))))))))
a1b4d62c
RW		 425 (native-search-paths
426 (list (search-path-specification
427 (variable "TEXMF")
428 (files '("share/texmf-dist"))
429 (separator #f))
430 (search-path-specification
431 (variable "TEXMFCNF")
432 (files '("share/texmf-dist/web2c"))
433 (separator #f))))
0aa34e82
AE		 434 (synopsis "TeX Live, a package of the TeX typesetting system")
435 (description
436 "TeX Live provides a comprehensive TeX document production system.
437It includes all the major TeX-related programs, macro packages, and fonts
438that are free software, including support for many languages around the
439world.
440
441This package contains the binaries.")
132e14b4
EF		 442 (license (license:fsf-free "https://www.tug.org/texlive/copying.html"))
443 (home-page "https://www.tug.org/texlive/")))
0aa34e82 444
2cece695 445\f
7a9b737a 446(define texlive-docstrip
9d913b25 447 (package
7a9b737a
RW		 448 (inherit (simple-texlive-package
449 "texlive-docstrip"
450 (list "/tex/latex/base/docstrip.tex")
451 (base32
85892948 452 "1f9sx1lp7v34zwm186msf03q2h28rrg0lh65z59zc0cvqffs6dvb")
7a9b737a
RW		 453 #:trivial? #t))
454 (home-page "https://www.ctan.org/texlive")
455 (synopsis "Utility to strip documentation from TeX files.")
456 (description "This package provides the docstrip utility to strip
457documentation from TeX files. It is part of the LaTeX base.")
458 (license license:lppl1.3+)))
9d913b25 459
2cece695 460(define-public texlive-unicode-data
99952c53 461 (package
2cece695
RW		 462 (inherit (simple-texlive-package
463 "texlive-unicode-data"
464 (list "/tex/generic/unicode-data/"
465 "/doc/generic/unicode-data/")
466 (base32
85892948 467 "0zy4v9y667cka5fi4dnc6x500907812y7pcaf63s5qxi8l7khxxy")
2cece695 468 #:trivial? #t))
b8d8806b 469 (home-page "https://www.ctan.org/pkg/unicode-data")
99952c53
RW		 470 (synopsis "Unicode data and loaders for TeX")
471 (description "This bundle provides generic access to Unicode Consortium
472data for TeX use. It contains a set of text files provided by the Unicode
473Consortium which are currently all from Unicode 8.0.0, with the exception of
474@code{MathClass.txt} which is not currently part of the Unicode Character
475Database. Accompanying these source data are generic TeX loader files
476allowing this data to be used as part of TeX runs, in particular in building
477format files. Currently there are two loader files: one for general character
478set up and one for initializing XeTeX character classes as has been carried
479out to date by @code{unicode-letters.tex}. ")
480 (license license:lppl1.3c+)))
481
2cece695
RW		 482(define-public texlive-generic-unicode-data
483 (deprecated-package "texlive-generic-unicode-data" texlive-unicode-data))
484
92b4a48c
RW		 485(define-public texlive-hyphen-base
486 (package
487 (inherit (simple-texlive-package
488 "texlive-hyphen-base"
489 (list "/tex/generic/config/language.dat"
490 "/tex/generic/config/language.dat.lua"
491 "/tex/generic/config/language.def"
492 "/tex/generic/config/language.us"
493 "/tex/generic/config/language.us.def"
494 "/tex/generic/config/language.us.lua"
495 "/tex/generic/hyphen/dumyhyph.tex"
496 "/tex/generic/hyphen/hyphen.tex"
497 "/tex/generic/hyphen/hypht1.tex"
498 "/tex/generic/hyphen/zerohyph.tex")
499 (base32
85892948 500 "0f19nml4hdx9lh7accqdk1b9ismwfm2523l5zsc4kb4arysgcakz")
92b4a48c
RW		 501 #:trivial? #t))
502 (home-page "https://tug.org/texlive/")
503 (synopsis "Core hyphenation support files")
504 (description "This package includes Knuth's original @file{hyphen.tex},
505@file{zerohyph.tex} to disable hyphenation, @file{language.us} which starts
506the autogenerated files @file{language.dat} and @file{language.def} (and
507default versions of those), etc.")
508 (license license:knuth)))
509
9d913b25 510(define-public texlive-dvips
9e99b1b4 511 (package
659fda6c
RW		 512 (inherit (simple-texlive-package
513 "texlive-dvips"
b93d9dac
RW		 514 (list "/doc/man/man1/afm2tfm.1"
515 "/doc/man/man1/dvips.1"
516 "/dvips/base/"
517 "/dvips/config/"
659fda6c 518 "/fonts/enc/dvips/base/"
b93d9dac 519 "/tex/generic/dvips/")
659fda6c 520 (base32
b93d9dac 521 "1qr7h0ahycmz5wmpv54glfss9jqdmmyymj6kim626d1c8v9bmg86")
659fda6c 522 #:trivial? #t))
b8d8806b 523 (home-page "https://www.ctan.org/pkg/dvips")
9d913b25
RW		 524 (synopsis "DVI to PostScript drivers")
525 (description "This package provides files needed for converting DVI files
526to PostScript.")
b93d9dac 527 (license license:lppl)))
9e99b1b4 528
b8df0d1b 529(define-public texlive-tex-ini-files
453aae66 530 (package
b8df0d1b
RW		 531 (inherit (simple-texlive-package
532 "texlive-tex-ini-files"
533 (list "/tex/generic/tex-ini-files/")
534 (base32
535 "0q1g62jg0qiqslm93ycvm30bw8ydmssjdshzsnzl7n2vpd62qfi2")
536 #:trivial? #t))
b8d8806b 537 (home-page "https://www.ctan.org/pkg/tex-ini-files")
453aae66
RW		 538 (synopsis "Files for creating TeX formats")
539 (description "This bundle provides a collection of model \".ini\" files
540for creating TeX formats. These files are commonly used to introduced
541distribution-dependent variations in formats. They are also used to
542allow existing format source files to be used with newer engines, for example
543to adapt the plain e-TeX source file to work with XeTeX and LuaTeX.")
544 (license license:public-domain)))
545
b8df0d1b
RW		 546(define-public texlive-generic-tex-ini-files
547 (deprecated-package "texlive-generic-tex-ini-files" texlive-tex-ini-files))
9b134da8 548
8ada0f0b
RW		 549(define-public texlive-metafont-base
550 (package
551 (name "texlive-metafont-base")
552 (version (number->string %texlive-revision))
553 (source (origin
554 (method svn-fetch)
555 (uri (svn-reference
556 (url (string-append "svn://www.tug.org/texlive/tags/"
557 %texlive-tag "/Master/texmf-dist/"
558 "/metafont"))
559 (revision %texlive-revision)))
1dec413a 560 (file-name (string-append name "-" version "-checkout"))
8ada0f0b
RW		 561 (sha256
562 (base32
563 "1yl4n8cn5xqk2nc22zgzq6ymd7bhm6xx1mz3azip7i3ki4bhb5q5"))))
564 (build-system gnu-build-system)
565 (arguments
566 `(#:tests? #f ; no test target
567 #:phases
568 (modify-phases %standard-phases
569 (delete 'configure)
570 (replace 'build
571 (lambda* (#:key inputs #:allow-other-keys)
572 (let ((cwd (getcwd)))
573 (setenv "MFINPUTS"
574 (string-append cwd "/base:"
575 cwd "/misc:"
576 cwd "/roex:"
577 cwd "/feynmf:"
578 cwd "/mfpic:"
579 cwd "/config")))
580 (mkdir "build")
581 (with-directory-excursion "build"
3730a107 582 (invoke "inimf" "mf.mf"))))
8ada0f0b
RW		 583 (replace 'install
584 (lambda* (#:key outputs #:allow-other-keys)
585 (let* ((out (assoc-ref outputs "out"))
586 (base (string-append out "/share/texmf-dist/web2c"))
587 (mf (string-append out "/share/texmf-dist/metafont/base")))
588 (mkdir-p base)
589 (mkdir-p mf)
590 (install-file "build/mf.base" base)
591 (copy-recursively "base" mf)
592 #t))))))
593 (native-inputs
594 `(("texlive-bin" ,texlive-bin)))
b8d8806b 595 (home-page "https://www.ctan.org/pkg/metafont")
8ada0f0b
RW		 596 (synopsis "Metafont base files")
597 (description "This package provides the Metafont base files needed to
598build fonts using the Metafont system.")
599 (license license:knuth)))
600
e9816fcb
RW		 601(define-public texlive-fontinst
602 (let ((template (simple-texlive-package
603 "texlive-fontinst"
604 (list "/doc/fonts/fontinst/"
605 "/doc/man/man1/fontinst.1"
606 "/doc/man/man1/fontinst.man1.pdf"
607
608 ;; This is used to build parts of
609 ;; /tex/fontinst/{base,misc}/ and
610 ;; /tex/latex/fontinst/fontdoc.sty.
611 "/source/fontinst/base/"
612
613 ;; These are not generated.
614 "/tex/fontinst/base/bbox.sty"
615 "/tex/fontinst/base/multislot.sty"
616 "/tex/fontinst/misc/glyphbox.mtx"
617 "/tex/fontinst/misc/glyphoff.mtx"
618 "/tex/fontinst/misc/glyphon.mtx"
619 "/tex/fontinst/misc/kernoff.mtx"
620 "/tex/fontinst/misc/kernon.mtx"
621
622 "/tex/fontinst/latinetx/"
623 "/tex/fontinst/latinmtx/"
624 "/tex/fontinst/mathmtx/"
625 "/tex/fontinst/smblmtx/"
626
627 "/scripts/texlive/fontinst.sh")
628 (base32
85892948 629 "0lprwib7n2ygfxvrw675vhif7ghyip2x6k70kqs9syp8lqxiizf8")
e9816fcb
RW		 630 #:trivial? #t)))
631 (package
632 (inherit template)
633 (arguments
634 (substitute-keyword-arguments (package-arguments template)
635 ((#:modules _ '())
636 '((guix build gnu-build-system)
637 (guix build utils)
638 (ice-9 match)))
639 ((#:phases phases)
640 `(modify-phases ,phases
641 (replace 'build
642 (lambda* (#:key inputs #:allow-other-keys)
643 (setenv "TEXINPUTS"
644 (string-append (getcwd) "//:"
645 (getcwd) "/source/fontinst/base//:"
646 (assoc-ref inputs "texlive-docstrip") "//"))
647 (mkdir "build")
648 (invoke "tex" "-ini" "-interaction=scrollmode"
649 "-output-directory=build"
650 "fontinst.ins")))
651 ;; Since we're using docstrip without LaTeX we can't set \UseTDS
652 ;; or \BaseDirectory, so the generated files are just dumped in
653 ;; the "build" directory.
654 (add-after 'install 'install-generated-files
655 (lambda* (#:key outputs #:allow-other-keys)
656 (let* ((out (assoc-ref outputs "out"))
657 (root (string-append out "/share/texmf-dist")))
658 (for-each (match-lambda
659 ((dir files ...)
660 (for-each (lambda (file)
661 (install-file
662 (string-append "build/" file)
663 (string-append root dir)))
664 files)))
665 '(("/tex/fontinst/base"
666 "fontinst.sty"
667 "cfntinst.sty"
668 "xfntinst.sty"
669 "finstmsc.sty"
670 "fontinst.ini")
671 ("/tex/fontinst/misc"
672 "csc2x.tex"
673 "csckrn2x.tex"
674 "osf2x.tex")
675 ("/tex/latex/fontinst"
676 "fontdoc.sty")))
677 #t)))))))
678 (native-inputs
679 `(("texlive-bin" ,texlive-bin)
680 ("texlive-docstrip" ,texlive-docstrip)))
681 (home-page "https://www.ctan.org/pkg/fontinst")
682 (synopsis "Tools for converting and installing fonts for TeX and LaTeX")
683 (description "This package provides TeX macros for converting Adobe Font
513fff4c
RW		 684Metric files to TeX metric and virtual font format. Fontinst helps mainly
685with the number crunching and shovelling parts of font installation. This
686means in practice that it creates a number of files which give the TeX
687metrics (and related information) for a font family that TeX needs to do any
688typesetting in these fonts.")
e9816fcb
RW		 689 (license license:lppl1.1+))))
690
691(define-public texlive-tex-fontinst-base
692 (deprecated-package "texlive-tex-fontinst-base" texlive-fontinst))
513fff4c 693
dea67d8a
RW		 694(define-public texlive-fontname
695 (package
14a87760
RW		 696 (inherit (simple-texlive-package
697 "texlive-fontname"
698 (list "/doc/fonts/fontname/fontname.texi"
699 "/fonts/map/fontname/")
700 (base32
701 "0h5im5rnhycrrkd6z10f17m2caa8lv594wf482b68qjmnxfrqnxj")
702 #:trivial? #t))
dea67d8a
RW		 703 (home-page "https://www.ctan.org/pkg/fontname")
704 (synopsis "Scheme for naming fonts in TeX")
705 (description "This is Fontname, a naming scheme for (the base part of)
706external TeX font filenames. This makes at most eight-character names
707from (almost) arbitrarily complex font names, thus helping portability of TeX
708documents.")
709 (license license:public-domain)))
710
b7d779db
RW		 711(define-public texlive-cm
712 (let ((template (simple-texlive-package
713 "texlive-cm"
714 (list "/fonts/source/public/cm/"
715 "/fonts/map/dvips/cm/cmtext-bsr-interpolated.map"
716 "/doc/fonts/cm/")
717 (base32
85892948 718 "09mvl94qrwlb9b4pkigi151l256v3djhwl4m5lgvk6yhn5y75zrp")
b7d779db
RW		 719 #:trivial? #t)))
720 (package
721 (inherit template)
722 (arguments
723 (substitute-keyword-arguments (package-arguments template)
724 ((#:modules modules '())
725 '((guix build gnu-build-system)
726 (guix build utils)
727 (srfi srfi-26)))
728 ((#:phases phases)
729 `(modify-phases ,phases
730 (replace 'build
731 (lambda* (#:key inputs #:allow-other-keys)
732 (let ((mf (assoc-ref inputs "texlive-metafont-base")))
733 ;; Tell mf where to find mf.base
734 (setenv "MFBASES" (string-append mf "/share/texmf-dist/web2c"))
735 ;; Tell mf where to look for source files
736 (setenv "MFINPUTS"
737 (string-append (getcwd) "/fonts/source/public/cm/:"
738 mf "/share/texmf-dist/metafont/base")))
739 (for-each make-file-writable
740 (cons "fonts/source/public/cm/"
741 (find-files "fonts/source/public/cm/" ".*")))
742 (let ((build (string-append (getcwd) "/build"))
743 (pkdir (string-append (getcwd) "/pk/ljfour/public/cm/dpi600")))
744 (mkdir-p pkdir)
745 (mkdir-p build)
746 (with-directory-excursion "fonts/source/public/cm/"
747 (for-each (lambda (font)
748 (format #t "building font ~a\n" font)
749 (invoke "mf" "-progname=mf"
750 (string-append "-output-directory=" build)
751 (string-append "\\"
752 "mode:=ljfour; "
753 "mag:=1+0/600; "
754 "scrollmode; "
755 "input "
756 (basename font ".mf")))
757 (invoke "gftopk"
758 (string-append build "/"
759 (basename font ".mf") ".600gf")
760 (string-append pkdir "/"
761 (basename font ".mf") ".pk")))
762 (find-files "." "cm(.*[0-9]+.*|inch)\\.mf$"))))
763 #t))
764 (add-after 'install 'install-generated-fonts
765 (lambda* (#:key inputs outputs #:allow-other-keys)
766 (let* ((out (assoc-ref outputs "out"))
767 (fonts (string-append out "/share/texmf-dist/fonts/"))
768 (pk (string-append fonts "pk"))
769 (tfm (string-append fonts "tfm/public/cm")))
770 (for-each (cut install-file <> tfm)
771 (find-files "build" "\\.*"))
772 (copy-recursively "pk" pk)
773 #t)))))))
774 (native-inputs
775 `(("texlive-bin" ,texlive-bin)
776 ("texlive-metafont-base" ,texlive-metafont-base)))
777 (home-page "https://www.ctan.org/pkg/cm")
778 (synopsis "Computer Modern fonts for TeX")
779 (description "This package provides the Computer Modern fonts by Donald
3c4f1ec7
RW		 780Knuth. The Computer Modern font family is a large collection of text,
781display, and mathematical fonts in a range of styles, based on Monotype Modern
7828A.")
b7d779db
RW		 783 (license license:knuth))))
784
3c4f1ec7 785(define-public texlive-fonts-cm
b7d779db 786 (deprecated-package "texlive-fonts-cm" texlive-cm))
3c4f1ec7 787
cdc96092
RW		 788(define-public texlive-cm-super
789 (let ((template (simple-texlive-package
790 "texlive-cm-super"
791 (list "/doc/fonts/cm-super/"
792 "/dvips/cm-super/"
793 "/fonts/afm/public/cm-super/"
794 "/fonts/enc/dvips/cm-super/"
795 "/fonts/map/dvips/cm-super/"
796 "/fonts/map/vtex/cm-super/"
797 "/fonts/type1/public/cm-super/"
798 "/tex/latex/cm-super/")
799 (base32
800 "1k3afl0x0bqbr5mnawbnp7rr2126dwn0vwnxzibm9ggvzqilnkm6")
801 #:trivial? #t)))
802 (package
803 (inherit template)
804 (arguments
805 (substitute-keyword-arguments (package-arguments template)
806 ((#:phases phases)
807 `(modify-phases ,phases
808 (delete 'reset-gzip-timestamps)))))
809 (home-page "https://www.ctan.org/pkg/cm-super")
810 (synopsis "Computer Modern Super family of fonts")
811 (description "The CM-Super family provides Adobe Type 1 fonts that replace
4e9242aa
RW		 812the T1/TS1-encoded Computer Modern (EC/TC), T1/TS1-encoded Concrete,
813T1/TS1-encoded CM bright and LH Cyrillic fonts (thus supporting all European
814languages except Greek), and bringing many ameliorations in typesetting
815quality. The fonts exhibit the same metrics as the METAFONT-encoded
816originals.")
cdc96092
RW		 817 ;; With font exception
818 (license license:gpl2+))))
4e9242aa 819
cdc96092
RW		 820(define-public texlive-fonts-cm-super
821 (deprecated-package "texlive-fonts-cm-super" texlive-cm-super))
4e9242aa 822
114a5d85 823(define-public texlive-lm
c2a1fe4a 824 (package
114a5d85
RW		 825 (inherit (simple-texlive-package
826 "texlive-lm"
827 (list "/doc/fonts/lm/"
828 "/fonts/afm/public/lm/"
829 "/fonts/enc/dvips/lm/"
830 "/fonts/map/dvipdfm/lm/"
831 "/fonts/map/dvips/lm/"
832 "/fonts/opentype/public/lm/"
833 "/fonts/tfm/public/lm/"
834 "/fonts/type1/public/lm/"
835 "/tex/latex/lm/")
836 (base32
837 "0i1hwr8rp0jqyvs4qyplrirscd4w7lsgwsncyv3yzy80bsa56jq5")
838 #:trivial? #t))
c2a1fe4a
RW		 839 (home-page "http://www.gust.org.pl/projects/e-foundry/latin-modern/")
840 (synopsis "Latin Modern family of fonts")
841 (description "The Latin Modern fonts are derived from the famous Computer
842Modern fonts designed by Donald E. Knuth and described in Volume E of his
843Computers & Typesetting series.")
844 ;; The GUST font license (GFL) is legally identical to the LaTeX Project
845 ;; Public License (LPPL), version 1.3c or later, but comes with an
846 ;; additional but not legally binding clause.
847 (license license:lppl1.3c+)))
848
114a5d85
RW		 849(define-public texlive-fonts-lm
850 (deprecated-package "texlive-fonts-lm" texlive-lm))
851
5ebba61a
RW		 852(define-public texlive-fonts-knuth-lib
853 (package
854 (name "texlive-fonts-knuth-lib")
855 (version (number->string %texlive-revision))
856 (source (origin
857 (method svn-fetch)
858 (uri (svn-reference
859 (url (string-append "svn://www.tug.org/texlive/tags/"
860 %texlive-tag "/Master/texmf-dist/"
861 "/fonts/source/public/knuth-lib"))
862 (revision %texlive-revision)))
6b286e42 863 (file-name (string-append name "-" version "-checkout"))
5ebba61a
RW		 864 (sha256
865 (base32
866 "0in9aqyi8jkyf9d16z0li50z5fpwj1iwgwm83gmvwqcf7chfs04y"))))
867 (build-system gnu-build-system)
868 (arguments
869 `(#:modules ((guix build gnu-build-system)
870 (guix build utils)
871 (srfi srfi-26))
872 #:tests? #f ; no tests
873 #:phases
874 (modify-phases %standard-phases
875 (delete 'configure)
876 (replace 'build
877 (lambda* (#:key inputs #:allow-other-keys)
878 (let ((mf (assoc-ref inputs "texlive-metafont-base")))
879 ;; Tell mf where to find mf.base
880 (setenv "MFBASES"
881 (string-append mf "/share/texmf-dist/web2c"))
882 ;; Tell mf where to look for source files
883 (setenv "MFINPUTS"
884 (string-append (getcwd) ":"
885 mf "/share/texmf-dist/metafont/base")))
886 (mkdir "build")
96f5377d
RW		 887 (for-each (lambda (font)
888 (format #t "building font ~a\n" font)
889 (invoke "mf" "-progname=mf"
890 "-output-directory=build"
891 (string-append "\\"
892 "mode:=ljfour; "
893 "mag:=1; "
894 "batchmode; "
895 "input " font)))
896 (find-files "." "(manfnt|logo.+)\\.mf$"))
897 #t))
5ebba61a
RW		 898 (replace 'install
899 (lambda* (#:key outputs #:allow-other-keys)
900 (let* ((out (assoc-ref outputs "out"))
901 (tfm (string-append
902 out "/share/texmf-dist/fonts/tfm/public/knuth-lib"))
903 (mf (string-append
904 out "/share/texmf-dist/fonts/source/public/knuth-lib")))
905 (for-each (cut install-file <> tfm)
906 (find-files "build" "\\.*"))
907 (for-each (cut install-file <> mf)
908 (find-files "." "\\.mf"))
909 #t))))))
910 (native-inputs
911 `(("texlive-bin" ,texlive-bin)
912 ("texlive-metafont-base" ,texlive-metafont-base)))
913 (home-page "https://www.ctan.org/pkg/knuth-lib")
914 (synopsis "Small library of METAFONT sources")
915 (description "This is a collection of core TeX and METAFONT macro files
916from Donald Knuth, including the plain format, plain base, and the MF logo
917fonts.")
918 (license license:knuth)))
919
a00d5933
RW		 920(define-public texlive-fonts-latex
921 (package
922 (name "texlive-fonts-latex")
923 (version (number->string %texlive-revision))
924 (source (origin
925 (method svn-fetch)
926 (uri (svn-reference
927 (url (string-append "svn://www.tug.org/texlive/tags/"
928 %texlive-tag "/Master/texmf-dist/"
929 "/fonts/source/public/latex-fonts"))
930 (revision %texlive-revision)))
a4550e7d 931 (file-name (string-append name "-" version "-checkout"))
a00d5933
RW		 932 (sha256
933 (base32
934 "0ypsm4xv9cw0jckk2qc7gi9hcmhf31mrg56pz3llyx3yd9vq2lps"))))
935 (build-system gnu-build-system)
936 (arguments
937 `(#:modules ((guix build gnu-build-system)
938 (guix build utils)
939 (srfi srfi-1)
940 (srfi srfi-26))
941 #:tests? #f ; no tests
942 #:phases
943 (modify-phases %standard-phases
944 (delete 'configure)
945 (replace 'build
946 (lambda* (#:key inputs #:allow-other-keys)
947 (let ((mf (assoc-ref inputs "texlive-metafont-base")))
948 ;; Tell mf where to find mf.base
949 (setenv "MFBASES" (string-append mf "/share/texmf-dist/web2c"))
950 ;; Tell mf where to look for source files
951 (setenv "MFINPUTS"
952 (string-append (getcwd) ":"
953 mf "/share/texmf-dist/metafont/base:"
a6405e03 954 (assoc-ref inputs "texlive-cm")
a00d5933
RW		 955 "/share/texmf-dist/fonts/source/public/cm")))
956 (mkdir "build")
806faaab
MW		 957 (for-each (lambda (font)
958 (format #t "building font ~a\n" font)
959 (invoke "mf" "-progname=mf"
960 "-output-directory=build"
961 (string-append "\\"
962 "mode:=ljfour; "
963 "mag:=1; "
964 "batchmode; "
965 "input " font)))
966 '("icmcsc10" "icmex10" "icmmi8" "icmsy8" "icmtt8"
967 "ilasy8" "ilcmss8" "ilcmssb8" "ilcmssi8"
968 "lasy5" "lasy6" "lasy7" "lasy8" "lasy9" "lasy10" "lasyb10"
969 "lcircle10" "lcirclew10" "lcmss8" "lcmssb8" "lcmssi8"
970 "line10" "linew10"))
971 #t))
a00d5933
RW		 972 (replace 'install
973 (lambda* (#:key outputs #:allow-other-keys)
974 (let* ((out (assoc-ref outputs "out"))
975 (tfm (string-append
976 out "/share/texmf-dist/fonts/tfm/public/latex-fonts"))
977 (mf (string-append
978 out "/share/texmf-dist/fonts/source/public/latex-fonts")))
979 (for-each (cut install-file <> tfm)
980 (find-files "build" "\\.*"))
981 (for-each (cut install-file <> mf)
982 (find-files "." "\\.mf"))
983 #t))))))
984 (native-inputs
985 `(("texlive-bin" ,texlive-bin)
986 ("texlive-metafont-base" ,texlive-metafont-base)
a6405e03 987 ("texlive-cm" ,texlive-cm)))
b8d8806b 988 (home-page "https://www.ctan.org/pkg/latex-fonts")
a00d5933
RW		 989 (synopsis "Collection of fonts used in LaTeX distributions")
990 (description "This is a collection of fonts for use with standard LaTeX
991packages and classes. It includes invisible fonts (for use with the slides
992class), line and circle fonts (for use in the picture environment) and LaTeX
993symbol fonts.")
994 (license license:lppl1.2+)))
995
6072f82a
RW		 996(define-public texlive-latex-mflogo
997 (package
998 (name "texlive-latex-mflogo")
999 (version (number->string %texlive-revision))
1000 (source
1001 (origin
1002 (method svn-fetch)
1003 (uri (texlive-ref "latex" "mflogo"))
44d0717c 1004 (file-name (string-append name "-" version "-checkout"))
6072f82a
RW		 1005 (sha256
1006 (base32
1007 "15i2ib6nvhf31g1b92c6njf7n0g29znlq7hbfp9ii7qabhcwwvrj"))))
1008 (build-system texlive-build-system)
1009 (arguments '(#:tex-directory "latex/mflogo"))
1010 (home-page "http://www.ctan.org/pkg/mflogo")
1011 (synopsis "LaTeX support for Metafont logo fonts")
1012 (description
1013 "This package provides LaTeX and font definition files to access the
1014Knuthian mflogo fonts described in The Metafontbook and to typeset Metafont
1015logos in LaTeX documents.")
1016 (license license:lppl)))
1017
cd957f4f 1018(define-public texlive-mflogo-font
01cf8c89 1019 (package
cd957f4f
RW		 1020 (inherit (simple-texlive-package
1021 "texlive-mflogo-font"
1022 (list "/doc/fonts/mflogo-font/README"
1023 "/fonts/afm/hoekwater/mflogo-font/"
1024 "/fonts/map/dvips/mflogo-font/"
1025 "/fonts/type1/hoekwater/mflogo-font/")
1026 (base32
1027 "094mknjv8ki2pvj1zin0f1z4f1w12g0cfqjiqcsawjsry4yfrmbg")
1028 #:trivial? #t))
01cf8c89
RW		 1029 (home-page "https://www.ctan.org/pkg/mflogo-font")
1030 (synopsis "Metafont logo font")
1031 (description
1032 "These fonts were created in METAFONT by Knuth, for his own publications.
1033At some stage, the letters P and S were added, so that the METAPOST logo could
1034also be expressed. The fonts were originally issued (of course) as METAFONT
1035source; they have since been autotraced and reissued in Adobe Type 1 format by
1036Taco Hoekwater.")
1037 (license license:knuth)))
1038
cd957f4f
RW		 1039(define-public texlive-fonts-mflogo-font
1040 (deprecated-package "texlive-fonts-mflogo-font" texlive-mflogo-font))
1041
82ff725d
RW		 1042(define-public texlive-amsfonts
1043 (let ((template (simple-texlive-package
1044 "texlive-amsfonts"
1045 (list "/source/latex/amsfonts/"
1046 "/fonts/source/public/amsfonts/"
1047 "/fonts/type1/public/amsfonts/"
1048 "/fonts/afm/public/amsfonts/"
1049 "/fonts/map/dvips/amsfonts/"
1050 "/tex/plain/amsfonts/"
1051 "/doc/fonts/amsfonts/")
1052 (base32
1053 "15q70nkjf8wqzbd5ivcdx3i2sdgqxjb38q0qn9a2qw9i0qcnx6zw"))))
1054 (package
1055 (inherit template)
1056 (arguments
1057 (substitute-keyword-arguments (package-arguments template)
d350d5e7
RW		 1058 ((#:build-targets _ #t)
1059 '(list "amsfonts.ins"))
82ff725d
RW		 1060 ((#:tex-directory _ #t)
1061 "latex/amsfonts")
1062 ((#:modules modules '())
1063 `((guix build texlive-build-system)
1064 (guix build utils)
1065 (ice-9 match)
1066 (srfi srfi-1)
1067 (srfi srfi-26)))
1068 ((#:phases phases)
1069 `(modify-phases ,phases
1070 (add-before 'build 'build-fonts
1071 (lambda* (#:key inputs #:allow-other-keys)
1072 (let ((mf (assoc-ref inputs "texlive-union"))
1073 (src (string-append (getcwd) "/fonts/source/public/amsfonts/")))
1074 ;; Make METAFONT reproducible
1075 (setenv "SOURCE_DATE_EPOCH" "1")
1076 ;; Tell mf where to find mf.base
1077 (setenv "MFBASES" (string-append mf "/share/texmf-dist/web2c"))
1078 ;; Tell mf where to look for source files
1079 (setenv "MFINPUTS"
1080 (string-append src ":"
1081 src "/cmextra:"
1082 src "/cyrillic:"
1083 src "/dummy:"
1084 src "/symbols:"
1085 mf "/share/texmf-dist/metafont/base:"
a6405e03 1086 (assoc-ref inputs "texlive-cm")
82ff725d 1087 "/share/texmf-dist/fonts/source/public/cm")))
d350d5e7 1088 (let ((build (string-append (getcwd) "/build-fonts")))
82ff725d
RW		 1089 (mkdir-p build)
1090 (with-directory-excursion "fonts/source/public/amsfonts"
1091 (for-each (lambda (font)
1092 (format #t "building font ~a\n" (basename font ".mf"))
1093 (with-directory-excursion (dirname font)
1094 (invoke "mf" "-progname=mf"
1095 (string-append "-output-directory=" build)
1096 (string-append "\\"
1097 "mode:=ljfour; "
1098 "mag:=1; "
1099 "nonstopmode; "
1100 "input "
1101 (getcwd) "/"
1102 (basename font ".mf")))))
1103 (find-files "." "[0-9]+\\.mf$"))))
fe2bfabe 1104
82ff725d
RW		 1105 ;; There are no metafont sources for the Euler fonts, so we
1106 ;; convert the afm files instead.
d350d5e7 1107 (let ((build (string-append (getcwd) "/build-fonts/euler")))
82ff725d
RW		 1108 (mkdir build)
1109 (with-directory-excursion "fonts/afm/public/amsfonts/"
1110 (for-each (lambda (font)
1111 (format #t "converting afm font ~a\n" (basename font ".afm"))
1112 (invoke "afm2tfm" font
1113 (string-append build "/"
1114 (basename font ".tfm"))))
1115 (find-files "." "\\.afm$")))
fe2bfabe 1116
82ff725d
RW		 1117 ;; Frustratingly, not all fonts can be created this way. To
1118 ;; generate eufm8.tfm, for example, we first scale down
1119 ;; eufm10.afm to eufm8.pl, and then generate the tfm file from
1120 ;; the pl file.
1121 (setenv "TEXINPUTS"
d350d5e7
RW		 1122 (string-append build "//:"
1123 (getcwd) "/fonts/afm/public/amsfonts//:"
1124 (getcwd) "/source/latex/amsfonts//:"
1125 (assoc-ref inputs "texlive-union") "//"))
82ff725d
RW		 1126 (with-directory-excursion build
1127 (for-each (match-lambda
1128 (((target-base target-size)
1129 (source-base source-size))
1130 (let ((factor (number->string
1131 (truncate/ (* 1000 target-size)
1132 source-size))))
1133 (invoke "tex"
1134 "-interaction=scrollmode"
1135 (string-append "\\input fontinst.sty "
1136 "\\transformfont{" target-base "}"
1137 "{\\scalefont{" factor "}"
1138 "{\\fromafm{" source-base "}}} "
1139 "\\bye")))
1140 (invoke "pltotf"
1141 (string-append target-base ".pl")
1142 (string-append target-base ".tfm"))
1143 (delete-file (string-append target-base ".pl"))))
fe2bfabe 1144
82ff725d 1145 '((("eufm8" 8) ("eufm10" 10))
fe2bfabe 1146
82ff725d
RW		 1147 (("eufb6" 6) ("eufb7" 7))
1148 (("eufb8" 8) ("eufb10" 10))
1149 (("eufb9" 9) ("eufb10" 10))
fe2bfabe 1150
82ff725d
RW		 1151 (("eufm6" 6) ("eufb7" 7))
1152 (("eufm9" 9) ("eufb10" 10))
fe2bfabe 1153
82ff725d
RW		 1154 (("eurb6" 6) ("eurb7" 7))
1155 (("eurb8" 8) ("eurb10" 10))
1156 (("eurb9" 9) ("eurb10" 10))
fe2bfabe 1157
82ff725d
RW		 1158 (("eurm6" 6) ("eurm7" 7))
1159 (("eurm8" 8) ("eurm10" 10))
1160 (("eurm9" 9) ("eurm10" 10))))))
1161 #t))
1162 (add-after 'install 'install-generated-fonts
1163 (lambda* (#:key inputs outputs #:allow-other-keys)
d350d5e7 1164 (copy-recursively "build-fonts"
82ff725d
RW		 1165 (string-append
1166 (assoc-ref outputs "out")
1167 "/share/texmf-dist/fonts/tfm/public/amsfonts"))
1168 #t))))))
1169 (native-inputs
1170 `(("texlive-union" ,(texlive-union (list texlive-tex-fontinst-base
a6405e03 1171 texlive-cm
82ff725d
RW		 1172 texlive-metafont-base)))))
1173 (home-page "https://www.ctan.org/pkg/amsfonts")
1174 (synopsis "TeX fonts from the American Mathematical Society")
1175 (description
1176 "This package provides an extended set of fonts for use in mathematics,
98b4aca1
RW		 1177including: extra mathematical symbols; blackboard bold letters (uppercase
1178only); fraktur letters; subscript sizes of bold math italic and bold Greek
1179letters; subscript sizes of large symbols such as sum and product; added sizes
1180of the Computer Modern small caps font; cyrillic fonts (from the University of
1181Washington); Euler mathematical fonts. All fonts are provided as Adobe Type 1
1182files, and all except the Euler fonts are provided as Metafont source. The
1183distribution also includes the canonical Type 1 versions of the Computer
1184Modern family of fonts. The Euler fonts are supported by separate packages;
1185details can be found in the documentation.")
82ff725d
RW		 1186 (license license:silofl1.1))))
1187
98b4aca1 1188(define-public texlive-fonts-amsfonts
82ff725d 1189 (deprecated-package "texlive-fonts-amsfonts" texlive-amsfonts))
98b4aca1 1190
137f9cbc 1191(define-public texlive-latex-amsfonts
82ff725d 1192 (deprecated-package "texlive-latex-amsfonts" texlive-amsfonts))
137f9cbc 1193
e4c5481d 1194(define-public texlive-mkpattern
98b4aca1 1195 (package
e4c5481d
RW		 1196 (inherit (simple-texlive-package
1197 "texlive-mkpattern"
1198 (list "/doc/plain/mkpattern/README"
1199 "/doc/plain/mkpattern/mkpatdoc.tex"
1200 "/doc/plain/mkpattern/mkpatter.pdf"
1201 "/doc/plain/mkpattern/mkpattern-exmpl.tex"
1202 "/tex/plain/mkpattern/mkpatter.tex")
1203 (base32
1204 "0sxnkbcc802jl3fj56x9hvg978bpv15lhrwj0aykb4syq29l47ga")
1205 #:trivial? #t))
1206 (home-page "https://ctan.org/pkg/mkpattern")
1207 (synopsis "Utility for making hyphenation patterns")
1208 (description "Mkpattern is a general purpose program for the generation of
1209hyphenation patterns, with definition of letter sets and template-like
1210constructions. It also provides an easy way to handle different input and
1211output encodings, and features generation of clean UTF-8 patterns.")
1212 (license license:lppl)))
137f9cbc 1213
566e95f7
RW		 1214;; This provides etex.src which is needed to build various formats, including
1215;; luatex.fmt and pdflatex.fmt
1e39065d
RW		 1216(define-public texlive-etex
1217 (let ((template (simple-texlive-package
1218 "texlive-etex"
1219 (list "/doc/etex/base/"
1220 "/doc/man/man1/etex.1"
1221 "/doc/man/man1/etex.man1.pdf"
1222 "/tex/plain/etex/"
1223 "/fonts/source/public/etex/")
1224 (base32
1225 "1qv6vxm5a8pw38gas3i69ivmsn79zj2yq5n5vdmh0rzic5hw2hmc")
1226 #:trivial? #t)))
1227 (package
1228 (inherit template)
1229 (arguments
1230 (substitute-keyword-arguments (package-arguments template)
1231 ((#:phases phases)
1232 `(modify-phases ,phases
1233 ;; Build tfm font.
1234 (replace 'build
1235 (lambda* (#:key inputs #:allow-other-keys)
1236 (let ((mf (assoc-ref inputs "texlive-metafont-base")))
1237 ;; Tell mf where to find mf.base
1238 (setenv "MFBASES" (string-append mf "/share/texmf-dist/web2c"))
1239 ;; Tell mf where to look for source files
1240 (setenv "MFINPUTS"
1241 (string-append (getcwd)
1242 "/fonts/source/public/etex/:"
1243 mf "/share/texmf-dist/metafont/base:"
a6405e03 1244 (assoc-ref inputs "texlive-cm")
1e39065d
RW		 1245 "/share/texmf-dist/fonts/source/public/cm")))
1246 (invoke "mf" "-progname=mf"
1247 (string-append "\\"
1248 "mode:=ljfour; "
1249 "mag:=1; "
1250 "scrollmode; "
1251 "input xbmc10"))
1252 #t))
1253 (add-after 'install 'install-font
1254 (lambda* (#:key outputs #:allow-other-keys)
1255 (install-file
1256 "xbmc10.tfm"
1257 (string-append (assoc-ref outputs "out")
1258 "/share/texmf-dist/fonts/tfm/public/etex/"))
1259 #t))))))
1260 (native-inputs
1261 `(("texlive-bin" ,texlive-bin)
1262 ("texlive-metafont-base" ,texlive-metafont-base)
a6405e03 1263 ("texlive-cm" ,texlive-cm)))
1e39065d
RW		 1264 (home-page "https://www.ctan.org/pkg/etex")
1265 (synopsis "Extended version of TeX")
1266 (description
1267 "This package provides an extended version of TeX (which is capable of
1268running as if it were TeX unmodified). E-TeX has been specified by the LaTeX
1269team as the engine for the development of LaTeX2e; as a result, LaTeX
1270programmers may assume e-TeX functionality. The pdftex engine directly
1271incorporates the e-TeX extensions.")
1272 (license license:knuth))))
1273
566e95f7
RW		 1274(define-public texlive-tex-plain
1275 (package
8fee5067
RW		 1276 (inherit (simple-texlive-package
1277 "texlive-tex-plain"
1278 (list "/tex/plain/")
1279 (base32
85892948 1280 "1m4qpaszwfv7j8a85rlwl7rs4iv5nlj67c1vvn6ysly72h9gjydb")
8fee5067 1281 #:trivial? #t))
566e95f7
RW		 1282 (home-page "https://www.ctan.org/pkg/plain")
1283 (synopsis "Plain TeX format and supporting files")
1284 (description
8fee5067
RW		 1285 "This package contains files used to build the Plain TeX format, as
1286described in the TeXbook, together with various supporting files (some also
1287discussed in the book).")
566e95f7
RW		 1288 (license license:knuth)))
1289
df73a3d3
RW		 1290(define-public texlive-hyphen-afrikaans
1291 (package
1292 (inherit (texlive-hyphen-package
1293 "texlive-hyphen-afrikaans" "af"
1294 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-af.tex")
1295 (base32
85892948 1296 "1k9k27a27bbrb0gz36191w32l2v6d3zbdh8zhrp4l3ild2pj3n4l")))
df73a3d3
RW		 1297 (synopsis "Hyphenation patterns for Afrikaans")
1298 (description "The package provides hyphenation patterns for the Afrikaans
1299language.")
1300 (license license:lppl1.3+)))
1301
619ca023
RW		 1302(define-public texlive-hyphen-ancientgreek
1303 (package
1304 (inherit (texlive-hyphen-package
1305 "texlive-hyphen-ancientgreek" "grc"
1306 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-grc.tex"
1307 "/tex/generic/hyphen/grahyph5.tex"
1308 "/tex/generic/hyphen/ibyhyph.tex")
1309 (base32
85892948 1310 "01326lb6z0s8krcfgs8i1pnjfrm4gr33rc53gy80f63qbv4ssxrw")))
619ca023
RW		 1311 (synopsis "Hyphenation patterns for ancient Greek")
1312 (description "The package provides hyphenation patterns for ancient
1313Greek.")
1314 (license license:lppl1.3+)))
1315
a361f412
RW		 1316(define-public texlive-hyphen-armenian
1317 (let ((template (texlive-hyphen-package
1318 "texlive-hyphen-armenian" "hy"
85892948 1319 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-hy.tex")
a361f412 1320 (base32
85892948 1321 "0hzny0npynsb07syxrpbfa5pkpj8r0j51pj64yxyfl1c0bak1fwp"))))
010f476f 1322 (package
a361f412 1323 (inherit template)
a361f412
RW		 1324 (synopsis "Hyphenation patterns for Armenian")
1325 (description "The package provides hyphenation patterns for the Armenian
1326language.")
1327 ;; Any version of the LGPL.
1328 (license license:lgpl3+))))
1329
0ddbc25c
RW		 1330(define-public texlive-hyphen-basque
1331 (let ((template (texlive-hyphen-package
1332 "texlive-hyphen-basque" "eu"
85892948 1333 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-eu.tex")
0ddbc25c 1334 (base32
85892948 1335 "15w969g1jqzn68l2b2lzf7iv7g3kil02aba3if6cag3qcnq92ra9"))))
0ddbc25c
RW		 1336 (package
1337 (inherit template)
0ddbc25c
RW		 1338 (synopsis "Hyphenation patterns for Basque")
1339 (description "The package provides hyphenation patterns for the Basque
1340language.")
85892948 1341 ;; Similar to Unicode license.
0ddbc25c 1342 (license (license:fsf-free
85892948 1343 "/tex/generic/hyph-utf8/patterns/tex/hyph-eu.tex")))))
0ddbc25c 1344
92266796
RW		 1345(define-public texlive-hyphen-belarusian
1346 (package
1347 (inherit (texlive-hyphen-package
1348 "texlive-hyphen-belarusian" "be"
1349 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-be.tex")
1350 (base32
85892948 1351 "0ppm12wndaxv9da62dwkbnk7w9nijikn6jkc97m76xis338g2h02")))
92266796
RW		 1352 (synopsis "Hyphenation patterns for Belarusian")
1353 (description "The package provides hyphenation patterns for the Belarusian
1354language.")
1355 (license license:expat)))
1356
7ffc3105
RW		 1357(define-public texlive-hyphen-bulgarian
1358 (package
1359 (inherit (texlive-hyphen-package
1360 "texlive-hyphen-bulgarian" "bg"
1361 (list "/doc/generic/hyph-utf8/bg/azbukaExtended.pdf"
1362 "/doc/generic/hyph-utf8/bg/azbukaExtended.tex"
1363 "/tex/generic/hyph-utf8/patterns/tex/hyph-bg.tex")
1364 (base32
85892948 1365 "0ngrgw2rmipxss76rgfk62x9nnsgwmaxxna2jqxxhybai3q39mx5")))
7ffc3105
RW		 1366 (synopsis "Hyphenation patterns for Bulgarian")
1367 (description "The package provides hyphenation patterns for the Bulgarian
1368language in T2A and UTF-8 encodings.")
1369 (license (license:non-copyleft
1370 "file:///tex/generic/hyph-utf8/patterns/tex/hyph-bg.tex"
1371 "Ancestral BSD variant"))))
1372
cbc7e109
RW		 1373(define-public texlive-hyphen-catalan
1374 (package
1375 (inherit (texlive-hyphen-package
1376 "texlive-hyphen-catalan" "ca"
1377 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-ca.tex")
1378 (base32
85892948 1379 "10zzlfz5v8d9csg85ibpp2vfvmpqa56vbl85qy5gws099vygpayg")))
cbc7e109
RW		 1380 (synopsis "Hyphenation patterns for Catalan")
1381 (description "The package provides hyphenation patterns for Catalan in
1382T1/EC and UTF-8 encodings.")
1383 (license license:lppl1.0+)))
010f476f 1384
9ebce8fc
RW		 1385(define-public texlive-hyphen-chinese
1386 (package
1387 (inherit (texlive-hyphen-package
1388 "texlive-hyphen-chinese" "zh-latn-pinyin"
1389 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-zh-latn-pinyin.tex")
1390 (base32
85892948 1391 "1j68mry2zy91m1kbzwhin5q2jajf6xh48npdds8wvp1sqmzih2a3")))
9ebce8fc
RW		 1392 (synopsis "Hyphenation patterns for unaccented Chinese pinyin")
1393 (description "The package provides hyphenation patterns for unaccented
1394Chinese pinyin T1/EC and UTF-8 encodings.")
1395 (license license:gpl2+)))
010f476f 1396
beed8377
RW		 1397(define-public texlive-hyphen-churchslavonic
1398 (package
1399 (inherit (texlive-hyphen-package
1400 "texlive-hyphen-churchslavonic" "cu"
1401 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-cu.tex")
756fc3e1 1402 (base32
85892948 1403 "0fhbwaapq2213msbhgr0d1lw06ihmrqirxj092mn73d8ynl13qlh")))
beed8377
RW		 1404 (synopsis "Hyphenation patterns for Church Slavonic")
1405 (description "The package provides hyphenation patterns for Church
1406Slavonic in UTF-8 encoding.")
1407 (license license:expat)))
1408
1b1d8577
RW		 1409(define-public texlive-hyphen-coptic
1410 (package
1411 (inherit (texlive-hyphen-package
1412 "texlive-hyphen-coptic" "cop"
1413 (list "/tex/generic/hyph-utf8/patterns/tex-8bit/copthyph.tex"
1414 "/tex/generic/hyph-utf8/patterns/tex/hyph-cop.tex")
1415 (base32
85892948 1416 "1jlxxvyfa2aljizaa3qlcxyhqsrb4dawv3q3fbyp2lxz6ag9fy6m")))
1b1d8577
RW		 1417 (synopsis "Hyphenation patterns for Coptic")
1418 (description "The package provides hyphenation patterns for Coptic in
1419UTF-8 encoding as well as in ASCII-based encoding for 8-bit engines.")
1420 ;; No explicit license declaration, so we use the project license.
1421 (license license:lppl)))
010f476f 1422
9b65c611 1423(define-public texlive-hyphen-croatian
3e485ed2 1424 (package
9b65c611
RW		 1425 (inherit (texlive-hyphen-package
1426 "texlive-hyphen-croatian" "hr"
1427 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-hr.tex")
1428 (base32
85892948 1429 "12n9r2winai15jc622sqdwclgcs1s68r6vcf7ic8vvq0x9qhwc5v")))
9b65c611
RW		 1430 (synopsis "Hyphenation patterns for Croatian")
1431 (description "The package provides hyphenation patterns for Croatian in
1432T1/EC and UTF-8 encodings.")
1433 (license license:lppl1.0+)))
3e485ed2 1434
b5b2ef6e 1435(define-public texlive-hyphen-czech
1193aa89 1436 (package
b5b2ef6e
RW		 1437 (inherit (texlive-hyphen-package
1438 "texlive-hyphen-czech" "cs"
1439 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-cs.tex")
1440 (base32
85892948 1441 "1q37s6p8yfyi3rp1azbz421lg4lr4aiki8m631i4x9rmps89m8iq")))
b5b2ef6e
RW		 1442 (synopsis "Hyphenation patterns for Czech")
1443 (description "The package provides hyphenation patterns for Czech in T1/EC
1444and UTF-8 encodings.")
1445 (license license:gpl2+)))
1193aa89 1446
3889b022 1447(define-public texlive-hyphen-danish
9186c156 1448 (package
3889b022
RW		 1449 (inherit (texlive-hyphen-package
1450 "texlive-hyphen-danish" "da"
1451 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-da.tex")
1452 (base32
85892948 1453 "1vj8nip64rzcrcg3skm4vqad1ggqwgan74znrdns610wjcm1z9qd")))
3889b022
RW		 1454 (synopsis "Hyphenation patterns for Danish")
1455 (description "The package provides hyphenation patterns for Danish in
1456T1/EC and UTF-8 encodings.")
1457 ;; Either LPPL 1.3 or later, or Expat
1458 (license (list license:lppl1.3+ license:expat))))
1459
402b835f
RW		 1460(define-public texlive-hyphen-dutch
1461 (package
1462 (inherit (texlive-hyphen-package
1463 "texlive-hyphen-dutch" "nl"
1464 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-nl.tex")
1465 (base32
85892948 1466 "1bg9g790ksq5cn8qihai6pacmkp9vpf35h4771z361nvwa40l8yk")))
402b835f
RW		 1467 (synopsis "Hyphenation patterns for Dutch")
1468 (description "The package provides hyphenation patterns for Dutch in T1/EC
1469and UTF-8 encodings.")
1470 (license license:lppl1.0+)))
9186c156 1471
ab8f6de6 1472(define-public texlive-hyphen-english
437822a1 1473 (package
ab8f6de6
RW		 1474 (inherit (texlive-hyphen-package
1475 "texlive-hyphen-english" '("en-gb" "en-us")
1476 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-en-gb.tex"
1477 "/tex/generic/hyph-utf8/patterns/tex/hyph-en-us.tex")
1478 (base32
85892948 1479 "08b3jihjaamcl1pvffi0s47nwavkm66l9mrrmby3l32dfpkprrc5")))
ab8f6de6
RW		 1480 (synopsis "Hyphenation patterns for American and British English")
1481 (description "The package provides additional hyphenation patterns for
1482American and British English in ASCII encoding.")
1483 (license (license:non-copyleft
1484 "file:///tex/generic/hyph-utf8/patterns/tex/hyph-en-us.tex"
1485 "FSF all permissive license"))))
1486
d7c80395
RW		 1487(define-public texlive-hyphen-esperanto
1488 (package
1489 (inherit (texlive-hyphen-package
1490 "texlive-hyphen-esperanto" "eo"
1491 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-eo.tex")
1492 (base32
85892948 1493 "1503kzn9bk4mm4ba35cka2hm8rz0v3j5l30v5rrsd4rqgpibcgic")))
d7c80395
RW		 1494 (synopsis "Hyphenation patterns for Esperanto")
1495 (description "The package provides hyphenation patterns for Esperanto ISO
1496Latin 3 and UTF-8 encodings.")
437822a1
RW		 1497 (license license:lppl1.0+)))
1498
5f229484 1499(define-public texlive-hyphen-estonian
4eebd2cd 1500 (package
5f229484
RW		 1501 (inherit (texlive-hyphen-package
1502 "texlive-hyphen-estonian" "et"
1503 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-et.tex")
1504 (base32
85892948 1505 "1rdas2450ib02rwy65i69l86nyc9h15bl07xbbwhmhxfnj8zj4v8")))
5f229484
RW		 1506 (synopsis "Hyphenation patterns for Estonian")
1507 (description "The package provides hyphenation patterns for Estonian in
1508T1/EC and UTF-8 encodings.")
1509 ;; Dual licensed under either license.
1510 (license (list license:lppl1.3+ license:expat))))
1511
54ef221c
RW		 1512(define-public texlive-hyphen-ethiopic
1513 (let ((template (texlive-hyphen-package
1514 "texlive-hyphen-ethiopic" "mul-ethi"
85892948 1515 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-mul-ethi.tex")
54ef221c 1516 (base32
85892948 1517 "1b93fc6j4aybh0pgq23hsn1njm6asf7sfz803fbj3ai0whsxd10l"))))
54ef221c
RW		 1518 (package
1519 (inherit template)
54ef221c
RW		 1520 (synopsis "Hyphenation patterns for Ethiopic scripts")
1521 (description "The package provides hyphenation patterns for languages
1522written using the Ethiopic script for Unicode engines. They are not supposed
1523to be linguistically relevant in all cases and should, for proper typography,
1524be replaced by files tailored to individual languages.")
85892948 1525 (license license:expat))))
54ef221c 1526
bac10d82
RW		 1527(define-public texlive-hyphen-finnish
1528 (package
1529 (inherit (texlive-hyphen-package
1530 "texlive-hyphen-finnish" "fi"
1531 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-fi.tex")
1532 (base32
85892948 1533 "1f72b4ydb4zddvw2i004948khmwzigxkdkwfym5v1kkq0183sfpj")))
bac10d82
RW		 1534 (synopsis "Hyphenation patterns for Finnish")
1535 (description "The package provides hyphenation patterns for Finnish in
1536T1/EC and UTF-8 encodings.")
1537 (license license:public-domain)))
1538
a14ffed2
RW		 1539(define-public texlive-hyphen-french
1540 (package
1541 (inherit (texlive-hyphen-package
1542 "texlive-hyphen-french" "fr"
1543 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-fr.tex")
1544 (base32
85892948 1545 "0jc3kqys6cxjw8x8pzjln7z78l8s7f5rlyrkv7dzr1kiwnwilk9d")))
a14ffed2
RW		 1546 (synopsis "Hyphenation patterns for French")
1547 (description "The package provides hyphenation patterns for French in
1548T1/EC and UTF-8 encodings.")
1549 (license license:expat)))
1550
28fbf42a
RW		 1551(define-public texlive-hyphen-friulan
1552 (package
1553 (inherit (texlive-hyphen-package
1554 "texlive-hyphen-friulan" "fur"
1555 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-fur.tex")
1556 (base32
85892948 1557 "1dlnh8slpf50mryxv7zzbx08xp54zkdfs1j7y37ipwbrajvd740f")))
28fbf42a
RW		 1558 (synopsis "Hyphenation patterns for Friulan")
1559 (description "The package provides hyphenation patterns for Friulan in
1560ASCII encodings.")
1561 (license license:lppl1.3+)))
1562
8d87184b
RW		 1563(define-public texlive-hyphen-galician
1564 (let ((template (texlive-hyphen-package
1565 "texlive-hyphen-galician" "gl"
85892948 1566 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-gl.tex")
8d87184b 1567 (base32
85892948 1568 "13zx2r3nrxdr025g2lxrph0ga6wf7cs8dxixn4fhbl6xr1cx028g"))))
8d87184b
RW		 1569 (package
1570 (inherit template)
8d87184b
RW		 1571 (synopsis "Hyphenation patterns for Galician")
1572 (description "The package provides hyphenation patterns for Galician in
1573T1/EC and UTF-8 encodings.")
85892948 1574 (license license:lppl1.3))))
8d87184b 1575
b2334b6e
RW		 1576(define-public texlive-hyphen-georgian
1577 (package
1578 (inherit (texlive-hyphen-package
1579 "texlive-hyphen-georgian" "ka"
1580 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-ka.tex")
1581 (base32
85892948 1582 "0l0hk7ka04fr8x11nnw95x151cxyycy0fph772m3a3p8qk4x9wp7")))
b2334b6e
RW		 1583 (synopsis "Hyphenation patterns for Georgian")
1584 (description "The package provides hyphenation patterns for Georgian in
1585T8M, T8K, and UTF-8 encodings.")
1586 (license license:lppl1.3+)))
1587
6028620d
RW		 1588(define-public texlive-hyphen-german
1589 (package
1590 (inherit (texlive-hyphen-package
1591 "texlive-hyphen-german" '("de-1901" "de-1996" "de-ch-1901")
1592 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-de-1901.tex"
1593 "/tex/generic/hyph-utf8/patterns/tex/hyph-de-1996.tex"
1594 "/tex/generic/hyph-utf8/patterns/tex/hyph-de-ch-1901.tex"
85892948
MB		 1595 "/tex/generic/dehyph/dehyphn.tex"
1596 "/tex/generic/dehyph/dehypht.tex"
1597 "/tex/generic/dehyph/dehyphtex.tex"
1598 "/tex/generic/dehyph/README")
6028620d 1599 (base32
85892948 1600 "0wp5by5kkf4ac6li5mbppqzw11500wa7f22p5vpz3m1kwd15zavw")))
6028620d
RW		 1601 (synopsis "Hyphenation patterns for German")
1602 (description "This package provides hyphenation patterns for German in
1603T1/EC and UTF-8 encodings, for traditional and reformed spelling, including
1604Swiss German.")
1605 ;; The patterns are released under the Expat license; the dehyph* files
1606 ;; are released under the LPPL version 1 or later.
1607 (license (list license:expat license:lppl1.0+))))
1608
65e4cfd1
RW		 1609(define-public texlive-hyphen-greek
1610 (package
1611 (inherit (texlive-hyphen-package
1612 "texlive-hyphen-greek" '("el-monoton" "el-polyton")
1613 (list "/doc/generic/elhyphen/"
1614 "/tex/generic/hyph-utf8/patterns/tex/hyph-el-monoton.tex"
1615 "/tex/generic/hyph-utf8/patterns/tex/hyph-el-polyton.tex"
1616 "/tex/generic/hyphen/grmhyph5.tex"
1617 "/tex/generic/hyphen/grphyph5.tex")
1618 (base32
85892948 1619 "1qyr6m1nh6d4wj68616cfxv4wjpiy1w2rlldxlx2ajzba381w3hf")))
65e4cfd1
RW		 1620 (synopsis "Hyphenation patterns for Greek")
1621 (description "This package provides hyphenation patterns for Modern Greek
1622in monotonic and polytonic spelling in LGR and UTF-8 encodings.")
1623 (license license:lppl)))
1624
36f03c33
RW		 1625(define-public texlive-hyphen-hungarian
1626 (package
1627 (inherit (texlive-hyphen-package
1628 "texlive-hyphen-hungarian" "hu"
1629 (list "/doc/generic/huhyphen/"
1630 "/doc/generic/hyph-utf8/hu/"
1631 "/tex/generic/hyph-utf8/patterns/tex/hyph-hu.tex")
1632 (base32
85892948 1633 "1j1b8kksg9r8nmjyjvvz8fr3hgcrjj6jlybf9p06nwrrwm2r8j8f")))
36f03c33
RW		 1634 (synopsis "Hyphenation patterns for Hungarian")
1635 (description "This package provides hyphenation patterns for Hungarian in
1636T1/EC and UTF-8 encodings.")
1637 ;; Any of these licenses
1638 (license (list license:gpl2 license:lgpl2.1+ license:mpl1.1))))
1639
33a446e6
RW		 1640(define-public texlive-hyphen-icelandic
1641 (package
1642 (inherit (texlive-hyphen-package
1643 "texlive-hyphen-icelandic" "is"
1644 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-is.tex")
1645 (base32
85892948 1646 "1m9xj41csj3ldym09d82zjbd3345sg2z10d8pxpvhgibf97mb66h")))
33a446e6
RW		 1647 (synopsis "Hyphenation patterns for Icelandic")
1648 (description "This package provides hyphenation patterns for Icelandic in
1649T1/EC and UTF-8 encodings.")
1650 (license license:lppl1.2+)))
1651
825285d8
RW		 1652(define-public texlive-hyphen-indic
1653 (package
1654 (inherit (texlive-hyphen-package
1655 "texlive-hyphen-indic"
1656 '("as" "bn" "gu" "hi" "kn" "ml" "mr" "or" "pa" "ta" "te")
1657 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-as.tex"
1658 "/tex/generic/hyph-utf8/patterns/tex/hyph-bn.tex"
1659 "/tex/generic/hyph-utf8/patterns/tex/hyph-gu.tex"
1660 "/tex/generic/hyph-utf8/patterns/tex/hyph-hi.tex"
1661 "/tex/generic/hyph-utf8/patterns/tex/hyph-kn.tex"
1662 "/tex/generic/hyph-utf8/patterns/tex/hyph-ml.tex"
1663 "/tex/generic/hyph-utf8/patterns/tex/hyph-mr.tex"
1664 "/tex/generic/hyph-utf8/patterns/tex/hyph-or.tex"
1665 "/tex/generic/hyph-utf8/patterns/tex/hyph-pa.tex"
1666 "/tex/generic/hyph-utf8/patterns/tex/hyph-ta.tex"
1667 "/tex/generic/hyph-utf8/patterns/tex/hyph-te.tex")
1668 (base32
85892948 1669 "02d2kcd3lpk95fykjwhzw9s2a1s2w1skz8h2mmszrz979d1xzhpm")))
825285d8
RW		 1670 (synopsis "Indic hyphenation patterns")
1671 (description "This package provides hyphenation patterns for Assamese,
1672Bengali, Gujarati, Hindi, Kannada, Malayalam, Marathi, Oriya, Panjabi, Tamil
1673and Telugu for Unicode engines.")
1674 (license license:expat)))
1675
b6832d79
RW		 1676(define-public texlive-hyphen-indonesian
1677 (package
1678 (inherit (texlive-hyphen-package
1679 "texlive-hyphen-indonesian" "id"
1680 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-id.tex")
1681 (base32
85892948 1682 "1r62w02rf0i4z0jgij54d16qjbj0zyfwm9dwdkqka76jrivij83q")))
b6832d79
RW		 1683 (synopsis "Indonesian hyphenation patterns")
1684 (description "This package provides hyphenation patterns for
1685Indonesian (Bahasa Indonesia) in ASCII encoding. They are probably also
1686usable for Malay (Bahasa Melayu).")
1687 (license license:gpl2)))
1688
9535f149
RW		 1689(define-public texlive-hyphen-interlingua
1690 (package
1691 (inherit (texlive-hyphen-package
1692 "texlive-hyphen-interlingua" "ia"
1693 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-ia.tex")
1694 (base32
85892948 1695 "0a9na20vjnzhgjbicaxay0jk4rm5zg1rjyiswr377mjhd9mx5cg3")))
9535f149
RW		 1696 (synopsis "Interlingua hyphenation patterns")
1697 (description "This package provides hyphenation patterns for Interlingua
1698in ASCII encoding.")
1699 (license license:lppl1.3+)))
1700
88963a8e
RW		 1701(define-public texlive-hyphen-irish
1702 (package
1703 (inherit (texlive-hyphen-package
1704 "texlive-hyphen-irish" "ga"
1705 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-ga.tex")
1706 (base32
85892948 1707 "1h1l9jzkpsb91nyhz6s6c9jfrbz8jx5ip8vyq3dkz0rl6g960i6b")))
88963a8e
RW		 1708 (synopsis "Irish hyphenation patterns")
1709 (description "This package provides hyphenation patterns for
1710Irish (Gaeilge) in T1/EC and UTF-8 encodings.")
1711 ;; Either of these licenses
1712 (license (list license:gpl2+ license:expat))))
1713
e33250e4
RW		 1714(define-public texlive-hyphen-italian
1715 (package
1716 (inherit (texlive-hyphen-package
1717 "texlive-hyphen-italian" "it"
1718 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-it.tex")
1719 (base32
85892948 1720 "03c7jiqslfxvl3gbdx79hggbvrfi2l4z2bnwxc0na8f8lkp1m787")))
e33250e4
RW		 1721 (synopsis "Italian hyphenation patterns")
1722 (description "This package provides hyphenation patterns for Italian in
1723ASCII encoding. Compliant with the Recommendation UNI 6461 on hyphenation
1724issued by the Italian Standards Institution (Ente Nazionale di Unificazione
1725UNI).")
1726 (license license:lppl1.3+)))
1727
0b344257
RW		 1728(define-public texlive-hyphen-kurmanji
1729 (package
1730 (inherit (texlive-hyphen-package
1731 "texlive-hyphen-kurmanji" "kmr"
1732 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-kmr.tex")
1733 (base32
85892948 1734 "01ylbsi5wymrdrxr9b28nmjmcj72mdhqr657lwsb6m9aj33c9ql6")))
0b344257
RW		 1735 (synopsis "Kurmanji hyphenation patterns")
1736 (description "This package provides hyphenation patterns for
1737Kurmanji (Northern Kurdish) as spoken in Turkey and by the Kurdish diaspora in
1738Europe, in T1/EC and UTF-8 encodings.")
1739 (license license:lppl1.3)))
1740
2f3a07c6
RW		 1741(define-public texlive-hyphen-latin
1742 (package
1743 (inherit (texlive-hyphen-package
1744 "texlive-hyphen-latin" '("la-x-classic" "la-x-liturgic" "la")
1745 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-la-x-classic.tex"
1746 "/tex/generic/hyph-utf8/patterns/tex/hyph-la-x-liturgic.tex"
1747 "/tex/generic/hyph-utf8/patterns/tex/hyph-la.tex")
1748 (base32
85892948 1749 "0rxg8a4s5cpj8vlkz5a74a036axda5jqgvr3f9aj2cc2x9f2f3w9")))
2f3a07c6
RW		 1750 (synopsis "Liturgical Latin hyphenation patterns")
1751 (description "This package provides hyphenation patterns for Latin in
1752T1/EC and UTF-8 encodings, mainly in modern spelling (u when u is needed and v
1753when v is needed), medieval spelling with the ligatures @code{\\ae} and
1754@code{\\oe} and the (uncial) lowercase 'v' written as a 'u' is also supported.
1755Apparently there is no conflict between the patterns of modern Latin and those
1756of medieval Latin. It also includes hyphenation patterns for the Classical
1757Latin in T1/EC and UTF-8 encodings. Classical Latin hyphenation patterns are
1758different from those of 'plain' Latin, the latter being more adapted to modern
1759Latin. It also provides hyphenation patterns for the Liturgical Latin in
1760T1/EC and UTF-8 encodings.")
1761 ;; Either of these licenses
1762 (license (list license:lppl1.0+ license:expat))))
1763
e8effd27
RW		 1764(define-public texlive-hyphen-latvian
1765 (package
1766 (inherit (texlive-hyphen-package
1767 "texlive-hyphen-latvian" "lv"
1768 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-lv.tex")
1769 (base32
85892948 1770 "00jf8xma4ldz0zpqwma97k9q3j0mqx7qdj6b7baph3n5xgc24aaw")))
e8effd27
RW		 1771 (synopsis "Latvian hyphenation patterns")
1772 (description "This package provides hyphenation patterns for Latvian in
1773L7X and UTF-8 encodings.")
1774 ;; Either of these licenses.
1775 (license (list license:gpl2 license:lgpl2.1))))
1776
af0e6cc8
RW		 1777(define-public texlive-hyphen-lithuanian
1778 (package
1779 (inherit (texlive-hyphen-package
1780 "texlive-hyphen-lithuanian" "lt"
1781 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-lt.tex")
1782 (base32
85892948 1783 "1kfq7j2ajg6nj952s1ygd520sj9z9kl0bqvd291a36ni2b1frzgd")))
af0e6cc8
RW		 1784 (synopsis "Lithuanian hyphenation patterns")
1785 (description "This package provides hyphenation patterns for Lithuanian in
1786L7X and UTF-8 encodings.")
1787 ;; "Do ... whatever ... as long as you respect the copyright"; as part of
1788 ;; the hyph-utf8 package we choose the LPPL license.
1789 (license license:lppl)))
1790
1890799b
RW		 1791(define-public texlive-hyphen-mongolian
1792 (package
1793 (inherit (texlive-hyphen-package
1794 "texlive-hyphen-mongolian" '("mn-cyrl-x-lmc" "mn-cyrl")
1795 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-mn-cyrl-x-lmc.tex"
1796 "/tex/generic/hyph-utf8/patterns/tex/hyph-mn-cyrl.tex")
1797 (base32
85892948 1798 "1y1b91ihrdl9bad3rxlsfjpd9wmyd5zzgci3qv9w8qqk33jxhwya")))
1890799b
RW		 1799 (synopsis "Mongolian hyphenation patterns in Cyrillic script")
1800 (description "This package provides hyphenation patterns for Mongolian in
1801T2A, LMC and UTF-8 encodings.")
1802 ;; Either of these licenses
1803 (license (list license:lppl1.3+ license:expat))))
1804
da2b2d49
RW		 1805(define-public texlive-hyphen-norwegian
1806 (package
1807 (inherit (texlive-hyphen-package
1808 "texlive-hyphen-norwegian" '("nb" "nn" "no")
1809 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-nb.tex"
1810 "/tex/generic/hyph-utf8/patterns/tex/hyph-nn.tex"
1811 "/tex/generic/hyph-utf8/patterns/tex/hyph-no.tex")
1812 (base32
85892948 1813 "08gbwj64p4fckm199k52yp5lx65h9f4wwdkvl4pv4aa7k370jq9y")))
da2b2d49
RW		 1814 (synopsis "Norwegian Bokmal and Nynorsk hyphenation patterns")
1815 (description "This package provides hyphenation patterns for Norwegian
1816Bokmal and Nynorsk in T1/EC and UTF-8 encodings.")
1817 (license (license:non-copyleft
1818 "/tex/generic/hyph-utf8/patterns/tex/hyph-no.tex"
1819 "FSF All permissive license"))))
1820
033406ad
RW		 1821(define-public texlive-hyphen-occitan
1822 (package
1823 (inherit (texlive-hyphen-package
1824 "texlive-hyphen-occitan" "oc"
1825 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-oc.tex")
1826 (base32
85892948 1827 "0vhjbq2nr58vhqwwky3cwx4dqiwjmmfwp81rb65mfpf0m8yypdfg")))
033406ad
RW		 1828 (synopsis "Occitan hyphenation patterns")
1829 (description "This package provides hyphenation patterns for Occitan in
1830T1/EC and UTF-8 encodings. They are supposed to be valid for all the Occitan
1831variants spoken and written in the wide area called 'Occitanie' by the French.
1832It ranges from the Val d'Aran within Catalunya, to the South Western Italian
1833Alps encompassing the southern half of the French pentagon.")
1834 (license license:lppl1.0+)))
1835
737ac0b7
MB		 1836(define-public texlive-hyphen-pali
1837 (package
1838 (inherit (texlive-hyphen-package
1839 "texlive-hyphen-pali" "pi"
1840 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-pi.tex")
1841 (base32
1842 "1fak853s4ijdqgrnhwymaq1lh8jab3qfyxapdmf6qpg6bqd20kxq")))
1843 (synopsis "Panjabi hyphenation patterns")
1844 (description "This package provides hyphenation patterns for Panjabi in
1845T1/EC encoding.")
1846 ;; Can be used with either license.
1847 (license (list license:expat license:lgpl3+ license:gpl3+))))
1848
db3f7fda
RW		 1849(define-public texlive-hyphen-piedmontese
1850 (package
1851 (inherit (texlive-hyphen-package
1852 "texlive-hyphen-piedmontese" "pms"
1853 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-pms.tex")
1854 (base32
85892948 1855 "0xva3l2gwzkqw1sz64k5g5iprhdyr27w1mv8rxp8x62i5y3aqr1k")))
db3f7fda
RW		 1856 (synopsis "Piedmontese hyphenation patterns")
1857 (description "This package provides hyphenation patterns for Piedmontese
1858in ASCII encoding. Compliant with 'Gramatica dla lengua piemonteisa' by
1859Camillo Brero.")
1860 (license license:lppl1.3+)))
1861
9c451e77
RW		 1862(define-public texlive-hyphen-polish
1863 (package
1864 (inherit (texlive-hyphen-package
1865 "texlive-hyphen-polish" "pl"
1866 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-pl.tex")
1867 (base32
85892948 1868 "1c22g99isxapv4xjrmsw24hhp1xb83wbgcxyd8j24mxdnizywxzm")))
9c451e77
RW		 1869 (synopsis "Polish hyphenation patterns")
1870 (description "This package provides hyphenation patterns for Polish in QX
1871and UTF-8 encodings.")
1872 ;; No differing license declared, so we choose the project license.
1873 (license license:lppl)))
1874
5fd12ffb
RW		 1875(define-public texlive-hyphen-portuguese
1876 (package
1877 (inherit (texlive-hyphen-package
1878 "texlive-hyphen-portuguese" "pt"
1879 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-pt.tex")
1880 (base32
85892948 1881 "00rkjy4p7893zs940bq3s4hp7al0skgxqggj5qfax0bx8karf30b")))
5fd12ffb
RW		 1882 (synopsis "Portuguese hyphenation patterns")
1883 (description "This package provides hyphenation patterns for Portuguese in
1884T1/EC and UTF-8 encodings.")
1885 (license license:bsd-3)))
1886
6fa3b112
RW		 1887(define-public texlive-hyphen-romanian
1888 (package
1889 (inherit (texlive-hyphen-package
1890 "texlive-hyphen-romanian" "ro"
1891 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-ro.tex")
1892 (base32
85892948 1893 "1ykb5v7ip6p3n34wq8qypfyrap4gg946by5rsl6ab0k5gv6ypsbf")))
6fa3b112
RW		 1894 (synopsis "Romanian hyphenation patterns")
1895 (description "This package provides hyphenation patterns for Romanian in
1896T1/EC and UTF-8 encodings.")
1897 ;; No differing license declared, so we choose the project license.
1898 (license license:lppl)))
1899
c4abd4a2
RW		 1900(define-public texlive-hyphen-romansh
1901 (package
1902 (inherit (texlive-hyphen-package
1903 "texlive-hyphen-romansh" "rm"
1904 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-rm.tex")
1905 (base32
85892948 1906 "0a1q9p6sp5n6a9w6xhwk03vmkrrmnh2md7g1k4qhnf0dc4h7dy9r")))
c4abd4a2
RW		 1907 (synopsis "Romansh hyphenation patterns")
1908 (description "This package provides hyphenation patterns for Romansh in
1909ASCII encodings. They are supposed to comply with the rules indicated by the
1910Lia Rumantscha (Romansh language society).")
1911 (license license:lppl1.3+)))
1912
483d8af6
RW		 1913(define-public texlive-hyphen-russian
1914 (package
1915 (inherit (texlive-hyphen-package
1916 "texlive-hyphen-russian" "ru"
1917 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-ru.tex")
1918 (base32
85892948 1919 "00sy7qh5f8ryxw36fwbyd1yi2hxhv7hmk99yp7dwh73n4mxv6lpl")))
483d8af6
RW		 1920 (synopsis "Russian hyphenation patterns")
1921 (description "This package provides hyphenation patterns for Russian in
1922T2A and UTF-8 encodings.")
1923 (license license:lppl1.2+)))
1924
19e31f91
RW		 1925(define-public texlive-hyphen-sanskrit
1926 (package
1927 (inherit (texlive-hyphen-package
1928 "texlive-hyphen-sanskrit" "sa"
1929 (list "/doc/generic/hyph-utf8/sa/hyphenmin.txt"
1930 "/tex/generic/hyph-utf8/patterns/tex/hyph-sa.tex")
1931 (base32
85892948 1932 "0gi2qk0wf388h9n25gzhv0cdz67ph83wal8h3iz2sqnpdjsw8kpc")))
19e31f91
RW		 1933 (synopsis "Sanskrit hyphenation patterns")
1934 (description "This package provides hyphenation patterns for Sanskrit and
1935Prakrit in longdesc transliteration, and in Devanagari, Bengali, Kannada,
1936Malayalam longdesc and Telugu scripts for Unicode engines.")
1937 ;; "You may freely use, copy, modify and/or distribute this file."
1938 (license (license:non-copyleft
1939 "file:///tex/generic/hyph-utf8/patterns/tex/hyph-sa.tex"))))
1940
67c7900e
RW		 1941(define-public texlive-hyphen-serbian
1942 (package
1943 (inherit (texlive-hyphen-package
1944 "texlive-hyphen-serbian" '("sh-cyrl" "sh-latn" "sr-cyrl")
1945 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-sh-cyrl.tex"
1946 "/tex/generic/hyph-utf8/patterns/tex/hyph-sh-latn.tex"
1947 "/tex/generic/hyph-utf8/patterns/tex/hyph-sr-cyrl.tex")
1948 (base32
85892948 1949 "0pwc9z0m5y6acq1vqm0da9akg156jbhxzvsfp2f8bsz5b99y5z45")))
67c7900e
RW		 1950 (synopsis "Serbian hyphenation patterns")
1951 (description "This package provides hyphenation patterns for Serbian in
1952T1/EC, T2A and UTF-8 encodings.")
1953 ;; Any version of the GPL.
1954 (license license:gpl3+)))
1955
af13345a
RW		 1956(define-public texlive-hyphen-slovak
1957 (package
1958 (inherit (texlive-hyphen-package
1959 "texlive-hyphen-slovak" "sk"
1960 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-sk.tex")
1961 (base32
85892948 1962 "0ppp53bbclp5c8wvx748krvrp5y5053khgkjnnv966a90fvp3vgd")))
af13345a
RW		 1963 (synopsis "Slovak hyphenation patterns")
1964 (description "This package provides hyphenation patterns for Slovak in
1965T1/EC and UTF-8 encodings.")
1966 (license license:gpl2+)))
1967
3cd8868f
RW		 1968(define-public texlive-hyphen-slovenian
1969 (package
1970 (inherit (texlive-hyphen-package
1971 "texlive-hyphen-slovenian" "sl"
1972 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-sl.tex")
1973 (base32
85892948 1974 "02n8l9yf4hqyhbpsc1n6b2mggy09z6lq4dcb8ndiwawb6h0mp7s4")))
3cd8868f
RW		 1975 (synopsis "Slovenian hyphenation patterns")
1976 (description "This package provides hyphenation patterns for Slovenian in
1977T1/EC and UTF-8 encodings.")
1978 ;; Either license
1979 (license (list license:lppl1.0+ license:expat))))
1980
40b009b8
RW		 1981(define-public texlive-hyphen-spanish
1982 (package
1983 ;; The source files "eshyph-make.lua" and "eshyph.src" are provided to
1984 ;; generate obsolete hyphenation patterns, which aren't included in a
1985 ;; default TeX Live distribution, so we don't include them either.
1986 (inherit (texlive-hyphen-package
1987 "texlive-hyphen-spanish" "es"
1988 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-es.tex")
1989 (base32
85892948 1990 "1h3yg9vcq0lf7hxv0ahkqmyg269dxjs8m2mz8sgz5l1fxmvahvaj")))
40b009b8
RW		 1991 (synopsis "Hyphenation patterns for Spanish")
1992 (description "The package provides hyphenation patterns for Spanish in
1993T1/EC and UTF-8 encodings.")
1994 (license license:expat)))
1995
1e7db181
RW		 1996(define-public texlive-hyphen-swedish
1997 (package
1998 (inherit (texlive-hyphen-package
1999 "texlive-hyphen-swedish" "sv"
2000 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-sv.tex")
2001 (base32
85892948 2002 "1n7incy7n24pix1q2i8c3h7i78zpql5ayhskavlmy6mhd7ayncaw")))
1e7db181
RW		 2003 (synopsis "Swedish hyphenation patterns")
2004 (description "This package provides hyphenation patterns for Swedish in
2005T1/EC and UTF-8 encodings.")
2006 (license license:lppl1.2+)))
2007
3eaee8fb
RW		 2008(define-public texlive-hyphen-thai
2009 (package
2010 (inherit (texlive-hyphen-package
2011 "texlive-hyphen-thai" "th"
2012 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-th.tex")
2013 (base32
85892948 2014 "00gxcs4jfqifd5cnrjipn77m73fmpw2qms4lp216jj3kz4a7h9kf")))
3eaee8fb
RW		 2015 (synopsis "Thai hyphenation patterns")
2016 (description "This package provides hyphenation patterns for Thai in LTH
2017and UTF-8 encodings.")
2018 (license license:lppl1.3+)))
2019
e80ecb7b
RW		 2020(define-public texlive-hyphen-turkish
2021 (let ((template (texlive-hyphen-package
2022 "texlive-hyphen-turkish" "tr"
85892948 2023 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-tr.tex")
e80ecb7b 2024 (base32
85892948 2025 "04sihjgpm31i5bi67rrfp15w3imn7hxwwk70v0vhx053ghxy72vh"))))
e80ecb7b
RW		 2026 (package
2027 (inherit template)
e80ecb7b
RW		 2028 (synopsis "Hyphenation patterns for Turkish")
2029 (description "The package provides hyphenation patterns for Turkish in
2030T1/EC and UTF-8 encodings. The patterns for Turkish were first produced for
2031the Ottoman Texts Project in 1987 and were suitable for both Modern Turkish
2032and Ottoman Turkish in Latin script, however the required character set didn't
2033fit into EC encoding, so support for Ottoman Turkish had to be dropped to keep
2034compatibility with 8-bit engines.")
2035 (license license:lppl1.0+))))
2036
5f50dd95
RW		 2037(define-public texlive-hyphen-turkmen
2038 (let ((template (texlive-hyphen-package
2039 "texlive-hyphen-turkmen" "tk"
85892948 2040 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-tk.tex")
5f50dd95 2041 (base32
85892948 2042 "0g5ip2lw9g47s61mv3cypswc6qm7zy9c4iqq4h19ysvds81adzkr"))))
5f50dd95
RW		 2043 (package
2044 (inherit template)
5f50dd95
RW		 2045 (synopsis "Hyphenation patterns for Turkmen")
2046 (description "The package provides hyphenation patterns for Turkmen in
2047T1/EC and UTF-8 encodings.")
85892948 2048 (license license:expat))))
5f50dd95 2049
cf8f4e1b
RW		 2050(define-public texlive-hyphen-ukrainian
2051 (package
2052 (inherit (texlive-hyphen-package
2053 "texlive-hyphen-ukrainian" "uk"
2054 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-uk.tex")
2055 (base32
85892948 2056 "0fbfhx1fmbshxr4ihsjaqgx251h69h7i288p8gh3w6ysgxr53p60")))
cf8f4e1b
RW		 2057 (synopsis "Ukrainian hyphenation patterns")
2058 (description "This package provides hyphenation patterns for Ukrainian in
2059T2A and UTF-8 encodings.")
2060 ;; No version specified
2061 (license license:lppl)))
2062
71e58125
RW		 2063(define-public texlive-hyphen-uppersorbian
2064 (package
2065 (inherit (texlive-hyphen-package
2066 "texlive-hyphen-uppersorbian" "hsb"
2067 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-hsb.tex")
2068 (base32
85892948 2069 "0x0051wph3sqmzzw6prvjy6bp7gn02rbmys1bmbc210jk3pkylfj")))
71e58125
RW		 2070 (synopsis "Upper Sorbian hyphenation patterns")
2071 (description "This package provides hyphenation patterns for Upper Sorbian
2072in T1/EC and UTF-8 encodings.")
2073 (license license:lppl1.3a+)))
2074
0d4088e4
RW		 2075(define-public texlive-hyphen-welsh
2076 (package
2077 (inherit (texlive-hyphen-package
2078 "texlive-hyphen-welsh" "cy"
2079 (list "/tex/generic/hyph-utf8/patterns/tex/hyph-cy.tex")
2080 (base32
85892948 2081 "1bpxp3jiifdw7waw2idz5j9xgi3526nkxm8mbmsspr4mlf2xyr76")))
0d4088e4
RW		 2082 (synopsis "Welsh hyphenation patterns")
2083 (description "This package provides hyphenation patterns for Welsh in
2084T1/EC and UTF-8 encodings.")
2085 ;; Either license
2086 (license (list license:lppl1.0+ license:expat))))
2087
5153431c
RW		 2088(define-public texlive-hyph-utf8
2089 (package
2090 (inherit (simple-texlive-package
2091 "texlive-hyph-utf8"
2092 (list "/source/generic/hyph-utf8/"
2093 "/source/luatex/hyph-utf8/"
2094 "/doc/luatex/hyph-utf8/"
2095 "/tex/luatex/hyph-utf8/etex.src"
2096 ;; Used to extract luatex-hyphen.lua
2097 "/tex/latex/base/docstrip.tex"
2098
2099 ;; Documentation; we can't use the whole directory because
2100 ;; it includes files from other packages.
2101 "/doc/generic/hyph-utf8/CHANGES"
2102 "/doc/generic/hyph-utf8/HISTORY"
2103 "/doc/generic/hyph-utf8/hyph-utf8.pdf"
2104 "/doc/generic/hyph-utf8/hyph-utf8.tex"
2105 "/doc/generic/hyph-utf8/hyphenation-distribution.pdf"
2106 "/doc/generic/hyph-utf8/hyphenation-distribution.tex"
2107 "/doc/generic/hyph-utf8/img/miktex-languages.png"
2108 "/doc/generic/hyph-utf8/img/texlive-collection.png")
2109 (base32
85892948 2110 "1bar5mc808ch20anhqrdxcwiych359qsvr7mggxpg2l2kq5xdyq0")))
5153431c
RW		 2111 (outputs '("out" "doc"))
2112 (build-system gnu-build-system)
2113 (arguments
2114 `(#:tests? #f ; there are none
2115 #:modules ((guix build gnu-build-system)
2116 (guix build utils)
2117 (ice-9 match))
2118 #:make-flags
2119 (list "-C" "source/luatex/hyph-utf8/"
2120 (string-append "DO_TEX = tex --interaction=nonstopmode '&tex' $<")
2121 (string-append "RUNDIR =" (assoc-ref %outputs "out") "/share/texmf-dist/tex/luatex/hyph-utf8/")
2122 (string-append "DOCDIR =" (assoc-ref %outputs "doc") "/share/texmf-dist/doc/luatex/hyph-utf8/")
2123 ;; hyphen.cfg is neither included nor generated, so let's only build the lua file.
2124 (string-append "UNPACKED = $(NAME).lua"))
2125 #:phases
2126 (modify-phases %standard-phases
2127 ;; TeX isn't usable at this point, so we first need to generate the
2128 ;; tex.fmt.
2129 (replace 'configure
2130 (lambda* (#:key inputs outputs #:allow-other-keys)
2131 ;; Target directories must exist.
2132 (mkdir-p (string-append (assoc-ref %outputs "out")
2133 "/share/texmf-dist/tex/luatex/hyph-utf8/"))
2134 (mkdir-p (string-append (assoc-ref %outputs "doc")
2135 "/share/texmf-dist/doc/luatex/hyph-utf8/"))
2136
2137 ;; We cannot build the documentation because that requires a
2138 ;; fully functional pdflatex, which depends on this package.
2139 (substitute* "source/luatex/hyph-utf8/Makefile"
2140 (("all: .*") "all: $(RUNFILES)\n"))
2141
2142 ;; Find required fonts for building tex.fmt
2143 (setenv "TFMFONTS"
a6405e03 2144 (string-append (assoc-ref inputs "texlive-cm")
5153431c
RW		 2145 "/share/texmf-dist/fonts/tfm/public/cm:"
2146 (assoc-ref inputs "texlive-fonts-knuth-lib")
2147 "/share/texmf-dist/fonts/tfm/public/knuth-lib"))
2148 ;; ...and find all tex files in this environment.
2149 (setenv "TEXINPUTS"
2150 (string-append
2151 (getcwd) ":"
2152 (string-join
2153 (map (match-lambda ((_ . dir) dir)) inputs)
2154 "//:")))
2155
2156 ;; Generate tex.fmt.
2157 (let ((where "source/luatex/hyph-utf8"))
2158 (mkdir-p where)
2159 (with-directory-excursion where
2160 (invoke "tex" "-ini"
2161 (string-append (assoc-ref inputs "texlive-tex-plain")
2162 "/share/texmf-dist/tex/plain/config/tex.ini"))))))
2163 (add-before 'build 'build-loaders-and-converters
2164 (lambda* (#:key outputs #:allow-other-keys)
2165 (let* ((root (string-append (assoc-ref outputs "out")
2166 "/share/texmf-dist"))
2167 (conv
2168 (string-append root
2169 "/tex/generic/hyph-utf8/conversions")))
2170
2171 ;; Build converters
2172 (mkdir-p conv)
2173 (with-directory-excursion "source/generic/hyph-utf8"
2174 (substitute* "generate-converters.rb"
2175 (("\\$path_root=File.*")
2176 (string-append "$path_root=\"" root "\"\n"))
2177 ;; Avoid error with newer Ruby.
2178 (("#1\\{%") "#1{%%"))
2179 (invoke "ruby" "generate-converters.rb"))
2180 #t)))
2181 (replace 'install
2182 (lambda* (#:key source outputs #:allow-other-keys)
2183 (let ((doc (assoc-ref outputs "doc"))
2184 (out (assoc-ref outputs "out")))
2185 (mkdir-p doc)
2186 (copy-recursively
2187 (string-append source "/doc")
2188 (string-append doc "/doc"))
2189 (install-file
2190 (string-append source "/tex/luatex/hyph-utf8/etex.src")
2191 (string-append out "/share/texmf-dist/tex/luatex/hyph-utf8/")))
2192 #t)))))
2193 (native-inputs
2194 `(("ruby" ,ruby)
2195 ("texlive-bin" ,texlive-bin)
2196 ;; The following packages are needed for build "tex.fmt", which we need
2197 ;; for a working "tex".
2198 ("texlive-tex-plain" ,texlive-tex-plain)
a6405e03 2199 ("texlive-cm" ,texlive-cm)
5153431c
RW		 2200 ("texlive-fonts-knuth-lib" ,texlive-fonts-knuth-lib)
2201 ("texlive-hyphen-base" ,texlive-hyphen-base)))
2202 (home-page "https://ctan.org/pkg/hyph-utf8")
2203 (synopsis "Hyphenation patterns expressed in UTF-8")
2204 (description "Modern native UTF-8 engines such as XeTeX and LuaTeX need
2205hyphenation patterns in UTF-8 format, whereas older systems require
2206hyphenation patterns in the 8-bit encoding of the font in use (such encodings
2207are codified in the LaTeX scheme with names like OT1, T2A, TS1, OML, LY1,
2208etc). The present package offers a collection of conversions of existing
2209patterns to UTF-8 format, together with converters for use with 8-bit fonts in
2210older systems. Since hyphenation patterns for Knuthian-style TeX systems are
2211only read at iniTeX time, it is hoped that the UTF-8 patterns, with their
2212converters, will completely supplant the older patterns.")
2213 ;; Individual files each have their own license. Most of these files are
2214 ;; independent hyphenation patterns.
2215 (license (list license:lppl1.0+
2216 license:lppl1.2+
2217 license:lppl1.3
2218 license:lppl1.3+
2219 license:lppl1.3a+
2220 license:lgpl2.1
2221 license:lgpl2.1+
2222 license:lgpl3+
2223 license:gpl2+
2224 license:gpl3+
2225 license:mpl1.1
2226 license:asl2.0
2227 license:expat
2228 license:bsd-3
2229 license:cc0
2230 license:public-domain
2231 license:wtfpl2))))
2232
2233(define-public texlive-generic-hyph-utf8
2234 (deprecated-package "texlive-generic-hyph-utf8" texlive-hyph-utf8))
2235
e68c7091
RW		 2236(define-public texlive-dehyph-exptl
2237 (package
2238 (inherit (simple-texlive-package
2239 "texlive-dehyph-exptl"
2240 (list "/tex/generic/dehyph-exptl/"
2241 "/doc/generic/dehyph-exptl/")
2242 (base32
85892948 2243 "1fnqc63gz8gvdyfz45bx8dxn1r1rwrypahs3bqd2vlc8ff76xp86")
e68c7091
RW		 2244 #:trivial? #t))
2245 (propagated-inputs
2246 `(("texlive-hyphen-base" ,texlive-hyphen-base)
2247 ("texlive-hyph-utf8" ,texlive-hyph-utf8)))
2248 (home-page "http://projekte.dante.de/Trennmuster/WebHome")
2249 (synopsis "Hyphenation patterns for German")
2250 (description "The package provides experimental hyphenation patterns for
2251the German language, covering both traditional and reformed orthography. The
2252patterns can be used with packages Babel and hyphsubst from the Oberdiek
2253bundle.")
2254 ;; Hyphenation patterns are under the Expat license; documentation is
2255 ;; under LPPL.
2256 (license (list license:expat license:lppl))))
2257
2258(define-public texlive-generic-dehyph-exptl
2259 (deprecated-package "texlive-generic-dehyph-exptl" texlive-dehyph-exptl))
2260
10e8b338
RW		 2261(define-public texlive-ukrhyph
2262 (package
2263 (inherit (simple-texlive-package
2264 "texlive-ukrhyph"
2265 (list "/doc/generic/ukrhyph/"
2266 "/tex/generic/ukrhyph/")
2267 (base32
2268 "01ma274sixcrbpb7fpqkxwfvrnzfj2srv9b4a42rfnph1pdql74z")
2269 #:trivial? #t))
2270 (home-page "https://www.ctan.org/pkg/ukrhyph")
2271 (synopsis "Hyphenation patterns for Ukrainian")
2272 (description "The package provides a range of hyphenation patterns for
2273Ukrainian, depending on the encoding of the output font including the standard
2274T2A.")
2275 (license license:lppl)))
2276
c87d8a14
RW		 2277(define-public texlive-ruhyphen
2278 (let ((template (simple-texlive-package
2279 "texlive-ruhyphen"
2280 (list "/source/generic/ruhyphen/"
2281 "/tex/generic/ruhyphen/")
2282 (base32
2283 "18n1bqhh8jv765vz3a3fjwffy7m71vhwx9yq8zl0p5j7p72q9qcn")
2284 #:trivial? #t)))
2285 (package
2286 (inherit template)
2287 (arguments
2288 (substitute-keyword-arguments (package-arguments template)
2289 ((#:phases phases)
2290 `(modify-phases ,phases
2291 (replace 'build
2292 (lambda _
2293 (let ((cwd (getcwd)))
2294 ;; Remove generated files.
2295 (for-each delete-file
2296 (find-files "tex/generic/ruhyphen/"
2297 "^cyry.*.tex$"))
2298 (substitute* "source/generic/ruhyphen/Makefile"
2299 (("./mkcyryo") (string-append cwd "/source/generic/ruhyphen/mkcyryo")))
2300 (with-directory-excursion "tex/generic/ruhyphen"
2301 (invoke "make" "-f"
2302 (string-append cwd "/source/generic/ruhyphen/Makefile"))))))))))
2303 (native-inputs
2304 `(("coreutils" ,coreutils)
2305 ("gawk" ,gawk)
2306 ("sed" ,sed)
2307 ("grep" ,grep)
2308 ("perl" ,perl)))
2309 (home-page "https://www.ctan.org/pkg/ruhyphen")
2310 (synopsis "Hyphenation patterns for Russian")
2311 (description "The package provides a collection of Russian hyphenation
2312patterns supporting a number of Cyrillic font encodings, including T2,
2313UCY (Omega Unicode Cyrillic), LCY, LWN (OT2), and koi8-r.")
2314 (license license:lppl))))
2315
2b254694
RW		 2316(define-public texlive-kpathsea
2317 (package
2318 (inherit (simple-texlive-package
2319 "texlive-kpathsea"
2320 (list "/web2c/amiga-pl.tcx"
2321 "/web2c/cp1250cs.tcx"
2322 "/web2c/cp1250pl.tcx"
2323 "/web2c/cp1250t1.tcx"
2324 "/web2c/cp227.tcx"
2325 "/web2c/cp852-cs.tcx"
2326 "/web2c/cp852-pl.tcx"
2327 "/web2c/cp8bit.tcx"
2328 "/web2c/empty.tcx"
2329 "/web2c/fmtutil.cnf"
2330 "/web2c/il1-t1.tcx"
2331 "/web2c/il2-cs.tcx"
2332 "/web2c/il2-pl.tcx"
2333 "/web2c/il2-t1.tcx"
2334 "/web2c/kam-cs.tcx"
2335 "/web2c/kam-t1.tcx"
2336 "/web2c/macce-pl.tcx"
2337 "/web2c/macce-t1.tcx"
2338 "/web2c/maz-pl.tcx"
2339 "/web2c/mktex.cnf"
2340 "/web2c/mktex.opt"
2341 "/web2c/mktexdir"
2342 "/web2c/mktexdir.opt"
2343 "/web2c/mktexnam"
2344 "/web2c/mktexnam.opt"
2345 "/web2c/mktexupd"
2346 "/web2c/natural.tcx"
2347 "/web2c/tcvn-t5.tcx"
2348 "/web2c/viscii-t5.tcx")
2349 (base32
85892948 2350 "191i8n3g46p53bb9dkx2ggwpzy7skgg0pbklsrpx8x4ayd86wcaf")
2b254694
RW		 2351 #:trivial? #t))
2352 (home-page "https://www.tug.org/texlive/")
2353 (synopsis "Files related to the path searching library for TeX")
2354 (description "Kpathsea is a library and utility programs which provide
2355path searching facilities for TeX file types, including the self-locating
2356feature required for movable installations, layered on top of a general search
2357mechanism. This package provides supporting files.")
2358 (license license:lgpl3+)))
2359
57680dc2
RW		 2360(define-public texlive-latexconfig
2361 (package
2362 (inherit (simple-texlive-package
2363 "texlive-latexconfig"
2364 (list "/tex/latex/latexconfig/")
2365 (base32
2366 "1wa7yhdpnz1nyidwgli68fyr33jn951bnniqrih5lj98k09rqc3h")
2367 #:trivial? #t))
2368 (home-page "https://www.tug.org/")
2369 (synopsis "Configuration files for LaTeX-related formats")
2370 (description "The package provides configuration files for LaTeX-related
2371formats.")
2372 (license license:lppl)))
2373
010f476f 2374(define-public texlive-latex-base
09e2f258
RW		 2375 (let ((template (simple-texlive-package
2376 "texlive-latex-base"
2377 (list "/doc/latex/base/"
2378 "/source/latex/base/"
2379 ;; Almost all files in /tex/latex/base are generated, but
2380 ;; these are not:
2381 "/tex/latex/base/idx.tex"
2382 "/tex/latex/base/lablst.tex"
09e2f258
RW		 2383 "/tex/latex/base/ltnews.cls"
2384 "/tex/latex/base/ltxcheck.tex"
2385 "/tex/latex/base/ltxguide.cls"
2386 "/tex/latex/base/minimal.cls"
2387 "/tex/latex/base/sample2e.tex"
2388 "/tex/latex/base/small2e.tex"
09e2f258
RW		 2389 "/tex/latex/base/testpage.tex"
2390 "/tex/latex/base/texsys.cfg")
2391 (base32
85892948 2392 "0m0gjb4hbsf2iqkkx3px4f28r2scjvsjv4zb2whkbnb44apyw1f0")
09e2f258
RW		 2393 #:trivial? #t)))
2394 (package
2395 (inherit template)
2396 (arguments
2397 (substitute-keyword-arguments (package-arguments template)
2398 ((#:modules modules '())
2399 '((guix build gnu-build-system)
2400 (guix build utils)
2401 (ice-9 match)
2402 (srfi srfi-26)))
2403 ((#:phases phases)
2404 `(modify-phases ,phases
201015b1
RW		 2405 ;; The literal tab in the dtx file is translated to the string
2406 ;; "^^I" in the generated Lua file, which causes a syntax error.
2407 (add-after 'unpack 'fix-lua-sources
2408 (lambda _
2409 (substitute* "source/latex/base/ltluatex.dtx"
2410 ((" ") " "))
2411 #t))
09e2f258
RW		 2412 (replace 'build
2413 (lambda* (#:key inputs #:allow-other-keys)
2414 ;; Find required fonts
2415 (setenv "TFMFONTS"
2416 (string-join
2417 (map (match-lambda
2418 ((pkg-name . dir)
2419 (string-append
2420 (assoc-ref inputs pkg-name)
2421 "/share/texmf-dist/fonts/tfm/public"
2422 dir)))
2423 '(("texlive-etex" . "/etex")
2424 ("texlive-cm" . "/cm")
2425 ("texlive-fonts-latex" . "/latex-fonts")
2426 ("texlive-fonts-knuth-lib" . "/knuth-lib")))
2427 ":"))
2428 (let ((cwd (getcwd)))
2429 (setenv "TEXINPUTS"
2430 (string-append
2431 cwd "//:"
2432 cwd "/source/latex/base//:"
2433 cwd "/build:"
2434 (string-join
2435 (map (match-lambda ((_ . dir) dir)) inputs)
2436 "//:"))))
2437
2438 ;; This is the actual build step.
2439 (mkdir "build")
2440 (invoke "tex" "-ini" "-interaction=scrollmode"
2441 "-output-directory=build" "unpack.ins")
2442
2443 ;; XXX: We can't build all formats at this point, nor are they
2444 ;; part of the LaTeX base, so we disable them. Actually, we
2445 ;; should be running this all in a profile hook, so that only
2446 ;; selected formats and hyphenation patterns are included, but it
2447 ;; takes long and TeX Live isn't designed to be modular like
2448 ;; that. Everything operates on a shared directory, which we
2449 ;; would only have at profile generation time.
2450 (let ((disabled-formats
2451 '("aleph aleph" "lamed aleph" "uptex uptex" "euptex euptex"
2452 "eptex eptex" "ptex ptex" "pdfxmltex pdftex" "platex eptex"
2453 "csplain pdftex" "mf mf-nowin" "mex pdftex" "pdfmex pdftex"
85892948 2454 "luacsplain luatex"
09e2f258
RW		 2455 "cont-en xetex" "cont-en pdftex" "pdfcsplain xetex"
2456 "pdfcsplain pdftex" "pdfcsplain luatex" "cslatex pdftex"
2457 "mptopdf pdftex" "uplatex euptex" "jadetex pdftex"
2458 "amstex pdftex" "pdfcslatex pdftex" "lollipop tex"
2459 "xmltex pdftex" "pdfjadetex pdftex" "eplain pdftex"
2460 "texsis pdftex" "mltex pdftex" "utf8mex pdftex")))
2461 (mkdir "web2c")
2462 (install-file (string-append
2463 (assoc-ref inputs "texlive-kpathsea")
2464 "/share/texmf-dist/web2c/fmtutil.cnf")
2465 "web2c")
2466 (make-file-writable "web2c/fmtutil.cnf")
2467 (substitute* "web2c/fmtutil.cnf"
2468 (((string-append "^(" (string-join disabled-formats "|") ")") m)
2469 (string-append "#! " m))))
2470 (invoke "fmtutil-sys" "--all"
2471 "--fmtdir=web2c"
2472 (string-append "--cnffile=web2c/fmtutil.cnf"))
2473 ;; We don't actually want to install it.
2474 (delete-file "web2c/fmtutil.cnf")
2475 #t))
2476 (add-after 'install 'install-more
2477 (lambda* (#:key inputs outputs #:allow-other-keys)
2478 (let* ((out (assoc-ref outputs "out"))
2479 (root (string-append out "/share/texmf-dist"))
2480 (target (string-append root "/tex/latex/base"))
2481 (web2c (string-append root "/web2c"))
2482 (makeindex (string-append root "/makeindex/latex")))
2483 (for-each delete-file (find-files "." "\\.(log|aux)$"))
2484
2485 ;; The usedir directive in docstrip.ins is ignored, so these
2486 ;; two files end up in the wrong place. Move them.
2487 (mkdir-p makeindex)
2488 (for-each (lambda (file)
2489 (install-file file makeindex)
2490 (delete-file file))
2491 '("build/gglo.ist"
2492 "build/gind.ist"))
2493 (for-each (cut install-file <> target)
2494 (find-files "build" ".*"))
2495 (for-each (cut install-file <> web2c)
2496 (find-files "web2c" ".*"))
2497 #t)))))))
2498 (native-inputs
2499 `(("texlive-bin" ,texlive-bin)
2500 ("texlive-tex-ini-files" ,texlive-tex-ini-files)
2501 ("texlive-tex-plain" ,texlive-tex-plain)
2502 ("texlive-kpathsea" ,texlive-kpathsea)
2503 ("texlive-cm" ,texlive-cm)
2504 ("texlive-fonts-latex" ,texlive-fonts-latex)
2505 ("texlive-fonts-knuth-lib" ,texlive-fonts-knuth-lib)
2506 ("texlive-luatexconfig"
2507 ,(texlive-origin
2508 "texlive-luatexconfig" (number->string %texlive-revision)
2509 (list "/tex/generic/config/luatex-unicode-letters.tex"
2510 "/tex/generic/config/luatexiniconfig.tex"
2511 "/web2c/texmfcnf.lua")
2512 (base32
85892948 2513 "1gi87wy12r8w8fhx9ajcid382dmqzf6b9070b5nndvbbjrvhwf23")))))
09e2f258
RW		 2514 (propagated-inputs
2515 `(("texlive-dehyph-exptl" ,texlive-dehyph-exptl)
2516 ("texlive-etex" ,texlive-etex)
2517 ("texlive-hyph-utf8" ,texlive-hyph-utf8)
2518 ("texlive-hyphen-base" ,texlive-hyphen-base)
2519 ("texlive-hyphen-afrikaans" ,texlive-hyphen-afrikaans)
2520 ("texlive-hyphen-ancientgreek" ,texlive-hyphen-ancientgreek)
2521 ("texlive-hyphen-armenian" ,texlive-hyphen-armenian)
2522 ("texlive-hyphen-basque" ,texlive-hyphen-basque)
2523 ("texlive-hyphen-belarusian" ,texlive-hyphen-belarusian)
2524 ("texlive-hyphen-bulgarian" ,texlive-hyphen-bulgarian)
2525 ("texlive-hyphen-catalan" ,texlive-hyphen-catalan)
2526 ("texlive-hyphen-chinese" ,texlive-hyphen-chinese)
2527 ("texlive-hyphen-churchslavonic" ,texlive-hyphen-churchslavonic)
2528 ("texlive-hyphen-coptic" ,texlive-hyphen-coptic)
2529 ("texlive-hyphen-croatian" ,texlive-hyphen-croatian)
2530 ("texlive-hyphen-czech" ,texlive-hyphen-czech)
2531 ("texlive-hyphen-danish" ,texlive-hyphen-danish)
2532 ("texlive-hyphen-dutch" ,texlive-hyphen-dutch)
2533 ("texlive-hyphen-english" ,texlive-hyphen-english)
2534 ("texlive-hyphen-esperanto" ,texlive-hyphen-esperanto)
2535 ("texlive-hyphen-estonian" ,texlive-hyphen-estonian)
2536 ("texlive-hyphen-ethiopic" ,texlive-hyphen-ethiopic)
2537 ("texlive-hyphen-finnish" ,texlive-hyphen-finnish)
2538 ("texlive-hyphen-french" ,texlive-hyphen-french)
2539 ("texlive-hyphen-friulan" ,texlive-hyphen-friulan)
2540 ("texlive-hyphen-galician" ,texlive-hyphen-galician)
2541 ("texlive-hyphen-georgian" ,texlive-hyphen-georgian)
2542 ("texlive-hyphen-german" ,texlive-hyphen-german)
2543 ("texlive-hyphen-greek" ,texlive-hyphen-greek)
2544 ("texlive-hyphen-hungarian" ,texlive-hyphen-hungarian)
2545 ("texlive-hyphen-icelandic" ,texlive-hyphen-icelandic)
2546 ("texlive-hyphen-indic" ,texlive-hyphen-indic)
2547 ("texlive-hyphen-indonesian" ,texlive-hyphen-indonesian)
2548 ("texlive-hyphen-interlingua" ,texlive-hyphen-interlingua)
2549 ("texlive-hyphen-irish" ,texlive-hyphen-irish)
2550 ("texlive-hyphen-italian" ,texlive-hyphen-italian)
2551 ("texlive-hyphen-kurmanji" ,texlive-hyphen-kurmanji)
2552 ("texlive-hyphen-latin" ,texlive-hyphen-latin)
2553 ("texlive-hyphen-latvian" ,texlive-hyphen-latvian)
2554 ("texlive-hyphen-lithuanian" ,texlive-hyphen-lithuanian)
2555 ("texlive-hyphen-mongolian" ,texlive-hyphen-mongolian)
2556 ("texlive-hyphen-norwegian" ,texlive-hyphen-norwegian)
2557 ("texlive-hyphen-occitan" ,texlive-hyphen-occitan)
85892948 2558 ("texlive-hyphen-pali" ,texlive-hyphen-pali)
09e2f258
RW		 2559 ("texlive-hyphen-piedmontese" ,texlive-hyphen-piedmontese)
2560 ("texlive-hyphen-polish" ,texlive-hyphen-polish)
2561 ("texlive-hyphen-portuguese" ,texlive-hyphen-portuguese)
2562 ("texlive-hyphen-romanian" ,texlive-hyphen-romanian)
2563 ("texlive-hyphen-romansh" ,texlive-hyphen-romansh)
2564 ("texlive-hyphen-russian" ,texlive-hyphen-russian)
2565 ("texlive-hyphen-sanskrit" ,texlive-hyphen-sanskrit)
2566 ("texlive-hyphen-serbian" ,texlive-hyphen-serbian)
2567 ("texlive-hyphen-slovak" ,texlive-hyphen-slovak)
2568 ("texlive-hyphen-slovenian" ,texlive-hyphen-slovenian)
2569 ("texlive-hyphen-spanish" ,texlive-hyphen-spanish)
2570 ("texlive-hyphen-swedish" ,texlive-hyphen-swedish)
2571 ("texlive-hyphen-thai" ,texlive-hyphen-thai)
2572 ("texlive-hyphen-turkish" ,texlive-hyphen-turkish)
2573 ("texlive-hyphen-turkmen" ,texlive-hyphen-turkmen)
2574 ("texlive-hyphen-ukrainian" ,texlive-hyphen-ukrainian)
2575 ("texlive-hyphen-uppersorbian" ,texlive-hyphen-uppersorbian)
2576 ("texlive-hyphen-welsh" ,texlive-hyphen-welsh)
2577 ("texlive-unicode-data" ,texlive-unicode-data)
2578 ("texlive-ukrhyph" ,texlive-ukrhyph)
2579 ("texlive-ruhyphen" ,texlive-ruhyphen)
2580 ("texlive-latexconfig" ,texlive-latexconfig)))
2581 (home-page "https://www.ctan.org/pkg/latex-base")
2582 (synopsis "Base sources of LaTeX")
2583 (description
2584 "This bundle comprises the source of LaTeX itself, together with several
010f476f
RW		 2585packages which are considered \"part of the kernel\". This bundle, together
2586with the required packages, constitutes what every LaTeX distribution should
2587contain.")
09e2f258 2588 (license license:lppl1.3c+))))
010f476f 2589
3e485ed2
RW		 2590(define-public texlive-latex-filecontents
2591 (package
2592 (name "texlive-latex-filecontents")
2593 (version (number->string %texlive-revision))
2594 (source (origin
2595 (method svn-fetch)
2596 (uri (texlive-ref "latex" "filecontents"))
7e353a77 2597 (file-name (string-append name "-" version "-checkout"))
3e485ed2
RW		 2598 (sha256
2599 (base32
85892948 2600 "1h78zw0vhldx478zs4v86ajg7vpkysd1kg3npc480qqls3q6ba40"))))
3e485ed2
RW		 2601 (build-system texlive-build-system)
2602 (arguments '(#:tex-directory "latex/filecontents"))
b8d8806b 2603 (home-page "https://www.ctan.org/pkg/filecontents")
3e485ed2
RW		 2604 (synopsis "Extended filecontents and filecontents* environments")
2605 (description
2606 "LaTeX2e's @code{filecontents} and @code{filecontents*} environments
2607enable a LaTeX source file to generate external files as it runs through
2608LaTeX. However, there are two limitations of these environments: they refuse
2609to overwrite existing files, and they can only be used in the preamble of a
2610document. The filecontents package removes these limitations, letting you
2611overwrite existing files and letting you use @code{filecontents} /
2612@code{filecontents*} anywhere.")
2613 (license license:lppl1.3c+)))
2614
1193aa89
RW		 2615(define-public texlive-generic-ifxetex
2616 (package
2617 (name "texlive-generic-ifxetex")
fea8eef3 2618 (version (number->string %texlive-revision))
1193aa89
RW		 2619 (source (origin
2620 (method svn-fetch)
2621 (uri (texlive-ref "generic" "ifxetex"))
24dbc602 2622 (file-name (string-append name "-" version "-checkout"))
1193aa89
RW		 2623 (sha256
2624 (base32
2625 "0w2xj7n0szavj329kds09q626szkc378p3w0sk022q0ln4ksz86d"))))
2626 (build-system texlive-build-system)
2627 (arguments
2628 '(#:tex-directory "generic/ifxetex"
2629 #:tex-format "xelatex"))
2630 (inputs
2631 `(("texlive-latex-filecontents" ,texlive-latex-filecontents)))
b8d8806b 2632 (home-page "https://www.ctan.org/pkg/ifxetex")
1193aa89
RW		 2633 (synopsis "Am I running under XeTeX?")
2634 (description
2635 "This is a simple package which provides an @code{\\ifxetex} conditional,
2636so that other code can determine that it is running under XeTeX. The package
beb476ed 2637requires the e-TeX extensions to the TeX primitive set.")
1193aa89
RW		 2638 (license license:lppl1.3c+)))
2639
f104ff61 2640(define-public texlive-epsf
9186c156 2641 (package
f104ff61
RW		 2642 (inherit (simple-texlive-package
2643 "texlive-epsf"
2644 (list "/doc/generic/epsf/"
2645 "/tex/generic/epsf/")
2646 (base32
2647 "03jcf0kqh47is965d2590miwj7d5kif3c4mgsnvkyl664jzjkh92")
2648 #:trivial? #t))
b8d8806b 2649 (home-page "https://www.ctan.org/pkg/epsf")
9186c156
RW		 2650 (synopsis "Simple macros for EPS inclusion")
2651 (description
2652 "This package provides the original (and now obsolescent) graphics
2653inclusion macros for use with dvips, still widely used by Plain TeX users (in
2654particular). For LaTeX users, the package is nowadays (rather strongly)
2655deprecated in favour of the more sophisticated standard LaTeX latex-graphics
2656bundle of packages. (The latex-graphics bundle is also available to Plain TeX
2657users, via its Plain TeX version.)")
2658 (license license:public-domain)))
2659
f104ff61
RW		 2660(define-public texlive-generic-epsf
2661 (deprecated-package "texlive-generic-epsf" texlive-epsf))
2662
437822a1
RW		 2663(define-public texlive-latex-fancyvrb
2664 (package
85892948
MB		 2665 (inherit (simple-texlive-package
2666 "texlive-latex-fancyvrb"
2667 (list "/doc/latex/fancyvrb/README"
2668 "/tex/latex/fancyvrb/")
2669 (base32
2670 "1dwkcradz9nwpjwmv1sjzn77lvw25ypr0rrgmf1kd8pd2mw7dxcn")
2671 #:trivial? #t))
b8d8806b 2672 (home-page "https://www.ctan.org/pkg/fancyvrb")
437822a1
RW		 2673 (synopsis "Sophisticated verbatim text")
2674 (description
2675 "This package provides tools for the flexible handling of verbatim text
2676including: verbatim commands in footnotes; a variety of verbatim environments
2677with many parameters; ability to define new customized verbatim environments;
2678save and restore verbatim text and environments; write and read files in
2679verbatim mode; build \"example\" environments (showing both result and
2680verbatim source).")
2681 (license license:lppl1.0+)))
2682
f1b0939d
RW		 2683(define-public texlive-graphics-def
2684 (package
2685 (inherit (simple-texlive-package
2686 "texlive-graphics-def"
2687 (list "/doc/latex/graphics-def/README.md"
2688 "/tex/latex/graphics-def/")
2689 (base32
2690 "0zrbn9cwfnnrrl3b2zsd74ldksp9jwpvjh7z93ild1m75crpb39a")
2691 #:trivial? #t))
2692 (home-page "https://www.ctan.org/pkg/latex-graphics")
2693 (synopsis "Color and graphics option files")
2694 (description
2695 "This bundle is a combined distribution consisting of @file{dvips.def},
2696@file{pdftex.def}, @file{luatex.def}, @file{xetex.def}, @file{dvipdfmx.def},
2697and @file{dvisvgm.def} driver option files for the LaTeX graphics and color
2698packages.")
2699 (license license:lppl1.3c+)))
2700
83a5c617
RW		 2701(define-public texlive-graphics-cfg
2702 (package
2703 (inherit (simple-texlive-package
2704 "texlive-graphics-cfg"
2705 (list "/doc/latex/graphics-cfg/README.md"
2706 "/tex/latex/graphics-cfg/")
2707 (base32
2708 "00n63adb2laf43lzix39xl68aq0k5k80mmrw602w99w5n7f96gsf")
2709 #:trivial? #t))
2710 (home-page "https://www.ctan.org/pkg/latex-graphics")
2711 (synopsis "Sample configuration files for LaTeX color and graphics")
2712 (description
2713 "This bundle includes @file{color.cfg} and @file{graphics.cfg} files that
2714set default \"driver\" options for the color and graphics packages.")
2715 (license license:public-domain)))
2716
4eebd2cd
RW		 2717(define-public texlive-latex-graphics
2718 (package
2719 (name "texlive-latex-graphics")
2720 (version (number->string %texlive-revision))
2721 (source (origin
2722 (method svn-fetch)
2723 (uri (texlive-ref "latex" "graphics"))
f7302073 2724 (file-name (string-append name "-" version "-checkout"))
4eebd2cd
RW		 2725 (sha256
2726 (base32
d4d9a1ec 2727 "0nlfhn55ax89rcvpkrl9570671b62kcr4c9l5ch3w5zw9vmi00dz"))))
4eebd2cd 2728 (build-system texlive-build-system)
152950d4
RW		 2729 (arguments '(#:tex-directory "latex/graphics"))
2730 (propagated-inputs
2731 `(("texlive-graphics-cfg" ,texlive-graphics-cfg)
2732 ("texlive-graphics-def" ,texlive-graphics-def)))
b8d8806b 2733 (home-page "https://www.ctan.org/pkg/latex-graphics")
4eebd2cd
RW		 2734 (synopsis "LaTeX standard graphics bundle")
2735 (description
2736 "This is a collection of LaTeX packages for producing color, including
2737graphics (e.g. PostScript) files, and rotation and scaling of text in LaTeX
2738documents. It comprises the packages color, graphics, graphicx, trig, epsfig,
2739keyval, and lscape.")
152950d4 2740 (license license:lppl1.3c+)))
4eebd2cd 2741
266e0742
RW		 2742(define-public texlive-xcolor
2743 (let ((template (simple-texlive-package
2744 "texlive-xcolor"
2745 (list "/doc/latex/xcolor/"
2746 "/source/latex/xcolor/")
2747 (base32
2748 "12q6spmpxg30alhvarjmxzigmz7lazapbrb0mc4vhbn6n1sdz7pp"))))
2749 (package
2750 (inherit template)
2751 (arguments
2752 (substitute-keyword-arguments (package-arguments template)
2753 ((#:tex-directory _ #t)
2754 "latex/xcolor")
2755 ((#:phases phases)
2756 `(modify-phases ,phases
2757 (add-after 'unpack 'chdir
2758 (lambda _ (chdir "source/latex/xcolor") #t))
2759 (add-after 'install 'move-files
2760 (lambda* (#:key outputs #:allow-other-keys)
2761 (let ((share (string-append (assoc-ref outputs "out")
2762 "/share/texmf-dist")))
2763 (mkdir-p (string-append share "/dvips/xcolor"))
2764 (rename-file (string-append share "/tex/latex/xcolor/xcolor.pro")
2765 (string-append share "/dvips/xcolor/xcolor.pro"))
2766 #t)))))))
2767 (home-page "https://www.ctan.org/pkg/xcolor")
2768 (synopsis "Driver-independent color extensions for LaTeX and pdfLaTeX")
2769 (description
2770 "The package starts from the basic facilities of the colorcolor package,
f5a6af42
RW		 2771and provides easy driver-independent access to several kinds of color tints,
2772shades, tones, and mixes of arbitrary colors. It allows a user to select a
2773document-wide target color model and offers complete tools for conversion
2774between eight color models. Additionally, there is a command for alternating
2775row colors plus repeated non-aligned material (like horizontal lines) in
2776tables.")
266e0742
RW		 2777 (license license:lppl1.2+))))
2778
2779(define-public texlive-latex-xcolor
2780 (deprecated-package "texlive-latex-xcolor" texlive-xcolor))
f5a6af42 2781
4d660fdf
RW		 2782(define-public texlive-latex-hyperref
2783 (package
2784 (name "texlive-latex-hyperref")
2785 (version "6.84a2")
2786 ;; The sources in the TeX Live SVN repository do not contain hluatex.dtx,
2787 ;; so we fetch the release from GitHub.
2788 (source (origin
2789 (method url-fetch)
2790 (uri (string-append "https://github.com/ho-tex/hyperref/"
2791 "archive/release-" version ".tar.gz"))
2792 (file-name (string-append name "-" version ".tar.gz"))
2793 (sha256
2794 (base32
2795 "1d3rmjgzh0025a1dza55zb6nzzlgd1y9snwx45wq1c1vf42m79h2"))))
2796 (build-system texlive-build-system)
2797 (arguments '(#:tex-directory "latex/hyperref"))
2a0bcbf4
RW		 2798 (propagated-inputs
2799 `(("texlive-latex-oberdiek" ,texlive-latex-oberdiek) ; for ltxcmds.sty
2800 ("texlive-latex-url" ,texlive-latex-url)))
b8d8806b 2801 (home-page "https://www.ctan.org/pkg/hyperref")
4d660fdf
RW		 2802 (synopsis "Extensive support for hypertext in LaTeX")
2803 (description
c5a8ecb6
RW		 2804 "The @code{hyperref} package is used to handle cross-referencing commands
2805in LaTeX to produce hypertext links in the document. The package provides
2806backends for the @code{\\special} set defined for HyperTeX DVI processors; for
2807embedded @code{pdfmark} commands for processing by Acrobat
2808Distiller (@code{dvips} and Y&Y's @code{dvipsone}); for Y&Y's @code{dviwindo};
2809for PDF control within pdfTeX and @code{dvipdfm}; for TeX4ht; and for VTeX's
2810pdf and HTML backends. The package is distributed with the @code{backref} and
2811@code{nameref} packages, which make use of the facilities of @code{hyperref}.")
4d660fdf
RW		 2812 (license license:lppl1.3+)))
2813
c3455b7d
RW		 2814(define-public texlive-latex-oberdiek
2815 (package
2816 (name "texlive-latex-oberdiek")
2817 (version (number->string %texlive-revision))
2818 (source (origin
2819 (method svn-fetch)
2820 (uri (texlive-ref "latex" "oberdiek"))
7dea3119 2821 (file-name (string-append name "-" version "-checkout"))
c3455b7d
RW		 2822 (sha256
2823 (base32
85892948 2824 "0pi2d6gsddcs9wprdbar46s91kdc5fxl1m79g7xrbccsx8s9xbml"))))
c3455b7d
RW		 2825 (build-system texlive-build-system)
2826 (arguments
2827 '(#:tex-directory "latex/oberdiek"
05d28068 2828 #:build-targets '("oberdiek.ins")
c3455b7d
RW		 2829 #:phases
2830 (modify-phases %standard-phases
05d28068 2831 ;; "ifpdf.ins" is not generated, so we need to process the dtx file.
c3455b7d
RW		 2832 (add-after 'unpack 'do-not-process-ifpdf.ins
2833 (lambda _
2834 (substitute* "oberdiek.ins"
05d28068 2835 (("ifpdf.ins") "ifpdf.dtx"))
c3455b7d 2836 #t)))))
a9cd7b03
RW		 2837 (propagated-inputs
2838 `(("texlive-generic-ifxetex" ,texlive-generic-ifxetex)))
b8d8806b 2839 (home-page "https://www.ctan.org/pkg/oberdiek")
c3455b7d
RW		 2840 (synopsis "Bundle of packages submitted by Heiko Oberdiek")
2841 (description
2842 "The bundle comprises various LaTeX packages, providing among others:
2843better accessibility support for PDF files; extensible chemists reaction
2844arrows; record information about document class(es) used; and many more.")
2845 (license license:lppl1.3+)))
2846
f2536af2
RW		 2847(define-public texlive-latex-tools
2848 (package
2849 (name "texlive-latex-tools")
2850 (version (number->string %texlive-revision))
2851 (source (origin
2852 (method svn-fetch)
2853 (uri (texlive-ref "latex" "tools"))
f8340ab1 2854 (file-name (string-append name "-" version "-checkout"))
f2536af2
RW		 2855 (sha256
2856 (base32
85892948 2857 "1wqvn4z0s92h5iqzrvxw7hinzp95avjk9v8lnqbqr4kz6nv4xb9l"))))
f2536af2
RW		 2858 (build-system texlive-build-system)
2859 (arguments
2860 '(#:tex-directory "latex/tools"
2861 #:build-targets '("tools.ins")))
b8d8806b 2862 (home-page "https://www.ctan.org/pkg/latex-tools")
f2536af2
RW		 2863 (synopsis "LaTeX standard tools bundle")
2864 (description
2865 "This package is a collection of (variously) simple tools provided as
2866part of the LaTeX required tools distribution, comprising the following
2867packages: afterpage, array, bm, calc, dcolumn, delarray, enumerate, fileerr,
2868fontsmpl, ftnright, hhline, indentfirst, layout, longtable, multicol,
2869rawfonts, showkeys, somedefs, tabularx, theorem, trace, varioref, verbatim,
2870xr, and xspace.")
2871 (license license:lppl1.3+)))
2872
c97d1a91 2873(define-public texlive-url
35adcc3a 2874 (package
c97d1a91
RW		 2875 (inherit (simple-texlive-package
2876 "texlive-url"
2877 (list "/doc/latex/url/"
2878 "/tex/latex/url/")
2879 (base32
2880 "184m40wgnx939ky2hbxnj0v9aak023ldrhgffp0lgyk9wdqpxlqg")
2881 #:trivial? #t))
35adcc3a
RW		 2882 (home-page "https://www.ctan.org/pkg/url")
2883 (synopsis "Verbatim with URL-sensitive line breaks")
2884 (description "The command @code{\\url} is a form of verbatim command that
2885allows linebreaks at certain characters or combinations of characters, accepts
2886reconfiguration, and can usually be used in the argument to another command.
2887The command is intended for email addresses, hypertext links,
2888directories/paths, etc., which normally have no spaces, so by default the
2889package ignores spaces in its argument. However, a package option allows
2890spaces, which is useful for operating systems where spaces are a common part
2891of file names.")
2892 ;; The license header states that it is under LPPL version 2 or later, but
2893 ;; the latest version is 1.3c.
2894 (license license:lppl1.3c+)))
2895
c97d1a91
RW		 2896(define-public texlive-latex-url
2897 (deprecated-package "texlive-latex-url" texlive-url))
2898
192ad4d1
RW		 2899(define-public texlive-tetex
2900 (package
2901 (inherit (simple-texlive-package
2902 "texlive-tetex"
2903 (list "/dvips/tetex/"
2904 "/fonts/enc/dvips/tetex/"
2905 "/fonts/map/dvips/tetex/")
2906 (base32
2907 "1si3as8mwi8837965djlw6jhwwzsp3r1hkflvdxv2avx9vb45hjb")
2908 #:trivial? #t))
2909 (home-page "https://www.ctan.org/pkg/tetex")
2910 (synopsis "Font maps originally from teTeX")
2911 (description "This package provides font maps that were originally part of
2912the now obsolete teTeX distributions but are still used at the core of the TeX
2913Live distribution.")
2914 (license license:public-domain)))
2915
a5b1ef84
RW		 2916(define-public texlive-latex-l3kernel
2917 (package
2918 (name "texlive-latex-l3kernel")
2919 (version (number->string %texlive-revision))
2920 (source (origin
2921 (method svn-fetch)
2922 (uri (texlive-ref "latex" "l3kernel"))
f4a39a5b 2923 (file-name (string-append name "-" version "-checkout"))
a5b1ef84
RW		 2924 (sha256
2925 (base32
85892948 2926 "0s77z2cbv841l45qrpf0s8qhzfa4wi689lg7zkw88qg18nzvy0ly"))))
a5b1ef84
RW		 2927 (build-system texlive-build-system)
2928 (arguments
2929 '(#:tex-directory "latex/l3kernel"))
b8d8806b 2930 (home-page "https://www.ctan.org/pkg/l3kernel")
a5b1ef84
RW		 2931 (synopsis "LaTeX3 programmers’ interface")
2932 (description
2933 "The l3kernel bundle provides an implementation of the LaTeX3
2934programmers’ interface, as a set of packages that run under LaTeX 2e. The
2935interface provides the foundation on which the LaTeX3 kernel and other future
2936code are built: it is an API for TeX programmers. The packages are set up so
2937that the LaTeX3 conventions can be used with regular LaTeX 2e packages.")
2938 (license license:lppl1.3c+)))
2939
cc09d48b
RW		 2940(define-public texlive-latex-l3packages
2941 (package
2942 (name "texlive-latex-l3packages")
2943 (version (number->string %texlive-revision))
2944 (source (origin
2945 (method svn-fetch)
2946 (uri (texlive-ref "latex" "l3packages"))
b749aa98 2947 (file-name (string-append name "-" version "-checkout"))
cc09d48b
RW		 2948 (sha256
2949 (base32
85892948 2950 "1cv4fk9pabh7mkxhfsdmh4k8xpmzg1psgcsvd11c869m7n3a629h"))))
cc09d48b
RW		 2951 (build-system texlive-build-system)
2952 (arguments
2953 '(#:tex-directory "latex/l3packages"
3d4908a7
PN		 2954 ;; build-targets must be specified manually since they are in
2955 ;; sub-directories.
2956 #:build-targets '("l3keys2e.ins" "xparse.ins" "xfrac.ins" "xfp.ins" "xtemplate.ins")
cc09d48b
RW		 2957 #:phases
2958 (modify-phases %standard-phases
2959 ;; All package sources are in sub-directories, so we need to add them
2960 ;; to TEXINPUTS.
2961 (add-after 'unpack 'set-TEXINPUTS
2962 (lambda _
2963 (let ((cwd (getcwd)))
2964 (setenv "TEXINPUTS"
2965 (string-append cwd "/l3keys2e:"
2966 cwd "/xparse:"
2967 cwd "/xfrac:"
2968 cwd "/xfp:"
3d4908a7
PN		 2969 cwd "/xtemplate"
2970 ;; The terminating ":" is required to include the
2971 ;; l3kernel input as well.
2972 ":")))
2973 #t)))
2974 ))
2fea7041 2975 (propagated-inputs
cc09d48b 2976 `(("texlive-latex-l3kernel" ,texlive-latex-l3kernel)))
b8d8806b 2977 (home-page "https://www.ctan.org/pkg/l3packages")
cc09d48b
RW		 2978 (synopsis "High-level LaTeX3 concepts")
2979 (description
2980 "This bundle holds prototype implementations of concepts for a LaTeX
2981designer interface, to be used with the experimental LaTeX kernel as
2982programming tools and kernel sup­port. Packages provided in this release are:
2983
2984@enumerate
2985@item l3keys2e, which makes the facilities of the kernel module l3keys
2986 available for use by LaTeX 2e packages;
2987@item xfrac, which provides flexible splitlevel fractions;
2988@item xparse, which provides a high-level interface for declaring document
2989 commands; and
2990@item xtemplate, which provides a means of defining generic functions using a
2991 key-value syntax.
2992@end enumerate\n")
2993 (license license:lppl1.3c+)))
2994
58308491
RW		 2995(define-public texlive-latex-fontspec
2996 (package
2997 (name "texlive-latex-fontspec")
2998 (version (number->string %texlive-revision))
2999 (source (origin
3000 (method svn-fetch)
3001 (uri (texlive-ref "latex" "fontspec"))
634a4a7f 3002 (file-name (string-append name "-" version "-checkout"))
58308491
RW		 3003 (sha256
3004 (base32
85892948 3005 "1223cw029n6zff7pqpwbsq1x8v3w63smczkmnybqxkw5h2za8gbz"))))
58308491
RW		 3006 (build-system texlive-build-system)
3007 (arguments
9c45beb4
RW		 3008 '(#:tex-directory "latex/fontspec"
3009 #:phases
3010 (modify-phases %standard-phases
3011 (add-after 'install 'install-default-fontspec.cfg
3012 (lambda* (#:key outputs #:allow-other-keys)
3013 (with-output-to-file
3014 (string-append (assoc-ref outputs "out")
3015 "/share/texmf-dist/tex/latex/fontspec/fontspec.cfg")
3016 (lambda _
3017 (display "\
3018%%% FONTSPEC.CFG %%%
3019%
3020% This configuration file sets up TeX Ligatures by default for all fonts loaded
3021% with `\\setmainfont` and `\\setsansfont`.
3022%
3023% In addition, `\\setmonofont` has default features to enforce \"monospace\"
3024% settings with regard to space stretchability and shrinkability.
3025
3026\\defaultfontfeatures
3027 [\\rmfamily,\\sffamily]
3028 {Ligatures=TeX}
3029
3030\\defaultfontfeatures
3031 [\\ttfamily]
3032 {WordSpace={1,0,0},
3033 HyphenChar=None,
3034 PunctuationSpace=WordSpace}
3035")))
3036 #t)))))
b80ecc5a
RW		 3037 (propagated-inputs
3038 `(("texlive-latex-l3packages" ,texlive-latex-l3packages)))
b8d8806b 3039 (home-page "https://www.ctan.org/pkg/fontspec")
58308491
RW		 3040 (synopsis "Advanced font selection in XeLaTeX and LuaLaTeX")
3041 (description
3042 "Fontspec is a package for XeLaTeX and LuaLaTeX. It provides an
3043automatic and unified interface to feature-rich AAT and OpenType fonts through
3044the NFSS in LaTeX running on XeTeX or LuaTeX engines. The package requires
3045the l3kernel and xparse bundles from the LaTeX 3 development team.")
3046 (license license:lppl1.3+)))
3047
e93f472d
RW		 3048;; The SVN directory contains little more than a dtx file that generates three
3049;; of the many lua files that should be installed as part of this package.
3050;; This is why we take the release from GitHub instead.
3051(define-public texlive-luatex-lualibs
3052 (package
3053 (name "texlive-luatex-lualibs")
3054 (version "2.5")
3055 (source (origin
3056 (method url-fetch)
3057 (uri (string-append "https://github.com/lualatex/lualibs/"
3058 "releases/download/v"
3059 version "/lualibs.zip"))
01d79c30 3060 (file-name (string-append name "-" version ".zip"))
e93f472d
RW		 3061 (sha256
3062 (base32
3063 "1xx9blvrmx9hyhrl345lpai9m6xxnw997261a1ahn1bm5r2j5fqy"))))
3064 (build-system gnu-build-system)
3065 (arguments
3066 `(#:make-flags
3067 (list (string-append "DESTDIR="
3068 (assoc-ref %outputs "out")
3069 "/share/texmf-dist"))
3070 #:phases
3071 (modify-phases %standard-phases
3072 (delete 'configure))))
3073 (native-inputs
3074 `(("texlive-bin" ,texlive-bin)
3075 ("unzip" ,unzip)
3076 ("zip" ,zip)))
3077 (home-page "https://github.com/lualatex/lualibs")
3078 (synopsis "Lua modules for general programming (in the (La)TeX world)")
3079 (description
3080 "Lualibs is a collection of Lua modules useful for general programming.
3081The bundle is based on Lua modules shipped with ConTeXt, and made available in
3082this bundle for use independent of ConTeXt.")
3083 ;; GPL version 2 only
3084 (license license:gpl2)))
3085
769bb5e5
RW		 3086(define-public texlive-luatex-luaotfload
3087 (package
3088 (name "texlive-luatex-luaotfload")
3089 (version "2.8-fix-2")
3090 ;; The release tarball does not contain all source files.
3091 (source (origin
3092 (method git-fetch)
3093 (uri (git-reference
3094 (url "https://github.com/lualatex/luaotfload.git")
3095 (commit (string-append "v" version))))
3096 (file-name (git-file-name name version))
3097 (sha256
3098 (base32
3099 "0l5l7iq3dxcxl65qaghcpjg27yd9iw1sxa8pnd7xlvlm09dhfdnf"))))
3100 (build-system gnu-build-system)
3101 (arguments
3102 `(#:make-flags
3103 (list (string-append "DESTDIR="
3104 (assoc-ref %outputs "out")
3105 "/share/texmf-dist")
3106 "all")
3107 #:parallel-build? #f ; not supported
3108 #:phases
3109 (modify-phases %standard-phases
3110 (replace 'configure
3111 (lambda* (#:key inputs #:allow-other-keys)
3112 (substitute* "doc/Makefile"
3113 (("rst2man") "rst2man.py")
3114 ;; Don't build the PDF. This requires more of LaTeX.
3115 (("\\$\\(DOCPDF\\)") ""))
3116
3117 (substitute* "Makefile"
3118 ;; We don't build the PDF, so don't attempt to install it.
3119 (("cp \\$\\(RESOURCES\\) \\$\\(DOCPDF\\)")
3120 "cp $(RESOURCES)")
3121 (("= \\$\\(DOCPDF\\)") "= ")
3122 ;; Fix name of fontloader file
3123 (("^LOADER.*= \\$\\(BUILDDIR\\)/fontloader-\\$\\(shell date \\+%F\\).lua")
3124 "LOADER = $(BUILDDIR)/fontloader.lua"))
3125
3126 (mkdir "build")
3127
3128 ;; Don't download this file.
3129 (copy-file (assoc-ref inputs "glyphlist")
3130 "build/glyphlist.txt")
3131
3132 ;; Don't use git
3133 (let ((notes
3134 `((committer . "Philipp Gesang <phg@phi-gamma.net>")
3135 (description . ,version)
3136 (loader . "fontloader.lua")
3137 (revision . "ad480924393fffa2896156e1a32c22f5c61120dd")
3138 (timestamp . "2019-01-01 00:00:00 +0000"))))
3139 (substitute* "scripts/mkstatus"
3140 (("local notes.*=.*")
3141 (string-append "local notes = {"
3142 (string-join
3143 (map (lambda (entry)
3144 (format "[\"~a\"]=\"~a\","
3145 (symbol->string (car entry))
3146 (cdr entry)))
3147 notes))
3148 "}"))))
3149 #t)))))
3150 (native-inputs
3151 `(("zip" ,zip)
3152 ("unzip" ,unzip)
3153 ("graphviz" ,graphviz)
3154 ("lualatex" ,(texlive-union (list texlive-luatex-lualibs
3155 texlive-context-base)))
3156 ("python-docutils" ,python-docutils)
3157 ("glyphlist"
3158 ,(origin
3159 (method url-fetch)
3160 (uri (string-append "https://raw.githubusercontent.com/adobe-type-tools/"
3161 "agl-aglfn/b2a04cb906f9257cc06a2fe0ad4b3d663bc02136/"
3162 "glyphlist.txt"))
3163 (sha256
3164 (base32 "1s6svfw23rqzdvflv8frgd4xrwvrmsj8szwzqgcd39dp9rpjafjp"))))))
3165 (propagated-inputs
3166 `(("texlive-luatex-lualibs" ,texlive-luatex-lualibs)))
3167 (home-page "https://github.com/lualatex/luaotfload")
3168 (synopsis "OpenType font loader for LuaTeX")
3169 (description
3170 "Luaotfload is an adaptation of the ConTeXt font loading system for the
3171Plain and LaTeX formats. It allows OpenType fonts to be loaded with font
3172features accessible using an extended font request syntax while providing
3173compatibilitywith XeTeX. By indexing metadata in a database it facilitates
3174loading fonts by their proper names instead of file names.")
3175 ;; GPL version 2 only
3176 (license license:gpl2)))
3177
2573163a
RW		 3178(define-public texlive-latex-amsmath
3179 (package
3180 (name "texlive-latex-amsmath")
3181 (version (number->string %texlive-revision))
3182 (source (origin
3183 (method svn-fetch)
3184 (uri (texlive-ref "latex" "amsmath"))
320c771a 3185 (file-name (string-append name "-" version "-checkout"))
2573163a
RW		 3186 (sha256
3187 (base32
85892948 3188 "0qgk2332dacsxn1z95qzp35gbs7wrzl1ipjdhnmk1r897msm4sf5"))))
2573163a
RW		 3189 (build-system texlive-build-system)
3190 (arguments '(#:tex-directory "latex/amsmath"))
b8d8806b 3191 (home-page "https://www.ctan.org/pkg/amsmath")
2573163a
RW		 3192 (synopsis "AMS mathematical facilities for LaTeX")
3193 (description
3194 "This is the principal package in the AMS-LaTeX distribution. It adapts
3195for use in LaTeX most of the mathematical features found in AMS-TeX; it is
3196highly recommended as an adjunct to serious mathematical typesetting in LaTeX.
3197When amsmath is loaded, AMS-LaTeX packages @code{amsbsyamsbsy} (for bold
3198symbols), @code{amsopnamsopn} (for operator names) and
3199@code{amstextamstext} (for text embedded in mathematics) are also loaded.
3200This package is part of the LaTeX required distribution; however, several
3201contributed packages add still further to its appeal; examples are
3202@code{empheqempheq}, which provides functions for decorating and highlighting
3203mathematics, and @code{ntheoremntheorem}, for specifying theorem (and similar)
3204definitions.")
3205 (license license:lppl1.3c+)))
3206
18e366e8
RW		 3207(define-public texlive-latex-amscls
3208 (package
3209 (name "texlive-latex-amscls")
3210 (version (number->string %texlive-revision))
3211 (source (origin
3212 (method svn-fetch)
3213 (uri (texlive-ref "latex" "amscls"))
43059ed0 3214 (file-name (string-append name "-" version "-checkout"))
18e366e8
RW		 3215 (sha256
3216 (base32
d4d9a1ec 3217 "0c2j9xh4qpi0x1vvcxdjxq6say0zhyr569fryi5cmhp8bclh4kca"))))
18e366e8
RW		 3218 (build-system texlive-build-system)
3219 (arguments
3220 `(#:tex-directory "latex/amscls"))
b8d8806b 3221 (home-page "https://www.ctan.org/pkg/amscls")
18e366e8
RW		 3222 (synopsis "AMS document classes for LaTeX")
3223 (description
3224 "This bundle contains three AMS classes: @code{amsartamsart} (for writing
3225articles for the AMS), @code{amsbookamsbook} (for books) and
3226@code{amsprocamsproc} (for proceedings), together with some supporting
3227material. The material is made available as part of the AMS-LaTeX
3228distribution.")
3229 (license license:lppl1.3c+)))
3230
f84d5a09
RW		 3231(define-public texlive-latex-babel
3232 (package
3233 (name "texlive-latex-babel")
3234 (version (number->string %texlive-revision))
3235 (source (origin
3236 (method svn-fetch)
3237 (uri (texlive-ref "latex" "babel"))
8732493e 3238 (file-name (string-append name "-" version "-checkout"))
f84d5a09
RW		 3239 (sha256
3240 (base32
85892948 3241 "1rwqq841i1rxywymzwkw0cw2yhgvxwjx5mgygfasvypwrwll6f6s"))))
f84d5a09
RW		 3242 (build-system texlive-build-system)
3243 (arguments
dcc8af4a 3244 '(#:tex-directory "generic/babel"
f84d5a09
RW		 3245 #:phases
3246 (modify-phases %standard-phases
3247 ;; This package tries to produce babel.aux twice but refuses to
3248 ;; overwrite the first one.
3249 (add-before 'build 'fix-ins
3250 (lambda _
3251 (substitute* "babel.ins"
3252 (("askonceonly") "askforoverwritefalse"))
3253 #t)))))
b8d8806b 3254 (home-page "https://www.ctan.org/pkg/babel")
f84d5a09
RW		 3255 (synopsis "Multilingual support for Plain TeX or LaTeX")
3256 (description
3257 "The package manages culturally-determined typographical (and other)
3258rules, and hyphenation patterns for a wide range of languages. A document may
3259select a single language to be supported, or it may select several, in which
3260case the document may switch from one language to another in a variety of
3261ways. Babel uses contributed configuration files that provide the detail of
3262what has to be done for each language. Users of XeTeX are advised to use the
3263polyglossia package rather than Babel.")
3264 (license license:lppl1.3+)))
3265
876a1980
RW		 3266(define-public texlive-generic-babel-english
3267 (package
3268 (name "texlive-generic-babel-english")
3269 (version (number->string %texlive-revision))
3270 (source (origin
3271 (method svn-fetch)
3272 (uri (texlive-ref "generic" "babel-english"))
3273 (file-name (string-append name "-" version "-checkout"))
3274 (sha256
3275 (base32
3276 "1s404wbx91z5w65hm024kyl4h56zsa096irx18vsx8jvlmwsr5wc"))))
3277 (build-system texlive-build-system)
3278 (arguments '(#:tex-directory "generic/babel-english"))
b8d8806b 3279 (home-page "https://www.ctan.org/pkg/babel-english")
876a1980
RW		 3280 (synopsis "Babel support for English")
3281 (description
3282 "This package provides the language definition file for support of
3283English in @code{babel}. Care is taken to select British hyphenation patterns
3284for British English and Australian text, and default (\"american\") patterns
3285for Canadian and USA text.")
3286 (license license:lppl1.3+)))
3287
6309d215
RW		 3288(define-public texlive-generic-babel-german
3289 (package
3290 (name "texlive-generic-babel-german")
3291 (version (number->string %texlive-revision))
3292 (source (origin
3293 (method svn-fetch)
3294 (uri (texlive-ref "generic" "babel-german"))
3295 (file-name (string-append name "-" version "-checkout"))
3296 (sha256
3297 (base32
85892948 3298 "129f9w41cb6yyrr6kpv3zz9ml6334hyq1wcz7j9jn47p0hlxqfk8"))))
6309d215
RW		 3299 (build-system texlive-build-system)
3300 (arguments '(#:tex-directory "generic/babel-german"))
3301 (home-page "https://www.ctan.org/pkg/babel-german")
3302 (synopsis "Babel support for German")
3303 (description
3304 "This package provides the language definition file for support of German
3305in @code{babel}. It provides all the necessary macros, definitions and
3306settings to typeset German documents. The bundle includes support for the
3307traditional and reformed German orthography as well as for the Austrian and
3308Swiss varieties of German.")
3309 (license license:lppl1.3+)))
3310
93286d38
RW		 3311(define-public texlive-latex-cyrillic
3312 (package
3313 (name "texlive-latex-cyrillic")
3314 (version (number->string %texlive-revision))
3315 (source (origin
3316 (method svn-fetch)
3317 (uri (texlive-ref "latex" "cyrillic"))
51bffe79 3318 (file-name (string-append name "-" version "-checkout"))
93286d38
RW		 3319 (sha256
3320 (base32
d4d9a1ec 3321 "083xbwg7hrnlv47fkwvz8yjb830bhxx7y0mq7z7nz2f96y2ldr6b"))))
93286d38
RW		 3322 (build-system texlive-build-system)
3323 (arguments
3324 '(#:tex-directory "latex/cyrillic"))
b8d8806b 3325 (home-page "https://www.ctan.org/pkg/latex-cyrillic")
93286d38
RW		 3326 (synopsis "Support for Cyrillic fonts in LaTeX")
3327 (description
3328 "This bundle of macros files provides macro support (including font
3329encoding macros) for the use of Cyrillic characters in fonts encoded under the
3330T2* and X2 encodings. These encodings cover (between them) pretty much every
3331language that is written in a Cyrillic alphabet.")
3332 (license license:lppl1.3c+)))
3333
83fe6231
RW		 3334(define-public texlive-latex-psnfss
3335 (package
3336 (name "texlive-latex-psnfss")
3337 (version (number->string %texlive-revision))
3338 (source (origin
3339 (method svn-fetch)
3340 (uri (texlive-ref "latex" "psnfss"))
b5b10f3b 3341 (file-name (string-append name "-" version "-checkout"))
83fe6231
RW		 3342 (sha256
3343 (base32
3344 "1920dcq8613yzprasbg80fh4fcjcidvvl54wkx438nimyxcri7qz"))))
3345 (build-system texlive-build-system)
3346 (arguments '(#:tex-directory "latex/psnfss"))
b8d8806b 3347 (home-page "https://www.ctan.org/pkg/psnfss")
83fe6231
RW		 3348 (synopsis "Font support for common PostScript fonts")
3349 (description
3350 "The PSNFSS collection includes a set of files that provide a complete
3351working setup of the LaTeX font selection scheme (NFSS2) for use with common
3352PostScript fonts. It covers the so-called \"Base\" fonts (which are built
3353into any Level 2 PostScript printing device and the Ghostscript interpreter)
3354and a number of free fonts. It provides font definition files, macros and
3355font metrics. The bundle as a whole is part of the LaTeX required set of
3356packages.")
3357 (license license:lppl1.2+)))
3358
bfcb9d4d
RW		 3359;; For user profiles
3360(define-public texlive-base
3361 (let ((default-packages
3362 (list texlive-bin
3363 texlive-dvips
3364 texlive-fontname
a6405e03 3365 texlive-cm
bfcb9d4d
RW		 3366 texlive-fonts-latex
3367 texlive-metafont-base
3368 texlive-latex-base
3369 ;; LaTeX packages from the "required" set.
3370 texlive-latex-amsmath
3371 texlive-latex-amscls
3372 texlive-latex-babel
3373 texlive-generic-babel-english
3374 texlive-latex-cyrillic
3375 texlive-latex-graphics
3376 texlive-latex-psnfss
fdb8841f
RW		 3377 texlive-latex-tools
3378 texlive-tetex)))
bfcb9d4d
RW		 3379 (package
3380 (name "texlive-base")
3381 (version (number->string %texlive-revision))
3382 (source #f)
3383 (build-system trivial-build-system)
3384 (arguments
3385 '(#:builder
3386 (begin (mkdir (assoc-ref %outputs "out")))))
3387 (propagated-inputs
3388 (map (lambda (package)
3389 (list (package-name package) package))
3390 default-packages))
3391 (home-page (package-home-page texlive-bin))
3392 (synopsis "TeX Live base packages")
3393 (description "This is a very limited subset of the TeX Live distribution.
3394It includes little more than the required set of LaTeX packages.")
3395 (license (fold (lambda (package result)
3396 (match (package-license package)
3397 ((lst ...)
3398 (append lst result))
3399 ((? license:license? license)
3400 (cons license result))))
3401 '()
3402 default-packages)))))
3403
d7da2372 3404;; For use in package definitions only
cb7bc20a
RW		 3405(define-public texlive-union
3406 (lambda* (#:optional (packages '()))
3407 "Return 'texlive-union' package which is a union of PACKAGES and the
3408standard LaTeX packages."
d7da2372
RW		 3409 (let ((default-packages (match (package-propagated-inputs texlive-base)
3410 (((labels packages) ...) packages))))
3411 (package (inherit texlive-base)
cb7bc20a 3412 (name "texlive-union")
cb7bc20a
RW		 3413 (build-system trivial-build-system)
3414 (arguments
3415 '(#:modules ((guix build union)
3416 (guix build utils)
3417 (guix build texlive-build-system)
3418 (guix build gnu-build-system)
3419 (guix build gremlin)
3420 (guix elf))
3421 #:builder
3422 (begin
3423 (use-modules (ice-9 match)
1a64a7b3 3424 (ice-9 popen)
cb7bc20a
RW		 3425 (srfi srfi-26)
3426 (guix build union)
3427 (guix build utils)
3428 (guix build texlive-build-system))
3429 (let* ((out (assoc-ref %outputs "out"))
3430 (texmf.cnf (string-append out "/share/texmf-dist/web2c/texmf.cnf")))
1a64a7b3
RW		 3431 ;; Build a modifiable union of all inputs (but exclude bash and
3432 ;; the updmap.cfg file)
cb7bc20a
RW		 3433 (match (filter (match-lambda
3434 ((name . _)
813ed0bd
RW		 3435 (not (member name '("bash"
3436 "coreutils"
3437 "sed"
3438 "updmap.cfg")))))
cb7bc20a
RW		 3439 %build-inputs)
3440 (((names . directories) ...)
3441 (union-build (assoc-ref %outputs "out")
3442 directories
c58d1b5f
RW		 3443 #:create-all-directories? #t
3444 #:log-port (%make-void-port "w"))))
cb7bc20a
RW		 3445
3446 ;; The configuration file "texmf.cnf" is provided by the
3447 ;; "texlive-bin" package. We take it and override only the
3448 ;; setting for TEXMFROOT and TEXMF. This file won't be consulted
3449 ;; by default, though, so we still need to set TEXMFCNF.
3450 (substitute* texmf.cnf
3451 (("^TEXMFROOT = .*")
3452 (string-append "TEXMFROOT = " out "/share\n"))
3453 (("^TEXMF = .*")
3454 "TEXMF = $TEXMFROOT/share/texmf-dist\n"))
1a64a7b3
RW		 3455 (setenv "PATH" (string-append
3456 (assoc-ref %build-inputs "bash") "/bin:"
3457 (assoc-ref %build-inputs "coreutils") "/bin:"
813ed0bd 3458 (assoc-ref %build-inputs "sed") "/bin:"
1a64a7b3 3459 (string-append out "/bin")))
cb7bc20a
RW		 3460 (for-each
3461 (cut wrap-program <>
476f7fce
RW		 3462 `("TEXMFCNF" ":" suffix (,(dirname texmf.cnf)))
3463 `("TEXMF" ":" suffix (,(string-append out "/share/texmf-dist"))))
cb7bc20a 3464 (find-files (string-append out "/bin") ".*"))
1a64a7b3
RW		 3465
3466 ;; Remove invalid maps from config file.
813ed0bd
RW		 3467 (let ((web2c (string-append out "/share/texmf-config/web2c/"))
3468 (maproot (string-append out "/share/texmf-dist/fonts/map/")))
3469 (mkdir-p web2c)
3470 (copy-file
3471 (assoc-ref %build-inputs "updmap.cfg")
3472 (string-append web2c "updmap.cfg"))
3473 (make-file-writable (string-append web2c "updmap.cfg"))
3474
3475 (let* ((port (open-pipe* OPEN_WRITE "updmap-sys"
3476 "--syncwithtrees"
3477 "--nohash"
3478 (string-append "--cnffile=" web2c "updmap.cfg"))))
3479 (display "Y\n" port)
3480 (when (not (zero? (status:exit-val (close-pipe port))))
3481 (error "failed to filter updmap.cfg")))
3482 ;; Generate maps.
3483 (invoke "updmap-sys"
3484 (string-append "--cnffile=" web2c "updmap.cfg")
3485 (string-append "--dvipdfmxoutputdir="
3486 maproot "dvipdfmx/updmap/")
3487 (string-append "--dvipsoutputdir="
3488 maproot "dvips/updmap/")
3489 (string-append "--pdftexoutputdir="
3490 maproot "pdftex/updmap/"))
3491 ;; Having this file breaks all file lookups later.
3492 (delete-file (string-append out "/share/texmf-dist/ls-R")))
cb7bc20a
RW		 3493 #t))))
3494 (inputs
3495 `(("bash" ,bash)
3496 ,@(map (lambda (package)
3497 (list (package-name package) package))
3498 (append default-packages packages))))
1a64a7b3
RW		 3499 (native-inputs
3500 `(("coreutils" ,coreutils)
3501 ("sed" ,sed)
3502 ("updmap.cfg"
3503 ,(origin
3504 (method url-fetch)
3505 (uri (string-append "https://tug.org/svn/texlive/tags/"
3506 %texlive-tag "/Master/texmf-dist/web2c/updmap.cfg"
3507 "?revision=" (number->string %texlive-revision)))
3508 (file-name (string-append "updmap.cfg-"
3509 (number->string %texlive-revision)))
3510 (sha256
3511 (base32
85892948 3512 "0faqknqxs80qp9ywk0by5k85s0yalg97c4lja4q56lsyblrr4j7i"))))))
cb7bc20a
RW		 3513 (home-page (package-home-page texlive-bin))
3514 (synopsis "Union of TeX Live packages")
3515 (description "This package provides a subset of the TeX Live
3516distribution.")
3517 (license (fold (lambda (package result)
3518 (match (package-license package)
3519 ((lst ...)
3520 (append lst result))
3521 ((? license:license? license)
3522 (cons license result))))
3523 '()
3524 (append default-packages packages)))))))
3525
d7da2372 3526;; For use in package definitions only
9d4f8dc2
RW		 3527(define-public texlive-tiny
3528 (package
3529 (inherit (texlive-union))
3530 (name "texlive-tiny")
3531 (description "This is a very limited subset of the TeX Live distribution.
3532It includes little more than the required set of LaTeX packages.")))
3533
60b5e228
RW		 3534(define-public texlive-latex-amsrefs
3535 (package
3536 (name "texlive-latex-amsrefs")
3537 (version (number->string %texlive-revision))
3538 (source (origin
3539 (method svn-fetch)
3540 (uri (texlive-ref "latex" "amsrefs"))
3541 (file-name (string-append name "-" version "-checkout"))
3542 (sha256
3543 (base32
3544 "15i4k479dwrpr0kspmm70g1yn4p3dkh0whyzmr93hph9bggnh1i1"))))
3545 (build-system texlive-build-system)
3546 (arguments '(#:tex-directory "latex/amsrefs"))
b8d8806b 3547 (home-page "https://www.ctan.org/pkg/amsrefs")
60b5e228
RW		 3548 (synopsis "LaTeX-based replacement for BibTeX")
3549 (description
3550 "Amsrefs is a LaTeX package for bibliographies that provides an archival
3551data format similar to the format of BibTeX database files, but adapted to
3552make direct processing by LaTeX easier. The package can be used either in
3553conjunction with BibTeX or as a replacement for BibTeX.")
3554 (license license:lppl1.3+)))
3555
3236599f
RW		 3556(define-public texlive-latex-bigfoot
3557 (package
3558 (name "texlive-latex-bigfoot")
3559 (version (number->string %texlive-revision))
3560 (source (origin
3561 (method svn-fetch)
3562 (uri (texlive-ref "latex" "bigfoot"))
3563 (file-name (string-append name "-" version "-checkout"))
3564 (sha256
3565 (base32
3566 "092g8alnsdwlgl1isdnqrr32l161994295kadr1n05d81xgj5wnv"))))
3567 (build-system texlive-build-system)
3568 (arguments
3569 '(#:tex-directory "latex/bigfoot"
3570 #:phases
3571 (modify-phases %standard-phases
3572 (add-after 'unpack 'remove-generated-file
3573 (lambda _
3574 (for-each delete-file (find-files "." "\\.drv$"))
3575 #t)))))
b8d8806b 3576 (home-page "https://www.ctan.org/pkg/bigfoot")
3236599f
RW		 3577 (synopsis "Footnotes for critical editions")
3578 (description
3579 "This package aims to provide a one-stop solution to requirements for
3580footnotes. It offers: Multiple footnote apparatus superior to that of
3581@code{manyfoot}. Footnotes can be formatted in separate paragraphs, or be run
3582into a single paragraph (this choice may be selected per footnote series);
3583Things you might have expected (such as @code{\\verb}-like material in
3584footnotes, and color selections over page breaks) now work. Note that the
3585majority of the bigfoot package's interface is identical to that of
3586@code{manyfoot}; users should seek information from that package's
3587documentation. The bigfoot bundle also provides the @code{perpage} and
3588@code{suffix} packages.")
3589 (license license:gpl2+)))
3590
8e732b49
RW		 3591(define-public texlive-latex-blindtext
3592 (package
3593 (name "texlive-latex-blindtext")
3594 (version (number->string %texlive-revision))
3595 (source (origin
3596 (method svn-fetch)
3597 (uri (texlive-ref "latex" "blindtext"))
3598 (file-name (string-append name "-" version "-checkout"))
3599 (sha256
3600 (base32
3601 "1jrja9b1pzdh9zgv1jh807w4xijqja58n2mqny6dkwicv8qfgbfg"))))
3602 (build-system texlive-build-system)
3603 (arguments '(#:tex-directory "latex/blindtext"))
b8d8806b 3604 (home-page "https://www.ctan.org/pkg/blindtext")
8e732b49
RW		 3605 (synopsis "Producing 'blind' text for testing")
3606 (description
3607 "The package provides the commands @code{\\blindtext} and
3608@code{\\Blindtext} for creating \"blind\" text useful in testing new classes
3609and packages, and @code{\\blinddocument}, @code{\\Blinddocument} for creating
3610an entire random document with sections, lists, mathematics, etc. The package
3611supports three languages, @code{english}, @code{(n)german} and @code{latin};
3612the @code{latin} option provides a short \"lorem ipsum\" (for a fuller \"lorem
3613ipsum\" text, see the @code{lipsum} package).")
3614 (license license:lppl)))
3615
7cda03bd
RW		 3616(define-public texlive-latex-dinbrief
3617 (package
3618 (name "texlive-latex-dinbrief")
3619 (version (number->string %texlive-revision))
3620 (source (origin
3621 (method svn-fetch)
3622 (uri (texlive-ref "latex" "dinbrief"))
3623 (file-name (string-append name "-" version "-checkout"))
3624 (sha256
3625 (base32
3626 "0lb0kiy8fxzl6cnhcw1sggy6jrjvcd6kj1kkw3k9lkimm388yjz6"))))
3627 (build-system texlive-build-system)
3628 (arguments
3629 '(#:tex-directory "latex/dinbrief"
3630 #:phases
3631 (modify-phases %standard-phases
3632 (add-after 'unpack 'remove-generated-file
3633 (lambda _
3634 (delete-file "dinbrief.drv")
d4d9a1ec
RW		 3635 #t))
3636 (add-after 'unpack 'fix-encoding-error
3637 (lambda _
3638 (with-fluids ((%default-port-encoding "ISO-8859-1"))
3639 (substitute* "dinbrief.dtx"
3640 (("zur Verf.+ung. In der Pr\"aambel")
3641 "zur Verf\"ung. In der Pr\"aambel")))
7cda03bd 3642 #t)))))
b8d8806b 3643 (home-page "https://www.ctan.org/pkg/dinbrief")
7cda03bd
RW		 3644 (synopsis "German letter DIN style")
3645 (description
3646 "This package implements a document layout for writing letters according
3647to the rules of DIN (Deutsches Institut für Normung, German standardisation
3648institute). A style file for LaTeX 2.09 (with limited support of the
3649features) is part of the package. Since the letter layout is based on a
3650German standard, the user guide is written in German, but most macros have
3651English names from which the user can recognize what they are used for. In
3652addition there are example files showing how letters may be created with the
3653package.")
3654 (license license:lppl)))
3655
de224adb
RW		 3656(define-public texlive-latex-draftwatermark
3657 (package
3658 (name "texlive-latex-draftwatermark")
3659 (version (number->string %texlive-revision))
3660 (source (origin
3661 (method svn-fetch)
3662 (uri (texlive-ref "latex" "draftwatermark"))
3663 (file-name (string-append name "-" version "-checkout"))
3664 (sha256
3665 (base32
3666 "1zyl2pcz2x529gzj5m93a1s4ipymdabf7qdjl3l1673pizd4hfyv"))))
3667 (build-system texlive-build-system)
3668 (arguments '(#:tex-directory "latex/draftwatermark"))
b8d8806b 3669 (home-page "https://www.ctan.org/pkg/draftwatermark")
de224adb
RW		 3670 (synopsis "Put a grey textual watermark on document pages")
3671 (description
3672 "This package provides a means to add a textual, light grey watermark on
3673every page or on the first page of a document. Typical usage may consist in
3674writing words such as DRAFT or CONFIDENTIAL across document pages. The
3675package performs a similar function to that of @code{draftcopy}, but its
3676implementation is output device independent, and made very simple by relying
3677on everypage.")
3678 (license license:lppl1.3+)))
3679
74e9c9a4
RW		 3680(define-public texlive-latex-environ
3681 (package
3682 (name "texlive-latex-environ")
3683 (version (number->string %texlive-revision))
3684 (source (origin
3685 (method svn-fetch)
3686 (uri (texlive-ref "latex" "environ"))
3687 (file-name (string-append name "-" version "-checkout"))
3688 (sha256
3689 (base32
3690 "06h28b26dyjkj9shksphgqfv4130jfkwhbw737hxn7d3yvdfffyd"))))
3691 (build-system texlive-build-system)
3692 (arguments '(#:tex-directory "latex/environ"))
b8d8806b 3693 (home-page "https://www.ctan.org/pkg/environ")
74e9c9a4
RW		 3694 (synopsis "New interface for environments in LaTeX")
3695 (description
09acbb02
RW		 3696 "This package provides the @code{\\collect@@body} command (as in
3697@code{amsmath}), as well as a @code{\\long} version @code{\\Collect@@Body},
3698for collecting the body text of an environment. These commands are used to
3699define a new author interface to creating new environments.")
74e9c9a4
RW		 3700 (license license:lppl)))
3701
adfa7a2a
RW		 3702(define-public texlive-latex-eqparbox
3703 (package
3704 (name "texlive-latex-eqparbox")
3705 (version (number->string %texlive-revision))
3706 (source (origin
3707 (method svn-fetch)
3708 (uri (texlive-ref "latex" "eqparbox"))
3709 (file-name (string-append name "-" version "-checkout"))
3710 (sha256
3711 (base32
d4d9a1ec 3712 "1ib5xdwcj5wk23wgk41m2hdcjr1dzrs4l3wwnpink9mlapz12wjs"))))
adfa7a2a
RW		 3713 (build-system texlive-build-system)
3714 (arguments '(#:tex-directory "latex/eqparbox"))
b8d8806b 3715 (home-page "https://www.ctan.org/pkg/eqparbox")
adfa7a2a
RW		 3716 (synopsis "Create equal-widthed parboxes")
3717 (description
3718 "LaTeX users sometimes need to ensure that two or more blocks of text
3719occupy the same amount of horizontal space on the page. To that end, the
3720@code{eqparbox} package defines a new command, @code{\\eqparbox}, which works
3721just like @code{\\parbox}, except that instead of specifying a width, one
3722specifies a tag. All @code{eqparbox}es with the same tag---regardless of
3723where they are in the document---will stretch to fit the widest
3724@code{eqparbox} with that tag. This simple, equal-width mechanism can be used
3725for a variety of alignment purposes, as is evidenced by the examples in
3726@code{eqparbox}'s documentation. Various derivatives of @code{\\eqparbox} are
3727also provided.")
3728 (license license:lppl1.3+)))
3729
32e623d0
RW		 3730(define-public texlive-latex-expdlist
3731 (package
3732 (name "texlive-latex-expdlist")
3733 (version (number->string %texlive-revision))
3734 (source (origin
3735 (method svn-fetch)
3736 (uri (texlive-ref "latex" "expdlist"))
3737 (file-name (string-append name "-" version "-checkout"))
3738 (sha256
3739 (base32
3740 "1x7byk6x10njir3y9rm56glhdzrxwqag7gsnw2sqn1czlq525w7r"))))
3741 (build-system texlive-build-system)
3742 (arguments
3743 '(#:tex-directory "latex/expdlist"
3744 #:phases
3745 (modify-phases %standard-phases
3746 (add-after 'unpack 'remove-generated-file
3747 (lambda _
3748 (for-each delete-file
3749 (find-files "." "\\.drv$"))
3750 #t)))))
b8d8806b 3751 (home-page "https://www.ctan.org/pkg/expdlist")
32e623d0
RW		 3752 (synopsis "Expanded description environments")
3753 (description
3754 "The package provides additional features for the LaTeX
3755@code{description} environment, including adjustable left margin. The package
3756also allows the user to \"break\" a list (for example, to interpose a comment)
3757without affecting the structure of the list (this works for @code{itemize} and
3758@code{enumerate} lists, and numbered lists remain in sequence).")
3759 (license license:lppl)))
3760
1333198d 3761(define-public texlive-filemod
893e3fc1 3762 (package
1333198d
RW		 3763 (inherit (simple-texlive-package
3764 "texlive-filemod"
3765 (list "/doc/latex/filemod/"
3766 "/tex/latex/filemod/"
3767 "/tex/generic/filemod/")
3768 (base32
3769 "1snsj7kblkj1ig3x3845lsypz7ab04lf0dcpdh946xakgjnz4fb5")
3770 #:trivial? #t))
b8d8806b 3771 (home-page "https://www.ctan.org/pkg/filemod")
893e3fc1
RW		 3772 (synopsis "Provide file modification times, and compare them")
3773 (description
3774 "This package provides macros to read and compare the modification dates
3775of files. The files may be @code{.tex} files, images or other files (as long
3776as they can be found by LaTeX). It uses the @code{\\pdffilemoddate} primitive
3777of pdfLaTeX to find the file modification date as PDF date string, parses the
3778string and returns the value to the user. The package will also work for DVI
3779output with recent versions of the LaTeX compiler which uses pdfLaTeX in DVI
3780mode. The functionality is provided by purely expandable macros or by faster
3781but non-expandable ones.")
3782 (license license:lppl1.3+)))
3783
1333198d
RW		 3784(define-public texlive-latex-filemod
3785 (deprecated-package "texlive-latex-filemod" texlive-filemod))
3786
8c23f238
RW		 3787(define-public texlive-latex-ifplatform
3788 (package
3789 (name "texlive-latex-ifplatform")
3790 (version (number->string %texlive-revision))
3791 (source (origin
3792 (method svn-fetch)
3793 (uri (texlive-ref "latex" "ifplatform"))
3794 (file-name (string-append name "-" version "-checkout"))
3795 (sha256
3796 (base32
d4d9a1ec 3797 "157pplavvm2z97b3jl4x41w11k6q9wgy074mfg0dwmsx5lm328jy"))))
8c23f238
RW		 3798 (build-system texlive-build-system)
3799 (arguments '(#:tex-directory "latex/ifplatform"))
b8d8806b 3800 (home-page "https://www.ctan.org/pkg/ifplatform")
8c23f238
RW		 3801 (synopsis "Conditionals to test which platform is being used")
3802 (description
3803 "This package uses the (La)TeX extension @code{-shell-escape} to
3804establish whether the document is being processed on a Windows or on a
3805Unix-like system, or on Cygwin (Unix environment over a Windows system).
3806Booleans provided are: @code{\\ifwindows}, @code{\\iflinux}, @code{\\ifmacosx}
3807and @code{\\ifcygwin}. The package also preserves the output of @code{uname}
3808on a Unix-like system, which may be used to distinguish between various
3809classes of systems.")
3810 (license license:lppl)))
3811
9b416042
RW		 3812(define-public texlive-latex-natbib
3813 (package
3814 (name "texlive-latex-natbib")
3815 (version (number->string %texlive-revision))
3816 (source (origin
3817 (method svn-fetch)
3818 (uri (texlive-ref "latex" "natbib"))
23ae6e65 3819 (file-name (string-append name "-" version "-checkout"))
9b416042
RW		 3820 (sha256
3821 (base32
3822 "0aqliq0nwblxyrzhwhv77pnmk7qh2y3prgq7z7qhwcbgz5kisld7"))))
3823 (build-system texlive-build-system)
3824 (arguments '(#:tex-directory "latex/natbib"))
b8d8806b 3825 (home-page "https://www.ctan.org/pkg/natbib")
9b416042
RW		 3826 (synopsis "Flexible bibliography support")
3827 (description
3828 "This bundle provides a package that implements both author-year and
3829numbered references, as well as much detailed of support for other
3830bibliography use. Also provided are versions of the standard BibTeX styles
3831that are compatible with @code{natbib}: @code{plainnat}, @code{unsrtnat},
3832@code{abbrnat}. The bibliography styles produced by @code{custom-bib} are
3833designed from the start to be compatible with @code{natbib}.")
3834 (license license:lppl)))
3835
d770d07f
RW		 3836(define-public texlive-latex-psfrag
3837 (package
3838 (name "texlive-latex-psfrag")
3839 (version (number->string %texlive-revision))
3840 (source (origin
3841 (method svn-fetch)
3842 (uri (texlive-ref "latex" "psfrag"))
3843 (file-name (string-append name "-" version "-checkout"))
3844 (sha256
3845 (base32
3846 "1dxbl5il7wbbsp0v45vk884xi1192wxw03849pb1g5q4x808n352"))))
3847 (build-system texlive-build-system)
3848 (arguments '(#:tex-directory "latex/psfrag"))
b8d8806b 3849 (home-page "https://www.ctan.org/pkg/psfrag")
d770d07f
RW		 3850 (synopsis "Replace strings in encapsulated PostScript figures")
3851 (description
3852 "This package allows LaTeX constructions (equations, picture
3853environments, etc.) to be precisely superimposed over Encapsulated PostScript
3854figures, using your own favorite drawing tool to create an EPS figure and
3855placing simple text \"tags\" where each replacement is to be placed, with
3856PSfrag automatically removing these tags from the figure and replacing them
3857with a user specified LaTeX construction, properly aligned, scaled, and/or
3858rotated.")
3859 (license (license:fsf-free "file://psfrag.dtx"))))
3860
6090b6c4 3861(define-public texlive-pstool
5a1ee7d8 3862 (package
6090b6c4
RW		 3863 (inherit (simple-texlive-package
3864 "texlive-pstool"
3865 (list "/doc/latex/pstool/"
3866 "/tex/latex/pstool/")
3867 (base32
3868 "12clzcw2cl7g2chr2phgmmiwxw4859cln1gbx1wgp8bl9iw590nc")
3869 #:trivial? #t))
5a1ee7d8 3870 (propagated-inputs
d4d9a1ec 3871 `(("texlive-latex-bigfoot" ,texlive-latex-bigfoot) ; for suffix
5a1ee7d8
RW		 3872 ("texlive-latex-filemod" ,texlive-latex-filemod)
3873 ("texlive-latex-graphics" ,texlive-latex-graphics)
3874 ("texlive-latex-ifplatform" ,texlive-latex-ifplatform)
d4d9a1ec 3875 ("texlive-latex-l3kernel" ,texlive-latex-l3kernel) ; for expl3
5a1ee7d8
RW		 3876 ("texlive-latex-oberdiek" ,texlive-latex-oberdiek)
3877 ("texlive-latex-psfrag" ,texlive-latex-psfrag)
d4d9a1ec
RW		 3878 ("texlive-latex-tools" ,texlive-latex-tools) ; for shellesc
3879 ("texlive-latex-trimspaces" ,texlive-latex-trimspaces)
3880 ("texlive-latex-xkeyval" ,texlive-latex-xkeyval)))
b8d8806b 3881 (home-page "https://www.ctan.org/pkg/pstool")
d4d9a1ec 3882 (synopsis "Process PostScript graphics within pdfLaTeX documents")
5a1ee7d8
RW		 3883 (description
3884 "This is a package for processing PostScript graphics with @code{psfrag}
3885labels within pdfLaTeX documents. Every graphic is compiled individually,
3886drastically speeding up compilation time when only a single figure needs
3887re-processing.")
3888 (license license:lppl)))
3889
6090b6c4
RW		 3890(define-public texlive-latex-pstool
3891 (deprecated-package "texlive-latex-pstool" texlive-pstool))
3892
a72058b9 3893(define-public texlive-seminar
171160d5 3894 (package
a72058b9
RW		 3895 (inherit (simple-texlive-package
3896 "texlive-seminar"
3897 (list "/doc/latex/seminar/"
3898 "/tex/latex/seminar/")
3899 (base32
3900 "1clgw5xy867khzfn8d210rc5hsw5s7r0pznhk84niybvw4zc7r3f")
3901 #:trivial? #t))
b8d8806b 3902 (home-page "https://www.ctan.org/pkg/seminar")
171160d5
RW		 3903 (synopsis "Make overhead slides")
3904 ;; TODO: This package may need fancybox and xcomment at runtime.
3905 (description
3906 "This package provides a class that produces overhead
3907slides (transparencies), with many facilities. Seminar is not nowadays
3908reckoned a good basis for a presentation — users are advised to use more
3909recent classes such as powerdot or beamer, both of which are tuned to
391021st-century presentation styles.")
3911 (license license:lppl1.2+)))
3912
a72058b9
RW		 3913(define-public texlive-latex-seminar
3914 (deprecated-package "texlive-latex-seminar" texlive-seminar))
3915
f3540dbd
RW		 3916(define-public texlive-latex-trimspaces
3917 (package
3918 (name "texlive-latex-trimspaces")
3919 (version (number->string %texlive-revision))
3920 (source (origin
3921 (method svn-fetch)
3922 (uri (texlive-ref "latex" "trimspaces"))
70a71d19 3923 (file-name (string-append name "-" version "-checkout"))
f3540dbd
RW		 3924 (sha256
3925 (base32
3926 "0da00lb32am4g63mn96625wg48p3pj3spx79lajrk17d549apwqa"))))
3927 (build-system texlive-build-system)
3928 (arguments
3929 '(#:tex-directory "latex/trimspaces"
3930 #:tex-format "latex"
3931 #:phases
3932 (modify-phases %standard-phases
3933 (add-after 'unpack 'fix-bug
3934 (lambda _
3935 ;; The "ins" file refers to the wrong source file.
3936 (substitute* "trimspaces.ins"
3937 (("pstool.tex") "trimspaces.tex"))
3938 #t)))))
3939 (inputs
3940 `(("texlive-latex-filecontents" ,texlive-latex-filecontents)))
b8d8806b 3941 (home-page "https://www.ctan.org/pkg/trimspaces")
f3540dbd
RW		 3942 (synopsis "Trim spaces around an argument or within a macro")
3943 (description
3944 "This very short package allows you to expandably remove spaces around a
3945token list (commands are provided to remove spaces before, spaces after, or
3946both); or to remove surrounding spaces within a macro definition, or to define
3947space-stripped macros.")
3948 (license license:lppl)))
3949
7709d4d8
RW		 3950(define-public texlive-latex-capt-of
3951 (package
3952 (name "texlive-latex-capt-of")
3953 (version (number->string %texlive-revision))
3954 (source (origin
3955 (method svn-fetch)
3956 (uri (svn-reference
3957 (url (string-append "svn://www.tug.org/texlive/tags/"
3958 %texlive-tag "/Master/texmf-dist/"
3959 "/tex/latex/capt-of"))
3960 (revision %texlive-revision)))
3961 (file-name (string-append name "-" version "-checkout"))
3962 (sha256
3963 (base32
3964 "1y2s50f6lz0jx2748lj3iy56hrpcczgnbzmvphxv7aqndyyamd4x"))))
3965 (build-system trivial-build-system)
3966 (arguments
3967 `(#:modules ((guix build utils))
3968 #:builder
3969 (begin
3970 (use-modules (guix build utils))
3971 (let ((target (string-append (assoc-ref %outputs "out")
3972 "/share/texmf-dist/tex/latex/capt-of")))
3973 (mkdir-p target)
3974 (copy-recursively (assoc-ref %build-inputs "source") target)
3975 #t))))
b8d8806b 3976 (home-page "https://www.ctan.org/pkg/capt-of")
7709d4d8
RW		 3977 (synopsis "Captions on more than floats")
3978 (description
3979 "This package defines a command @code{\\captionof} for putting a caption
3980to something that's not a float.")
3981 (license license:lppl)))
3982
fb01a296 3983(define-public texlive-doi
49b2e86a 3984 (package
fb01a296
RW		 3985 (inherit (simple-texlive-package
3986 "texlive-doi"
85892948 3987 (list "/doc/latex/doi/README.md"
fb01a296
RW		 3988 "/tex/latex/doi/")
3989 (base32
85892948 3990 "18z9922lqb3hliqn95h883fndqs4lgyi5yqbnq2932ya0imc3j7h")
fb01a296 3991 #:trivial? #t))
49b2e86a
RW		 3992 (home-page "https://www.ctan.org/pkg/doi")
3993 (synopsis "Create correct hyperlinks for DOI numbers")
3994 (description
3995 "You can hyperlink DOI numbers to doi.org. However, some publishers have
3996elected to use nasty characters in their DOI numbering scheme (@code{<},
3997@code{>}, @code{_} and @code{;} have all been spotted). This will either
3998upset LaTeX, or your PDF reader. This package contains a single user-level
3999command @code{\\doi{}}, which takes a DOI number, and creates a correct
4000hyperlink to the target of the DOI.")
4001 ;; Any version of the LPPL.
4002 (license license:lppl1.3+)))
4003
fb01a296
RW		 4004(define-public texlive-latex-doi
4005 (deprecated-package "texlive-latex-doi" texlive-doi))
4006
346354a1 4007(define-public texlive-etoolbox
a8ac7c0b 4008 (package
346354a1
RW		 4009 (inherit (simple-texlive-package
4010 "texlive-etoolbox"
4011 (list "/doc/latex/etoolbox/"
4012 "/tex/latex/etoolbox/")
4013 (base32
85892948 4014 "1cc1vw1ach55g4ff4x30by8k1mg01w199ccxvn72f5khlnnxial0")
346354a1 4015 #:trivial? #t))
b8d8806b 4016 (home-page "https://www.ctan.org/pkg/etoolbox")
a8ac7c0b
RW		 4017 (synopsis "e-TeX tools for LaTeX")
4018 (description
4019 "This package is a toolbox of programming facilities geared primarily
4020towards LaTeX class and package authors. It provides LaTeX frontends to some
4021of the new primitives provided by e-TeX as well as some generic tools which
4022are not strictly related to e-TeX but match the profile of this package. The
4023package provides functions that seem to offer alternative ways of implementing
4024some LaTeX kernel commands; nevertheless, the package will not modify any part
4025of the LaTeX kernel.")
4026 (license license:lppl1.3+)))
4027
346354a1
RW		 4028(define-public texlive-latex-etoolbox
4029 (deprecated-package "texlive-latex-etoolbox" texlive-etoolbox))
4030
17dce7e5
RW		 4031(define-public texlive-latex-fncychap
4032 (package
4033 (name "texlive-latex-fncychap")
4034 (version (number->string %texlive-revision))
4035 (source (origin
4036 (method svn-fetch)
4037 (uri (svn-reference
4038 (url (string-append "svn://www.tug.org/texlive/tags/"
4039 %texlive-tag "/Master/texmf-dist/"
4040 "/tex/latex/fncychap"))
4041 (revision %texlive-revision)))
4042 (file-name (string-append name "-" version "-checkout"))
4043 (sha256
4044 (base32
4045 "0fdk84dbicfjfprkz6vk15x36mvlhaw9isjmgkc56jp2khwjswwq"))))
4046 (build-system trivial-build-system)
4047 (arguments
4048 `(#:modules ((guix build utils))
4049 #:builder
4050 (begin
4051 (use-modules (guix build utils))
4052 (let ((target (string-append (assoc-ref %outputs "out")
4053 "/share/texmf-dist/tex/latex/fncychap")))
4054 (mkdir-p target)
4055 (copy-recursively (assoc-ref %build-inputs "source") target)
4056 #t))))
b8d8806b 4057 (home-page "https://www.ctan.org/pkg/fncychap")
17dce7e5
RW		 4058 (synopsis "Seven predefined chapter heading styles")
4059 (description
4060 "This package provides seven predefined chapter heading styles. Each
4061style can be modified using a set of simple commands. Optionally one can
4062modify the formatting routines in order to create additional chapter
4063headings.")
4064 (license license:lppl1.3+)))
4065
ef1e2ef0
RW		 4066(define-public texlive-latex-framed
4067 (package
4068 (name "texlive-latex-framed")
4069 (version (number->string %texlive-revision))
4070 (source (origin
4071 (method svn-fetch)
4072 (uri (svn-reference
4073 (url (string-append "svn://www.tug.org/texlive/tags/"
4074 %texlive-tag "/Master/texmf-dist/"
4075 "/tex/latex/framed"))
4076 (revision %texlive-revision)))
4077 (file-name (string-append name "-" version "-checkout"))
4078 (sha256
4079 (base32
4080 "14a4ydqsvp3vcfavl21jrv0ybiqypaaqzg2q2cs3rzkandg7w98x"))))
4081 (build-system trivial-build-system)
4082 (arguments
4083 `(#:modules ((guix build utils))
4084 #:builder
4085 (begin
4086 (use-modules (guix build utils))
4087 (let ((target (string-append (assoc-ref %outputs "out")
4088 "/share/texmf-dist/tex/latex/framed")))
4089 (mkdir-p target)
4090 (copy-recursively (assoc-ref %build-inputs "source") target)
4091 #t))))
b8d8806b 4092 (home-page "https://www.ctan.org/pkg/framed")
ef1e2ef0
RW		 4093 (synopsis "Framed or shaded regions that can break across pages")
4094 (description
4095 "The package creates three environments: @code{framed}, which puts an
4096ordinary frame box around the region, @code{shaded}, which shades the region,
4097and @code{leftbar}, which places a line at the left side. The environments
4098allow a break at their start (the @code{\\FrameCommand} enables creation of a
4099title that is “attached” to the environment); breaks are also allowed in the
4100course of the framed/shaded matter. There is also a command
4101@code{\\MakeFramed} to make your own framed-style environments.")
4102 ;; The header states: "These macros may be freely transmitted, reproduced,
4103 ;; or modified for any purpose provided that this notice is left intact."
4104 (license (license:fsf-free "file://framed.sty"))))
4105
588b5e96
RW		 4106(define-public texlive-latex-g-brief
4107 (package
4108 (name "texlive-latex-g-brief")
4109 (version (number->string %texlive-revision))
4110 (source (origin
4111 (method svn-fetch)
4112 (uri (texlive-ref "latex" "g-brief"))
4113 (file-name (string-append name "-" version "-checkout"))
4114 (sha256
4115 (base32
85892948 4116 "1br4kv9y17cvngp83ykpvy7gy3jqfan5plk7sggcgbdfhndi5dsr"))))
588b5e96
RW		 4117 (build-system texlive-build-system)
4118 (arguments
4119 '(#:tex-directory "latex/g-brief"
4120 #:phases
4121 (modify-phases %standard-phases
4122 (add-after 'unpack 'remove-generated-file
4123 (lambda _
4124 (delete-file "g-brief.drv")
4125 #t)))))
b8d8806b 4126 (home-page "https://www.ctan.org/pkg/g-brief")
588b5e96
RW		 4127 (synopsis "Letter document class")
4128 (description
4129 "This package is designed for formatting formless letters in German; it
4130can also be used for English (by those who can read the documentation). There
4131are LaTeX 2.09 @code{documentstyle} and LaTeX 2e class files for both an
4132\"old\" and a \"new\" version of g-brief.")
4133 (license license:lppl)))
4134
9b4d5c09
RW		 4135(define-public texlive-latex-galois
4136 (package
4137 (name "texlive-latex-galois")
4138 (version (number->string %texlive-revision))
4139 (source (origin
4140 (method svn-fetch)
4141 (uri (texlive-ref "latex" "galois"))
4142 (file-name (string-append name "-" version "-checkout"))
4143 (sha256
4144 (base32
4145 "0d4l0msk8j5pi95xnmm9wygv1vbpkwkv5amx9l0km86cs79jpp1h"))))
4146 (build-system texlive-build-system)
4147 (arguments '(#:tex-directory "latex/galois"))
b8d8806b 4148 (home-page "https://www.ctan.org/pkg/galois")
9b4d5c09
RW		 4149 (synopsis "Typeset Galois connections")
4150 (description
4151 "The package deals with connections in two-dimensional style, optionally
4152in colour.")
4153 (license license:lppl)))
4154
5f691e2e
RW		 4155(define-public texlive-latex-gcite
4156 (package
4157 (name "texlive-latex-gcite")
4158 (version (number->string %texlive-revision))
4159 (source (origin
4160 (method svn-fetch)
4161 (uri (texlive-ref "latex" "gcite"))
4162 (file-name (string-append name "-" version "-checkout"))
4163 (sha256
4164 (base32
4165 "03g9by54yrypn599y98r1xh7qw0bbbmpzq0bfwpj6j5q5rkl1mfa"))))
4166 (build-system texlive-build-system)
4167 (arguments '(#:tex-directory "latex/gcite"))
b8d8806b 4168 (home-page "https://www.ctan.org/pkg/gcite")
5f691e2e
RW		 4169 (synopsis "Citations in a reader-friendly style")
4170 (description
4171 "The package allows citations in the German style, which is considered by
4172many to be particularly reader-friendly. The citation provides a small amount
4173of bibliographic information in a footnote on the page where each citation is
4174made. It combines a desire to eliminate unnecessary page-turning with the
4175look-up efficiency afforded by numeric citations. The package makes use of
4176BibLaTeX, and is considered experimental.")
4177 (license license:lppl1.3+)))
4178
f47d1a52
RW		 4179(define-public texlive-latex-geometry
4180 (package
4181 (name "texlive-latex-geometry")
4182 (version (number->string %texlive-revision))
4183 (source (origin
4184 (method svn-fetch)
4185 (uri (texlive-ref "latex" "geometry"))
4186 (file-name (string-append name "-" version "-checkout"))
4187 (sha256
4188 (base32
85892948 4189 "0a8f38c2ds1flxcr0apdpyaaz3k6fyalz6dkbrmcv9srjc40mh3n"))))
f47d1a52
RW		 4190 (build-system texlive-build-system)
4191 (arguments '(#:tex-directory "latex/geometry"))
00a7af0e
RW		 4192 (propagated-inputs
4193 `(("texlive-latex-oberdiek" ,texlive-latex-oberdiek))) ;for ifpdf
b8d8806b 4194 (home-page "https://www.ctan.org/pkg/geometry")
f47d1a52
RW		 4195 (synopsis "Flexible and complete interface to document dimensions")
4196 (description
4197 "This package provides an easy and flexible user interface to customize
4198page layout, implementing auto-centering and auto-balancing mechanisms so that
4199the users have only to give the least description for the page layout. The
4200package knows about all the standard paper sizes, so that the user need not
4201know what the nominal \"real\" dimensions of the paper are, just its standard
4202name (such as a4, letter, etc.). An important feature is the package's
4203ability to communicate the paper size it's set up to the output.")
4204 (license license:lppl)))
4205
d48091be
RW		 4206(define-public texlive-latex-mdwtools
4207 (package
4208 (name "texlive-latex-mdwtools")
4209 (version (number->string %texlive-revision))
4210 (source (origin
4211 (method svn-fetch)
4212 (uri (texlive-ref "latex" "mdwtools"))
4213 (file-name (string-append name "-" version "-checkout"))
4214 (sha256
4215 (base32
4216 "0caxs74hla28hc67csf5i5ahadx97w8vxh3mdmsprxbpd1mr7ssg"))))
4217 (build-system texlive-build-system)
4218 (arguments '(#:tex-directory "latex/mdwtools"))
b8d8806b 4219 (home-page "https://www.ctan.org/pkg/mdwtools")
d48091be
RW		 4220 (synopsis "Miscellaneous tools by Mark Wooding")
4221 (description
4222 "This collection of tools includes: @code{atsupport} for short commands
fb5dfa86
RW		 4223starting with @code{@@}, macros to sanitize the OT1 encoding of the
4224@code{cmtt} fonts; a @code{doafter} command; improved @code{footnote} support;
d48091be
RW		 4225@code{mathenv} for various alignment in maths; list handling; @code{mdwmath}
4226which adds some minor changes to LaTeX maths; a rewrite of LaTeX's tabular and
4227array environments; verbatim handling; and syntax diagrams.")
4228 (license license:gpl3+)))
4229
80bf1f21
RW		 4230(define-public texlive-latex-polyglossia
4231 (package
4232 (name "texlive-latex-polyglossia")
4233 (version (number->string %texlive-revision))
4234 (source (origin
4235 (method svn-fetch)
4236 (uri (texlive-ref "latex" "polyglossia"))
4237 (file-name (string-append name "-" version "-checkout"))
4238 (sha256
4239 (base32
85892948 4240 "0na7v4hsyx5s67cpjj2dbnq8j67k8lln6b19hmj631gfs27slss1"))))
80bf1f21
RW		 4241 (build-system texlive-build-system)
4242 (arguments '(#:tex-directory "latex/polyglossia"))
b8d8806b 4243 (home-page "https://www.ctan.org/pkg/polyglossia")
80bf1f21
RW		 4244 (synopsis "Alternative to babel for XeLaTeX and LuaLaTeX")
4245 (description
4246 "This package provides a complete Babel replacement for users of LuaLaTeX
4247and XeLaTeX; it relies on the @code{fontspec} package, version 2.0 at least.")
4248 (license license:lppl1.3+)))
4249
84f8035a
RW		 4250(define-public texlive-latex-supertabular
4251 (package
4252 (name "texlive-latex-supertabular")
4253 (version (number->string %texlive-revision))
4254 (source (origin
4255 (method svn-fetch)
4256 (uri (texlive-ref "latex" "supertabular"))
4257 (file-name (string-append name "-" version "-checkout"))
4258 (sha256
4259 (base32
4260 "14b2bc7cqz4ckxxycim9sw6jkrr1pahivm1rdbpz5k6hl967w1s3"))))
4261 (build-system texlive-build-system)
4262 (arguments '(#:tex-directory "latex/supertabular"))
b8d8806b 4263 (home-page "https://www.ctan.org/pkg/supertabular")
84f8035a
RW		 4264 (synopsis "Multi-page tables package")
4265 (description
4266 "This package was a predecessor of @code{longtable}; the newer
4267package (designed on quite different principles) is easier to use and more
4268flexible, in many cases, but supertabular retains its usefulness in a few
4269situations where longtable has problems.")
4270 (license license:lppl1.3+)))
4271
a0aa6b59
RW		 4272(define-public texlive-tex-texinfo
4273 (package
4274 (name "texlive-tex-texinfo")
4275 (version (number->string %texlive-revision))
4276 (source (origin
4277 (method svn-fetch)
4278 (uri (svn-reference
4279 (url (string-append "svn://www.tug.org/texlive/tags/"
4280 %texlive-tag "/Master/texmf-dist/"
4281 "/tex/texinfo"))
4282 (revision %texlive-revision)))
88ae1921 4283 (file-name (string-append name "-" version "-checkout"))
a0aa6b59
RW		 4284 (sha256
4285 (base32
85892948 4286 "16jy02m089m7n6v9vbfi4xjgngc1fnvsmmppk8axfwzbhdky3c9c"))))
a0aa6b59
RW		 4287 (build-system trivial-build-system)
4288 (arguments
4289 `(#:modules ((guix build utils))
4290 #:builder
4291 (begin
4292 (use-modules (guix build utils))
4293 (let ((target (string-append (assoc-ref %outputs "out")
4294 "/share/texmf-dist/tex/texinfo")))
4295 (mkdir-p target)
4296 (copy-recursively (assoc-ref %build-inputs "source") target)
4297 #t))))
b8d8806b 4298 (home-page "https://www.ctan.org/pkg/texinfo")
a0aa6b59
RW		 4299 (synopsis "TeX macros to handle Texinfo files")
4300 (description
4301 "Texinfo is the preferred format for documentation in the GNU project;
4302the format may be used to produce online or printed output from a single
4303source. The Texinfo macros may be used to produce printable output using TeX;
4304other programs in the distribution offer online interactive use (with
4305hypertext linkages in some cases).")
4306 (license license:gpl3+)))
4307
0de81b09
RW		 4308(define-public texlive-latex-upquote
4309 (package
4310 (name "texlive-latex-upquote")
4311 (version (number->string %texlive-revision))
4312 (source (origin
4313 (method svn-fetch)
4314 (uri (texlive-ref "latex" "upquote"))
4315 (file-name (string-append name "-" version "-checkout"))
4316 (sha256
4317 (base32
4318 "0d1050i973wnxigy0xpky5l7vn4ff7ldhkjpdqsw5s653gagwixp"))))
4319 (build-system texlive-build-system)
4320 (arguments '(#:tex-directory "latex/upquote"))
b8d8806b 4321 (home-page "https://www.ctan.org/pkg/upquote")
0de81b09
RW		 4322 (synopsis "Show \"realistic\" quotes in verbatim")
4323 (description
4324 "Typewriter-style fonts are best for program listings, but Computer
4325Modern Typewriter prints @code{`} and @code{'} as bent opening and closing
4326single quotes. Other fonts, and most programming languages, print @code{`} as
4327a grave accent and @code{'} upright; @code{'} is used both to open and to
4328close quoted strings. The package switches the typewriter font to Computer
4329Modern Typewriter in OT1 encoding, and modifies the behaviour of
4330@code{verbatim}, @code{verbatim*}, @code{\\verb}, and @code{\\verb*} to print
4331in the expected way. It does this regardless of other fonts or encodings in
4332use, so long as the package is loaded after the other fonts were. The package
4333does not affect @code{\\tt}, @code{\\texttt}, etc.")
4334 (license license:lppl1.2+)))
4335
bda61541
RW		 4336(define-public texlive-latex-anysize
4337 (package
4338 (name "texlive-latex-anysize")
4339 (version (number->string %texlive-revision))
4340 (source (origin
4341 (method svn-fetch)
4342 (uri (svn-reference
4343 (url (string-append "svn://www.tug.org/texlive/tags/"
4344 %texlive-tag "/Master/texmf-dist/"
4345 "/tex/latex/anysize"))
4346 (revision %texlive-revision)))
de4eb4d1 4347 (file-name (string-append name "-" version "-checkout"))
bda61541
RW		 4348 (sha256
4349 (base32
4350 "19khwqjlvznc955sijhww3c4zbb0053rvzwv9nz738qknq7y18vb"))))
4351 (build-system trivial-build-system)
4352 (arguments
4353 `(#:modules ((guix build utils))
4354 #:builder
4355 (begin
4356 (use-modules (guix build utils))
4357 (let ((target (string-append (assoc-ref %outputs "out")
4358 "/share/texmf-dist/tex/latex/anysize")))
4359 (mkdir-p target)
4360 (copy-recursively (assoc-ref %build-inputs "source") target)
4361 #t))))
b8d8806b 4362 (home-page "https://www.ctan.org/pkg/anysize")
bda61541
RW		 4363 (synopsis "Simple package to set up document margins")
4364 (description
4365 "This is a simple package to set up document margins. This package is
4366considered obsolete; alternatives are the @code{typearea} package from the
4367@code{koma-script} bundle, or the @code{geometry} package.")
4368 (license license:public-domain)))
4369
1d3be84e
RW		 4370(define-public texlive-latex-appendix
4371 (package
4372 (name "texlive-latex-appendix")
4373 (version (number->string %texlive-revision))
4374 (source (origin
4375 (method svn-fetch)
4376 (uri (texlive-ref "latex" "appendix"))
72d5adf4 4377 (file-name (string-append name "-" version "-checkout"))
1d3be84e
RW		 4378 (sha256
4379 (base32
4380 "0rxfpr8vq3brwx5rc7qn91ixlp9zva4zrms8a579fqa1g5yva7vg"))))
4381 (build-system texlive-build-system)
4382 (arguments '(#:tex-directory "latex/appendix"))
b8d8806b 4383 (home-page "https://www.ctan.org/pkg/appendix")
1d3be84e
RW		 4384 (synopsis "Extra control of appendices")
4385 (description
4386 "The appendix package provides various ways of formatting the titles of
4387appendices. Also (sub)appendices environments are provided that can be used,
4388for example, for per chapter/section appendices. An @code{appendices}
4389environment is provided which can be used instead of the @code{\\appendix}
4390command.")
4391 (license license:lppl)))
4392
b92ac281
RW		 4393(define-public texlive-latex-changebar
4394 (package
4395 (name "texlive-latex-changebar")
4396 (version (number->string %texlive-revision))
4397 (source (origin
4398 (method svn-fetch)
4399 (uri (texlive-ref "latex" "changebar"))
af8aa105 4400 (file-name (string-append name "-" version "-checkout"))
b92ac281
RW		 4401 (sha256
4402 (base32
d4d9a1ec 4403 "05x15ilynqrl448h8l6qiraygamdldlngz89a2bw7kg74fym14ch"))))
b92ac281
RW		 4404 (build-system texlive-build-system)
4405 (arguments '(#:tex-directory "latex/changebar"))
b8d8806b 4406 (home-page "https://www.ctan.org/pkg/changebar")
b92ac281
RW		 4407 (synopsis "Generate changebars in LaTeX documents")
4408 (description
4409 "Identify areas of text to be marked with changebars with the
4410@code{\\cbstart} and @code{\\cbend} commands; the bars may be coloured. The
36a4366d
EF		 4411package uses @code{drivers} to place the bars; the available drivers can work
4412with @code{dvitoln03}, @code{dvitops}, @code{dvips}, the emTeX and TeXtures DVI
b92ac281
RW		 4413drivers, and VTeX and pdfTeX.")
4414 (license license:lppl)))
4415
fedd77c1
RW		 4416(define-public texlive-latex-cmap
4417 (package
4418 (name "texlive-latex-cmap")
4419 (version (number->string %texlive-revision))
4420 (source (origin
4421 (method svn-fetch)
4422 (uri (svn-reference
4423 (url (string-append "svn://www.tug.org/texlive/tags/"
4424 %texlive-tag "/Master/texmf-dist/"
4425 "/tex/latex/cmap"))
4426 (revision %texlive-revision)))
4427 (file-name (string-append name "-" version "-checkout"))
4428 (sha256
4429 (base32
4430 "1s1rv6zgw105w2j6ffhnk914qrix87y1ndzri1q72g2kbr91zlbg"))))
4431 (build-system trivial-build-system)
4432 (arguments
4433 `(#:modules ((guix build utils))
4434 #:builder
4435 (begin
4436 (use-modules (guix build utils))
4437 (let ((target (string-append (assoc-ref %outputs "out")
4438 "/share/texmf-dist/tex/latex/cmap")))
4439 (mkdir-p target)
4440 (copy-recursively (assoc-ref %build-inputs "source") target)
4441 #t))))
4442 (home-page "https://www.tug.org/svn/texlive/tags/texlive-2017.1/\
4443Master/texmf-dist/tex/latex/cmap/")
4444 (synopsis "CMap support for PDF files")
4445 (description
4446 "This package embeds CMap tables into PDF files to make search and
4447copy-and-paste functions work properly.")
4448 (license license:lppl)))
4449
e003a5f0
RW		 4450(define-public texlive-latex-colortbl
4451 (package
4452 (name "texlive-latex-colortbl")
4453 (version (number->string %texlive-revision))
4454 (source (origin
4455 (method svn-fetch)
4456 (uri (texlive-ref "latex" "colortbl"))
4439c1de 4457 (file-name (string-append name "-" version "-checkout"))
e003a5f0
RW		 4458 (sha256
4459 (base32
85892948 4460 "16vd99p01a0y30xr5yf1z2j5da9x8gy21vb30wk08jh31zffbaqj"))))
e003a5f0
RW		 4461 (build-system texlive-build-system)
4462 (arguments '(#:tex-directory "latex/colortbl"))
b8d8806b 4463 (home-page "https://www.ctan.org/pkg/colortbl")
e003a5f0 4464 (synopsis "Add colour to LaTeX tables")
83c830d1 4465 (description
e003a5f0
RW		 4466 "This package allows rows, columns, and even individual cells in LaTeX
4467tables to be coloured.")
4468 (license license:lppl)))
83c830d1 4469
36ce05ff 4470(define-public texlive-latex-fancybox
5e9bf5a2 4471 (package
36ce05ff 4472 (name "texlive-latex-fancybox")
5e9bf5a2
RW		 4473 (version (number->string %texlive-revision))
4474 (source (origin
4475 (method svn-fetch)
4476 (uri (svn-reference
4477 (url (string-append "svn://www.tug.org/texlive/tags/"
4478 %texlive-tag "/Master/texmf-dist/"
36ce05ff 4479 "/tex/latex/fancybox"))
5e9bf5a2
RW		 4480 (revision %texlive-revision)))
4481 (file-name (string-append name "-" version "-checkout"))
4482 (sha256
4483 (base32
36ce05ff 4484 "0smmnaad2q8qwicay1frri990lv65l0k8cwzsvdsyp3jk8kp042w"))))
5e9bf5a2
RW		 4485 (build-system trivial-build-system)
4486 (arguments
36ce05ff 4487 `(#:modules ((guix build utils))
5e9bf5a2
RW		 4488 #:builder
4489 (begin
36ce05ff
RW		 4490 (use-modules (guix build utils))
4491 (let ((target (string-append (assoc-ref %outputs "out")
4492 "/share/texmf-dist/tex/latex/fancybox")))
4493 (mkdir-p target)
4494 (copy-recursively (assoc-ref %build-inputs "source") target)
5e9bf5a2 4495 #t))))
b8d8806b 4496 (home-page "https://www.ctan.org/pkg/fancybox")
36ce05ff 4497 (synopsis "Variants of \\fbox and other games with boxes")
5e9bf5a2 4498 (description
36ce05ff
RW		 4499 "This package provides variants of @code{\\fbox}: @code{\\shadowbox},
4500@code{\\doublebox}, @code{\\ovalbox}, @code{\\Ovalbox}, with helpful tools for
4501using box macros and flexible verbatim macros. You can box mathematics,
4502floats, center, flushleft, and flushright, lists, and pages.")
4503 (license license:lppl1.2+)))
5e9bf5a2 4504
20282111 4505(define-public texlive-latex-fancyhdr
f2d1f060 4506 (package
20282111 4507 (name "texlive-latex-fancyhdr")
f2d1f060
RW		 4508 (version (number->string %texlive-revision))
4509 (source (origin
4510 (method svn-fetch)
4511 (uri (svn-reference
4512 (url (string-append "svn://www.tug.org/texlive/tags/"
4513 %texlive-tag "/Master/texmf-dist/"
20282111 4514 "/tex/latex/fancyhdr"))
f2d1f060
RW		 4515 (revision %texlive-revision)))
4516 (file-name (string-append name "-" version "-checkout"))
4517 (sha256
4518 (base32
85892948 4519 "0hrwspqkqfahxyzzsnjyrxlgxj06zw1f3636gx76pvl4xhvdj1cj"))))
f2d1f060
RW		 4520 (build-system trivial-build-system)
4521 (arguments
20282111 4522 `(#:modules ((guix build utils))
f2d1f060
RW		 4523 #:builder
4524 (begin
20282111
RW		 4525 (use-modules (guix build utils))
4526 (let ((target (string-append (assoc-ref %outputs "out")
4527 "/share/texmf-dist/tex/latex/fancyhdr")))
4528 (mkdir-p target)
4529 (copy-recursively (assoc-ref %build-inputs "source") target)
f2d1f060 4530 #t))))
b8d8806b 4531 (home-page "https://www.ctan.org/pkg/fancyhdr")
20282111
RW		 4532 (synopsis "Extensive control of page headers and footers in LaTeX2e")
4533 (description
4534 "The package provides extensive facilities, both for constructing headers
4535and footers, and for controlling their use (for example, at times when LaTeX
4536would automatically change the heading style in use).")
4537 (license license:lppl)))
4538
df2b9bb4
RW		 4539(define-public texlive-latex-float
4540 (package
4541 (name "texlive-latex-float")
4542 (version (number->string %texlive-revision))
4543 (source (origin
4544 (method svn-fetch)
4545 (uri (texlive-ref "latex" "float"))
4fd0a591 4546 (file-name (string-append name "-" version "-checkout"))
df2b9bb4
RW		 4547 (sha256
4548 (base32
4549 "0nbl7wylkv22fcdv4p8byhhj575fli6jnqjpkhrkbv8dzwah84nq"))))
4550 (build-system texlive-build-system)
4551 (arguments '(#:tex-directory "latex/float"))
b8d8806b 4552 (home-page "https://www.ctan.org/pkg/float")
df2b9bb4 4553 (synopsis "Improved interface for floating objects")
f2d1f060 4554 (description
df2b9bb4
RW		 4555 "This package improves the interface for defining floating objects such
4556as figures and tables. It introduces the boxed float, the ruled float and the
4557plaintop float. You can define your own floats and improve the behaviour of
4558the old ones. The package also provides the @code{H} float modifier option of
4559the obsolete @code{here} package. You can select this as automatic default
4560with @code{\\floatplacement{figure}{H}}.")
4561 (license license:lppl)))
f2d1f060 4562
3921bc7c
RW		 4563(define-public texlive-latex-footmisc
4564 (package
4565 (name "texlive-latex-footmisc")
4566 (version (number->string %texlive-revision))
4567 (source (origin
4568 (method svn-fetch)
4569 (uri (texlive-ref "latex" "footmisc"))
dae1d9e4 4570 (file-name (string-append name "-" version "-checkout"))
3921bc7c
RW		 4571 (sha256
4572 (base32
4573 "03x61wwql8nh6zrqiiiq3rb0x7m3pn48c606zapy19y21fybwdxs"))))
4574 (build-system texlive-build-system)
4575 (arguments '(#:tex-directory "latex/footmisc"))
b8d8806b 4576 (home-page "https://www.ctan.org/pkg/footmisc")
3921bc7c
RW		 4577 (synopsis "Range of footnote options")
4578 (description
4579 "This is a collection of ways to change the typesetting of footnotes.
4580The package provides means of changing the layout of the footnotes themselves,
4581a way to number footnotes per page, to make footnotes disappear in a
4582\"moving\" argument, and to deal with multiple references to footnotes from
4583the same place. The package also has a range of techniques for labelling
4584footnotes with symbols rather than numbers.")
4585 (license license:lppl1.3+)))
4586
b2bc1daf
RW		 4587(define-public texlive-latex-listings
4588 (package
4589 (name "texlive-latex-listings")
4590 (version (number->string %texlive-revision))
4591 (source (origin
4592 (method svn-fetch)
4593 (uri (texlive-ref "latex" "listings"))
aeb135e3 4594 (file-name (string-append name "-" version "-checkout"))
b2bc1daf
RW		 4595 (sha256
4596 (base32
85892948 4597 "1fbrhqj22vzakn30j71fc41l8nliqbv1dmxm0zlwi2qjjbq6fwav"))))
b2bc1daf
RW		 4598 (build-system texlive-build-system)
4599 (arguments
4600 '(#:tex-directory "latex/listings"
4601 #:build-targets '("listings.ins")))
b8d8806b 4602 (home-page "https://www.ctan.org/pkg/listings")
b2bc1daf
RW		 4603 (synopsis "Typeset source code listings using LaTeX")
4604 (description
4605 "The package enables the user to typeset programs (programming code)
4606within LaTeX; the source code is read directly by TeX---no front-end processor
4607is needed. Keywords, comments and strings can be typeset using different
4608styles. Support for @code{hyperref} is provided.")
4609 (license license:lppl1.3+)))
4610
02fd07b3 4611(define-public texlive-latex-jknapltx
4628315b 4612 (package
02fd07b3 4613 (name "texlive-latex-jknapltx")
4628315b
RW		 4614 (version (number->string %texlive-revision))
4615 (source (origin
4616 (method svn-fetch)
4617 (uri (svn-reference
4618 (url (string-append "svn://www.tug.org/texlive/tags/"
4619 %texlive-tag "/Master/texmf-dist/"
02fd07b3 4620 "/tex/latex/jknapltx"))
4628315b
RW		 4621 (revision %texlive-revision)))
4622 (file-name (string-append name "-" version "-checkout"))
4623 (sha256
4624 (base32
02fd07b3 4625 "0m034x72f2g07icr50gacyxfb9g1lz2rmqh4kqr1qjb421x2kds9"))))
4628315b
RW		 4626 (build-system trivial-build-system)
4627 (arguments
02fd07b3 4628 `(#:modules ((guix build utils))
4628315b
RW		 4629 #:builder
4630 (begin
02fd07b3
RW		 4631 (use-modules (guix build utils))
4632 (let ((target (string-append (assoc-ref %outputs "out")
4633 "/share/texmf-dist/tex/latex/jknapltx")))
4634 (mkdir-p target)
4635 (copy-recursively (assoc-ref %build-inputs "source") target)
4628315b 4636 #t))))
b8d8806b 4637 (home-page "https://www.ctan.org/pkg/jknappen")
02fd07b3
RW		 4638 (synopsis "Miscellaneous packages by Joerg Knappen")
4639 (description
4640 "This package provides miscellaneous macros by Joerg Knappen, including:
4641represent counters in greek; Maxwell's non-commutative division;
4642@code{latin1jk}, @code{latin2jk} and @code{latin3jk}, which are
4643@code{inputenc} definition files that allow verbatim input in the respective
4644ISO Latin codes; blackboard bold fonts in maths; use of RSFS fonts in maths;
4645extra alignments for @code{\\parboxes}; swap Roman and Sans fonts;
4646transliterate semitic languages; patches to make (La)TeX formulae embeddable
4647in SGML; use maths minus in text as appropriate; simple Young tableaux.")
4648 (license license:gpl2)))
4649
83c830d1
RW		 4650(define-public texlive-fonts-ec
4651 (package
4652 (name "texlive-fonts-ec")
4653 (version (number->string %texlive-revision))
4654 (source (origin
4655 (method svn-fetch)
4656 (uri (svn-reference
4657 (url (string-append "svn://www.tug.org/texlive/tags/"
4658 %texlive-tag "/Master/texmf-dist/"
4659 "/fonts/source/jknappen/ec/"))
4660 (revision %texlive-revision)))
ca816eb3 4661 (file-name (string-append name "-" version "-checkout"))
83c830d1
RW		 4662 (sha256
4663 (base32
4664 "12av65fbz9xiashm09c9m1fj1mijxls5xspd7652ry1n5s0nixy4"))))
4665 (build-system gnu-build-system)
4666 (arguments
4667 `(#:modules ((guix build gnu-build-system)
4668 (guix build utils)
4669 (srfi srfi-1)
4670 (srfi srfi-26))
4671 #:tests? #f ; no tests
4672 #:phases
4673 (modify-phases %standard-phases
4674 (delete 'configure)
4675 (replace 'build
4676 (lambda* (#:key inputs #:allow-other-keys)
4677 (let ((mf (assoc-ref inputs "texlive-metafont-base")))
4678 ;; Tell mf where to find mf.base
4679 (setenv "MFBASES" (string-append mf "/share/texmf-dist/web2c"))
4680 ;; Tell mf where to look for source files
4681 (setenv "MFINPUTS"
4682 (string-append (getcwd) ":"
4683 mf "/share/texmf-dist/metafont/base:"
a6405e03 4684 (assoc-ref inputs "texlive-cm")
83c830d1
RW		 4685 "/share/texmf-dist/fonts/source/public/cm")))
4686 (mkdir "build")
c4fc86e4
MW		 4687 (for-each (lambda (font)
4688 (format #t "building font ~a\n" font)
4689 (invoke "mf" "-progname=mf"
4690 "-output-directory=build"
4691 (string-append "\\"
4692 "mode:=ljfour; "
4693 "mag:=1; "
4694 "batchmode; "
4695 "input " (basename font ".mf"))))
4696 (find-files "." "[0-9]+\\.mf$"))
4697 #t))
83c830d1
RW		 4698 (replace 'install
4699 (lambda* (#:key outputs #:allow-other-keys)
4700 (let* ((out (assoc-ref outputs "out"))
4701 (tfm (string-append
4702 out "/share/texmf-dist/fonts/tfm/jknappen/ec"))
4703 (mf (string-append
4704 out "/share/texmf-dist/fonts/source/jknappen/ec")))
4705 (for-each (cut install-file <> tfm)
4706 (find-files "build" "\\.*"))
4707 (for-each (cut install-file <> mf)
4708 (find-files "." "\\.mf"))
4709 #t))))))
4628315b 4710 (native-inputs
83c830d1
RW		 4711 `(("texlive-bin" ,texlive-bin)
4712 ("texlive-metafont-base" ,texlive-metafont-base)
a6405e03 4713 ("texlive-cm" ,texlive-cm)))
b8d8806b 4714 (home-page "https://www.ctan.org/pkg/ec")
83c830d1
RW		 4715 (synopsis "Computer modern fonts in T1 and TS1 encodings")
4716 (description
4717 "The EC fonts are European Computer Modern Fonts, supporting the complete
4718LaTeX T1 encoding defined at the 1990 TUG conference hold at Cork/Ireland.
4719These fonts are intended to be stable with no changes being made to the tfm
4720files. The set also contains a Text Companion Symbol font, called @code{tc},
4721featuring many useful characters needed in text typesetting, for example
4722oldstyle digits, currency symbols (including the newly created Euro symbol),
4723the permille sign, copyright, trade mark and servicemark as well as a copyleft
4724sign, and many others. Recent releases of LaTeX2e support the EC fonts. The
4725EC fonts supersede the preliminary version released as the DC fonts. The
4726fonts are available in (traced) Adobe Type 1 format, as part of the
4727@code{cm-super} bundle. The other Computer Modern-style T1-encoded Type 1
4728set, Latin Modern, is not actually a direct development of the EC set, and
4729differs from the EC in a number of particulars.")
4730 (license (license:fsf-free "https://www.tug.org/svn/texlive/tags/\
85892948 4731texlive-2019.3/Master/texmf-dist/doc/fonts/ec/copyrite.txt"))))
83c830d1 4732
6a4fe83b
RW		 4733;; FIXME: the fonts should be built from source, but running "tex aefonts.tex"
4734;; fails with obscure TeX-typical error messages.
4735(define-public texlive-ae
4736 (package
4737 (inherit (simple-texlive-package
4738 "texlive-ae"
4739 (list "/doc/fonts/ae/"
4740 "/source/fonts/ae/"
4741 "/fonts/tfm/public/ae/"
4742 "/fonts/vf/public/ae/"
4743 "/tex/latex/ae/")
4744 (base32
4745 "1xkzg381y0avdq381r2m990wp27czkdff0qkvsp2n5q62yc0bdsw")
4746 #:trivial? #t))
4747 (home-page "https://www.ctan.org/pkg/ae")
4748 (synopsis "Virtual fonts for T1 encoded CMR-fonts")
4749 (description
4750 "This package provides a set of virtual fonts which emulates T1 coded
4751fonts using the standard CM fonts. The package name, AE fonts, supposedly
4752stands for \"Almost European\". The main use of the package was to produce
4753PDF files using Adobe Type 1 versions of the CM fonts instead of bitmapped EC
4754fonts. Note that direct substitutes for the bitmapped EC fonts are available,
4755via the CM-super, Latin Modern and (in a restricted way) CM-LGC font sets.")
4756 (license license:lppl1.3+)))
4757
1aaa117c 4758(define-public texlive-times
5e9bf5a2 4759 (package
1aaa117c
RW		 4760 (inherit (simple-texlive-package
4761 "texlive-times"
4762 (list "/dvips/times/"
4763 "/fonts/afm/adobe/times/"
4764 "/fonts/afm/urw/times/"
4765 "/fonts/tfm/adobe/times/"
4766 "/fonts/tfm/urw35vf/times/"
4767 "/fonts/type1/urw/times/"
4768 "/fonts/vf/adobe/times/"
4769 "/fonts/vf/urw35vf/times/"
4770 "/fonts/map/dvips/times/"
4771 "/tex/latex/times/")
4772 (base32
4773 "13g41a7vbkvsf7ki9dgl7qm100w382mnlqkcngwgl3axp6s5s8l0")
4774 #:trivial? #t))
5e9bf5a2
RW		 4775 (home-page "https://ctan.org/pkg/urw-base35")
4776 (synopsis "URW Base 35 font pack for LaTeX")
4777 (description
4778 "This package provides a drop-in replacements for the Times font from
4779Adobe's basic set.")
4780 ;; No license version specified.
4781 (license license:gpl3+)))
4782
1aaa117c
RW		 4783(define-public texlive-fonts-adobe-times
4784 (deprecated-package "texlive-fonts-adobe-times" texlive-times))
4785
57bee3cc 4786(define-public texlive-palatino
f2d1f060 4787 (package
57bee3cc
RW		 4788 (inherit (simple-texlive-package
4789 "texlive-palatino"
4790 (list "/dvips/palatino/"
4791 "/fonts/afm/adobe/palatino/"
4792 "/fonts/afm/urw/palatino/"
4793 "/fonts/tfm/adobe/palatino/"
4794 "/fonts/tfm/urw35vf/palatino/"
4795 "/fonts/type1/urw/palatino/"
4796 "/fonts/vf/adobe/palatino/"
4797 "/fonts/vf/urw35vf/palatino/"
4798
4799 "/fonts/map/dvips/palatino/"
4800 "/tex/latex/palatino/")
4801 (base32
4802 "12jc0av7v99857jigmva47qaxyllhpzsnqis10n0qya2kz44xf22")
4803 #:trivial? #t))
f2d1f060
RW		 4804 (home-page "https://ctan.org/pkg/urw-base35")
4805 (synopsis "URW Base 35 font pack for LaTeX")
4806 (description
4807 "This package provides a drop-in replacements for the Palatino font from
4808Adobe's basic set.")
4809 ;; No license version specified.
4810 (license license:gpl3+)))
4811
57bee3cc
RW		 4812(define-public texlive-fonts-adobe-palatino
4813 (deprecated-package "texlive-fonts-adobe-palatino" texlive-palatino))
4814
df19dc2f 4815(define-public texlive-zapfding
4628315b 4816 (package
df19dc2f
RW		 4817 (inherit (simple-texlive-package
4818 "texlive-zapfding"
4819 (list "/dvips/zapfding/"
4820 "/fonts/afm/adobe/zapfding/"
4821 "/fonts/afm/urw/zapfding/"
4822 "/fonts/tfm/adobe/zapfding/"
4823 "/fonts/tfm/urw35vf/zapfding/"
4824 "/fonts/type1/urw/zapfding/"
4825 "/fonts/map/dvips/zapfding/"
4826 "/tex/latex/zapfding/")
4827 (base32
4828 "17mls8wilz9api9ivsbcczpiqp1f39qy8wa6ajssi8zhnc5lq7zn")
4829 #:trivial? #t))
4628315b
RW		 4830 (home-page "https://ctan.org/pkg/urw-base35")
4831 (synopsis "URW Base 35 font pack for LaTeX")
4832 (description
4833 "This package provides a drop-in replacements for the Zapfding font from
4834Adobe's basic set.")
4835 ;; No license version specified.
4836 (license license:gpl3+)))
4837
df19dc2f
RW		 4838(define-public texlive-fonts-adobe-zapfding
4839 (deprecated-package "texlive-fonts-adobe-zapfding" texlive-zapfding))
4840
f45a5520
RW		 4841(define-public texlive-fonts-rsfs
4842 (package
4843 (name "texlive-fonts-rsfs")
4844 (version (number->string %texlive-revision))
4845 (source (origin
4846 (method svn-fetch)
4847 (uri (svn-reference
4848 (url (string-append "svn://www.tug.org/texlive/tags/"
4849 %texlive-tag "/Master/texmf-dist/"
4850 "/fonts/source/public/rsfs/"))
4851 (revision %texlive-revision)))
e26de9c9 4852 (file-name (string-append name "-" version "-checkout"))
f45a5520
RW		 4853 (sha256
4854 (base32
4855 "0r12pn02r4a955prcvq0048nifh86ihlcgvw3pppqqvfngv34l5h"))))
4856 (build-system gnu-build-system)
4857 (arguments
4858 `(#:modules ((guix build gnu-build-system)
4859 (guix build utils)
4860 (srfi srfi-1)
4861 (srfi srfi-26))
4862 #:tests? #f ; no tests
4863 #:phases
4864 (modify-phases %standard-phases
4865 (delete 'configure)
4866 (replace 'build
4867 (lambda* (#:key inputs #:allow-other-keys)
4868 (let ((mf (assoc-ref inputs "texlive-metafont-base")))
4869 ;; Tell mf where to find mf.base
4870 (setenv "MFBASES" (string-append mf "/share/texmf-dist/web2c"))
4871 ;; Tell mf where to look for source files
4872 (setenv "MFINPUTS"
4873 (string-append (getcwd) ":"
4874 mf "/share/texmf-dist/metafont/base:"
a6405e03 4875 (assoc-ref inputs "texlive-cm")
f45a5520
RW		 4876 "/share/texmf-dist/fonts/source/public/cm")))
4877 (mkdir "build")
d8ac82c2
MW		 4878 (for-each (lambda (font)
4879 (format #t "building font ~a\n" font)
4880 (invoke "mf" "-progname=mf"
4881 "-output-directory=build"
4882 (string-append "\\"
4883 "mode:=ljfour; "
4884 "mag:=1; "
4885 "batchmode; "
4886 "input " (basename font ".mf"))))
4887 (find-files "." "[0-9]+\\.mf$"))
4888 #t))
f45a5520
RW		 4889 (replace 'install
4890 (lambda* (#:key outputs #:allow-other-keys)
4891 (let* ((out (assoc-ref outputs "out"))
4892 (tfm (string-append
4893 out "/share/texmf-dist/fonts/tfm/public/rsfs"))
4894 (mf (string-append
4895 out "/share/texmf-dist/fonts/source/public/rsfs")))
4896 (for-each (cut install-file <> tfm)
4897 (find-files "build" "\\.*"))
4898 (for-each (cut install-file <> mf)
4899 (find-files "." "\\.mf"))
4900 #t))))))
4901 (native-inputs
4902 `(("texlive-bin" ,texlive-bin)
4903 ("texlive-metafont-base" ,texlive-metafont-base)
a6405e03 4904 ("texlive-cm" ,texlive-cm)))
b8d8806b 4905 (home-page "https://www.ctan.org/pkg/rsfs")
f45a5520
RW		 4906 (synopsis "Ralph Smith's Formal Script font")
4907 (description
4908 "The fonts provide uppercase formal script letters for use as symbols in
4909scientific and mathematical typesetting (in contrast to the informal script
4910fonts such as that used for the calligraphic symbols in the TeX maths symbol
4911font). The fonts are provided as Metafont source, and as derived Adobe Type 1
4912format. LaTeX support, for using these fonts in mathematics, is available via
4913one of the packages @code{calrsfs} and @code{mathrsfs}.")
4914 (license (license:fsf-free "http://mirrors.ctan.org/fonts/rsfs/README"))))
4915
1562763c
RW		 4916(define-public texlive-latex-eso-pic
4917 (package
4918 (name "texlive-latex-eso-pic")
4919 (version (number->string %texlive-revision))
4920 (source (origin
4921 (method svn-fetch)
4922 (uri (texlive-ref "latex" "eso-pic"))
2678a63b 4923 (file-name (string-append name "-" version "-checkout"))
1562763c
RW		 4924 (sha256
4925 (base32
85892948 4926 "0y2y08kr3w6asm9lblj9yywqmhaal36fq71zzcbfsc7cvwf641q7"))))
1562763c
RW		 4927 (build-system texlive-build-system)
4928 (arguments '(#:tex-directory "latex/eso-pic"))
b8d8806b 4929 (home-page "https://www.ctan.org/pkg/eso-pic")
1562763c
RW		 4930 (synopsis "Add picture commands (or backgrounds) to every page")
4931 (description
4932 "The package adds one or more user commands to LaTeX's @code{shipout}
4933routine, which may be used to place the output at fixed positions. The
4934@code{grid} option may be used to find the correct places.")
4935 (license license:lppl1.3+)))
4936
ae3779d5
RW		 4937(define-public texlive-latex-eepic
4938 (package
4939 (name "texlive-latex-eepic")
4940 (version (number->string %texlive-revision))
4941 (source (origin
4942 (method svn-fetch)
4943 (uri (svn-reference
4944 (url (string-append "svn://www.tug.org/texlive/tags/"
4945 %texlive-tag "/Master/texmf-dist/"
4946 "/tex/latex/eepic"))
4947 (revision %texlive-revision)))
84d63643 4948 (file-name (string-append name "-" version "-checkout"))
ae3779d5
RW		 4949 (sha256
4950 (base32
4951 "1c68gvh021pvybg07apsd2xhq2ljbg80kq94wh71drdga3c2zqjw"))))
4952 (build-system trivial-build-system)
4953 (arguments
4954 `(#:modules ((guix build utils))
4955 #:builder
4956 (begin
4957 (use-modules (guix build utils))
4958 (let ((target (string-append (assoc-ref %outputs "out")
4959 "/share/texmf-dist/tex/latex/eepic")))
4960 (mkdir-p target)
4961 (copy-recursively (assoc-ref %build-inputs "source") target)
4962 #t))))
b8d8806b 4963 (home-page "https://www.ctan.org/pkg/eepic")
ae3779d5
RW		 4964 (synopsis "Extensions to epic and the LaTeX drawing tools")
4965 (description
4966 "Extensions to @code{epic} and the LaTeX picture drawing environment,
4967include the drawing of lines at any slope, the drawing of circles in any
4968radii, and the drawing of dotted and dashed lines much faster with much less
4969TeX memory, and providing several new commands for drawing ellipses, arcs,
4970splines, and filled circles and ellipses. The package uses @code{tpic}
4971@code{\\special} commands.")
4972 (license license:public-domain)))
4973
245f1f31
RW		 4974(define-public texlive-latex-enumitem
4975 (package
4976 (name "texlive-latex-enumitem")
4977 (version (number->string %texlive-revision))
4978 (source (origin
4979 (method svn-fetch)
4980 (uri (svn-reference
4981 (url (string-append "svn://www.tug.org/texlive/tags/"
4982 %texlive-tag "/Master/texmf-dist/"
4983 "/tex/latex/enumitem"))
4984 (revision %texlive-revision)))
4985 (file-name (string-append name "-" version "-checkout"))
4986 (sha256
4987 (base32
85892948 4988 "1vm9xp67hzif0pqab4r3ialf0cyhi0fa4p8kxgp1ymcf85pqip14"))))
245f1f31
RW		 4989 (build-system trivial-build-system)
4990 (arguments
4991 `(#:modules ((guix build utils))
4992 #:builder
4993 (begin
4994 (use-modules (guix build utils))
4995 (let ((target (string-append (assoc-ref %outputs "out")
4996 "/share/texmf-dist/tex/latex/enumitem")))
4997 (mkdir-p target)
4998 (copy-recursively (assoc-ref %build-inputs "source") target)
4999 #t))))
b8d8806b 5000 (home-page "https://www.ctan.org/pkg/enumitem")
245f1f31
RW		 5001 (synopsis "Customize basic list environments")
5002 (description
5003 "This package is intended to ease customizing the three basic list
5004environments: @code{enumerate}, @code{itemize} and @code{description}. It
5005extends their syntax to allow an optional argument where a set of parameters
5006in the form @code{key=value} are available, for example:
5007@code{\\begin{itemize}[itemsep=1ex,leftmargin=1cm]}.")
5008 (license license:lppl1.3+)))
5009
ecffeeb5
RW		 5010(define-public texlive-latex-multirow
5011 (package
5012 (name "texlive-latex-multirow")
5013 (version (number->string %texlive-revision))
5014 (source (origin
5015 (method svn-fetch)
5016 (uri (texlive-ref "latex" "multirow"))
6a919804 5017 (file-name (string-append name "-" version "-checkout"))
ecffeeb5
RW		 5018 (sha256
5019 (base32
85892948 5020 "07vbcp6avdwldr870cwf65av2s9lfyzcpp8gpld53yw6lcxgaipj"))))
ecffeeb5
RW		 5021 (build-system texlive-build-system)
5022 (arguments '(#:tex-directory "latex/multirow"))
b8d8806b 5023 (home-page "https://www.ctan.org/pkg/multirow")
ecffeeb5
RW		 5024 (synopsis "Create tabular cells spanning multiple rows")
5025 (description
5026 "The package provides tools for creating tabular cells spanning multiple
5027rows. It has a lot of flexibility, including an option for specifying an
5028entry at the \"natural\" width of its text.")
5029 (license license:lppl1.3+)))
5030
da38b235
RW		 5031(define-public texlive-latex-overpic
5032 (package
5033 (name "texlive-latex-overpic")
5034 (version (number->string %texlive-revision))
5035 (source (origin
5036 (method svn-fetch)
5037 (uri (svn-reference
5038 (url (string-append "svn://www.tug.org/texlive/tags/"
5039 %texlive-tag "/Master/texmf-dist/"
5040 "/tex/latex/overpic"))
5041 (revision %texlive-revision)))
b2aef721 5042 (file-name (string-append name "-" version "-checkout"))
da38b235
RW		 5043 (sha256
5044 (base32
85892948 5045 "1pr6ym3ad7x14ng7gmhsmywh3685d2cnm5qgyrqbigng2r6fcc1k"))))
da38b235
RW		 5046 (build-system trivial-build-system)
5047 (arguments
5048 `(#:modules ((guix build utils))
5049 #:builder
5050 (begin
5051 (use-modules (guix build utils))
5052 (let ((target (string-append (assoc-ref %outputs "out")
5053 "/share/texmf-dist/tex/latex/overpic")))
5054 (mkdir-p target)
5055 (copy-recursively (assoc-ref %build-inputs "source") target)
5056 #t))))
b8d8806b 5057 (home-page "https://www.ctan.org/pkg/overpic")
da38b235
RW		 5058 (synopsis "Combine LaTeX commands over included graphics")
5059 (description
5060 "The @code{overpic} environment is a cross between the LaTeX
5061@code{picture} environment and the @code{\\includegraphics} command of
5062@code{graphicx}. The resulting picture environment has the same dimensions as
5063the included graphic. LaTeX commands can be placed on the graphic at defined
5064positions; a grid for orientation is available.")
5065 (license license:lppl1.0+)))
5066
e0d307d1
RW		 5067(define-public texlive-latex-parskip
5068 (package
5069 (name "texlive-latex-parskip")
5070 (version (number->string %texlive-revision))
5071 (source (origin
5072 (method svn-fetch)
5073 (uri (svn-reference
5074 (url (string-append "svn://www.tug.org/texlive/tags/"
5075 %texlive-tag "/Master/texmf-dist/"
5076 "/tex/latex/parskip"))
5077 (revision %texlive-revision)))
5078 (file-name (string-append name "-" version "-checkout"))
5079 (sha256
5080 (base32
85892948 5081 "0j1fhm1m9k6rz80lmch3x44g20y9nm4abaaf8czb0q8hzwlx5aq5"))))
e0d307d1
RW		 5082 (build-system trivial-build-system)
5083 (arguments
5084 `(#:modules ((guix build utils))
5085 #:builder
5086 (begin
5087 (use-modules (guix build utils))
5088 (let ((target (string-append (assoc-ref %outputs "out")
5089 "/share/texmf-dist/tex/latex/parskip")))
5090 (mkdir-p target)
5091 (copy-recursively (assoc-ref %build-inputs "source") target)
5092 #t))))
b8d8806b 5093 (home-page "https://www.ctan.org/pkg/parskip")
e0d307d1
RW		 5094 (synopsis "Layout with zero \\parindent, non-zero \\parskip")
5095 (description
5096 "Simply changing @code{\\parskip} and @code{\\parindent} leaves a layout
5097that is untidy; this package (though it is no substitute for a properly
5098designed class) helps alleviate this untidiness.")
5099 (license license:lppl)))
5100
adc02c70
RW		 5101(define-public texlive-latex-pdfpages
5102 (package
5103 (name "texlive-latex-pdfpages")
5104 (version (number->string %texlive-revision))
5105 (source (origin
5106 (method svn-fetch)
5107 (uri (texlive-ref "latex" "pdfpages"))
7372ce18 5108 (file-name (string-append name "-" version "-checkout"))
adc02c70
RW		 5109 (sha256
5110 (base32
d4d9a1ec 5111 "0s4izcah7im67889qz4d26pcfpasmm35sj1rw4ragkkdk3rlbbbd"))))
adc02c70
RW		 5112 (build-system texlive-build-system)
5113 (arguments '(#:tex-directory "latex/pdfpages"))
b8d8806b 5114 (home-page "https://www.ctan.org/pkg/pdfpages")
adc02c70
RW		 5115 (synopsis "Include PDF documents in LaTeX")
5116 (description
5117 "This package simplifies the inclusion of external multi-page PDF
5118documents in LaTeX documents. Pages may be freely selected and it is possible
5119to put several logical pages onto each sheet of paper. Furthermore a lot of
5120hypertext features like hyperlinks and article threads are provided. The
5121package supports pdfTeX (pdfLaTeX) and VTeX. With VTeX it is even possible to
5122use this package to insert PostScript files, in addition to PDF files.")
5123 (license license:lppl1.3+)))
5124
d8fef6ea
RW		 5125(define-public texlive-fonts-stmaryrd
5126 (package
5127 (name "texlive-fonts-stmaryrd")
5128 (version (number->string %texlive-revision))
5129 (source (origin
5130 (method svn-fetch)
5131 (uri (texlive-ref "fonts" "stmaryrd"))
19835372 5132 (file-name (string-append name "-" version "-checkout"))
d8fef6ea
RW		 5133 (sha256
5134 (base32
5135 "08pn4ca3vl6qm9l3wm5h5iyjsrg411kkm1yana329xwg2j14s9n6"))))
5136 (build-system texlive-build-system)
5137 (arguments
5138 '(#:tex-directory "latex/stmaryrd"
5139 #:phases
5140 (modify-phases %standard-phases
5141 (add-after 'configure 'patch-ins
5142 (lambda _
5143 (substitute* "stmaryrd.ins"
5144 (("^%% LaTeX2e.*") "\\input docstrip\n")
5145 (("fontdef\\}\\}" line)
5146 (string-append line "\n\\endbatchfile")))
5147 #t)))))
b8d8806b 5148 (home-page "https://www.ctan.org/pkg/stmaryrd")
d8fef6ea
RW		 5149 (synopsis "St Mary Road symbols for theoretical computer science")
5150 (description
5151 "The fonts were originally distributed as Metafont sources only, but
5152Adobe Type 1 versions are also now available. Macro support is provided for
5153use under LaTeX; the package supports the @code{only} option (provided by the
5154@code{somedefs} package) to restrict what is loaded, for those who don't need
5155the whole font.")
5156 (license license:lppl)))
5157
2db3a034
RW		 5158(define-public texlive-latex-subfigure
5159 (package
5160 (name "texlive-latex-subfigure")
5161 (version (number->string %texlive-revision))
5162 (source (origin
5163 (method svn-fetch)
5164 (uri (texlive-ref "latex" "subfigure"))
e1834df6 5165 (file-name (string-append name "-" version "-checkout"))
2db3a034
RW		 5166 (sha256
5167 (base32
5168 "15spcl5wb7w269qd6y596vp4yi8sa5ppcx8w4z2i9kyp02r3a0yb"))))
5169 (build-system texlive-build-system)
5170 (arguments '(#:tex-directory "latex/subfigure"))
b8d8806b 5171 (home-page "https://www.ctan.org/pkg/subfigure")
2db3a034
RW		 5172 (synopsis "Figures divided into subfigures")
5173 (description
5174 "This (deprecated) package provides support for the manipulation and
5175reference of small or \"sub\" figures and tables within a single figure or
5176table environment. It is convenient to use this package when your subfigures
5177are to be separately captioned, referenced, or are to be included in the
5178List-of-Figures. A new @code{\\subfigure} command is introduced which can be
5179used inside a figure environment for each subfigure. An optional first
5180argument is used as the caption for that subfigure. The package is now
5181considered obsolete: it was superseded by @code{subfig}, but users may find
5182the more recent @code{subcaption} package more satisfactory.")
5183 (license license:lppl)))
5184
c73d0e9d
RW		 5185(define-public texlive-latex-tabulary
5186 (package
5187 (name "texlive-latex-tabulary")
5188 (version (number->string %texlive-revision))
5189 (source (origin
5190 (method svn-fetch)
5191 (uri (texlive-ref "latex" "tabulary"))
5192 (file-name (string-append name "-" version "-checkout"))
5193 (sha256
5194 (base32
5195 "1adkdx2zkk42g82nqf57lv1nc1z7kwl13jmy8vpcsizsa0xdnx9n"))))
5196 (build-system texlive-build-system)
5197 (arguments '(#:tex-directory "latex/tabulary"))
b8d8806b 5198 (home-page "https://www.ctan.org/pkg/tabulary")
c73d0e9d
RW		 5199 (synopsis "Tabular with variable width columns balanced")
5200 (description
5201 "The package defines a @code{tabular*}-like environment, @code{tabulary},
5202taking a \"total width\" argument as well as the column specifications. The
5203environment uses column types @code{L}, @code{C}, @code{R} and @code{J} for
5204variable width columns (@code{\\raggedright}, @code{\\centering},
5205@code{\\raggedleft}, and normally justified). In contrast to
5206@code{tabularx}'s @code{X} columns, the width of each column is weighted
5207according to the natural width of the widest cell in the column.")
5208 (license license:lppl)))
5209
e3088297
RW		 5210(define-public texlive-latex-threeparttable
5211 (package
5212 (name "texlive-latex-threeparttable")
5213 (version (number->string %texlive-revision))
5214 (source (origin
5215 (method svn-fetch)
5216 (uri (svn-reference
5217 (url (string-append "svn://www.tug.org/texlive/tags/"
5218 %texlive-tag "/Master/texmf-dist/"
5219 "/tex/latex/threeparttable"))
5220 (revision %texlive-revision)))
d57e5d41 5221 (file-name (string-append name "-" version "-checkout"))
e3088297
RW		 5222 (sha256
5223 (base32
5224 "10vy9k150w2lviw8h22s2mcykff38xci653m5823s2vv44pwbmzq"))))
5225 (build-system trivial-build-system)
5226 (arguments
5227 `(#:modules ((guix build utils))
5228 #:builder
5229 (begin
5230 (use-modules (guix build utils))
5231 (let ((target (string-append (assoc-ref %outputs "out")
5232 "/share/texmf-dist/tex/latex/threeparttable")))
5233 (mkdir-p target)
5234 (copy-recursively (assoc-ref %build-inputs "source") target)
5235 #t))))
b8d8806b 5236 (home-page "https://www.ctan.org/pkg/threeparttable")
e3088297
RW		 5237 (synopsis "Tables with captions and notes all the same width")
5238 (description
5239 "This package facilitates tables with titles (captions) and notes. The
5240title and notes are given a width equal to the body of the table (a
5241@code{tabular} environment). By itself, a @code{threeparttable} does not
5242float, but you can put it in a @code{table} or a @code{table*} or some other
5243environment.")
5244 (license (license:fsf-free "file://threeparttable.sty"))))
5245
0901f1b0 5246(define-public texlive-txfonts
1b10d494 5247 (package
0901f1b0
RW		 5248 (inherit (simple-texlive-package
5249 "texlive-txfonts"
5250 (list "/doc/fonts/txfonts/"
5251
5252 "/fonts/afm/public/txfonts/"
5253 "/fonts/tfm/public/txfonts/"
5254 "/fonts/type1/public/txfonts/"
5255 "/fonts/vf/public/txfonts/"
5256
5257 "/fonts/map/dvips/txfonts/"
5258 "/fonts/enc/dvips/txfonts/"
5259 "/tex/latex/txfonts/")
5260 (base32
5261 "017zjas5y1zlyq0iy4x6mv1qbz23xcy3y5xs0crj6zdnfvnccqgp")
5262 #:trivial? #t))
5263 (home-page "https://www.ctan.org/pkg/txfonts")
1b10d494
RW		 5264 (synopsis "Times-like fonts in support of mathematics")
5265 (description
5266 "Txfonts supplies virtual text roman fonts using Adobe Times (or URW
5267NimbusRomNo9L) with some modified and additional text symbols in the OT1, T1,
5268and TS1 encodings; maths alphabets using Times/URW Nimbus; maths fonts
5269providing all the symbols of the Computer Modern and AMS fonts, including all
5270the Greek capital letters from CMR; and additional maths fonts of various
5271other symbols.
5272
5273The set is complemented by a sans-serif set of text fonts, based on
5274Helvetica/NimbusSanL, and a monospace set.
5275
5276All the fonts are in Type 1 format (AFM and PFB files), and are supported by
5277TeX metrics (VF and TFM files) and macros for use with LaTeX.")
5278 ;; Any version of the GPL with font exception.
5279 (license license:gpl3+)))
5280
0901f1b0
RW		 5281(define-public texlive-fonts-txfonts
5282 (deprecated-package "texlive-fonts-txfonts" texlive-txfonts))
5283
f9e0fcb2
RW		 5284(define-public texlive-fonts-iwona
5285 (package
5286 (name "texlive-fonts-iwona")
5287 (version "0.995b")
5288 (source (origin
5289 (method url-fetch)
5290 (uri (string-append "http://jmn.pl/pliki/Iwona-tex-"
5291 (string-map (lambda (c)
5292 (if (char=? c #\.)
5293 #\_ c))
5294 version)
5295 ".zip"))
5296 (sha256
5297 (base32
5298 "13684iqx5granpc5rfvqnmyvdpgpbr1x9y7i7y7bcaq0qxv7ph1x"))))
5299 (build-system trivial-build-system)
5300 (arguments
5301 `(#:modules ((guix build utils))
5302 #:builder
5303 (begin
5304 (use-modules (guix build utils))
5305 (let ((target (string-append (assoc-ref %outputs "out")
5306 "/share/texmf-dist/"))
5307 (unzip (string-append (assoc-ref %build-inputs "unzip")
5308 "/bin/unzip")))
e3cfef22 5309 (invoke unzip (assoc-ref %build-inputs "source"))
f9e0fcb2 5310 (mkdir-p target)
e3cfef22
MW		 5311 (copy-recursively "iwona" target)
5312 #t))))
f9e0fcb2
RW		 5313 (native-inputs
5314 `(("unzip" ,unzip)))
5315 (home-page "http://jmn.pl/en/kurier-i-iwona/")
5316 (synopsis "Sans-serif typeface for TeX")
5317 (description "Iwona is a two-element sans-serif typeface. It was created
5318as an alternative version of the Kurier typeface, which was designed in 1975
5319for a diploma in typeface design at the Warsaw Academy of Fine Arts under the
5320supervision of Roman Tomaszewski. Kurier was designed for linotype
f1a46c90 5321typesetting of newspapers and similar periodicals. The Iwona fonts are an
f9e0fcb2
RW		 5322alternative version of the Kurier fonts. The difference lies in the absence
5323of ink traps which typify the Kurier font.")
5324 (license license:gfl1.0)))
5325
acc620d6
RW		 5326(define-public texlive-latex-titlesec
5327 (package
5328 (name "texlive-latex-titlesec")
5329 (version (number->string %texlive-revision))
5330 (source (origin
5331 (method svn-fetch)
5332 (uri (svn-reference
5333 (url (string-append "svn://www.tug.org/texlive/tags/"
5334 %texlive-tag "/Master/texmf-dist/"
5335 "/tex/latex/titlesec"))
5336 (revision %texlive-revision)))
0475e35c 5337 (file-name (string-append name "-" version "-checkout"))
acc620d6
RW		 5338 (sha256
5339 (base32
5340 "04nmkhqx6jxcxx9a30zbcd5smxi5fd0cbp132bki7fnvhspnhg21"))))
5341 (build-system trivial-build-system)
5342 (arguments
5343 `(#:modules ((guix build utils))
5344 #:builder
5345 (begin
5346 (use-modules (guix build utils))
5347 (let ((target (string-append (assoc-ref %outputs "out")
5348 "/share/texmf-dist/tex/latex/titlesec")))
5349 (mkdir-p target)
5350 (copy-recursively (assoc-ref %build-inputs "source") target)
5351 #t))))
b8d8806b 5352 (home-page "https://www.ctan.org/pkg/titlesec")
acc620d6
RW		 5353 (synopsis "Select alternative section titles")
5354 (description
5355 "This package provides an interface to sectioning commands for selection
5356from various title styles, e.g. for marginal titles and to change the font of
5357all headings with a single command, also providing simple one-step page
5358styles. It also includes a package to change the page styles when there are
5359floats in a page. You may assign headers/footers to individual floats, too.")
5360 (license license:lppl)))
5361
274e3d4f
RW		 5362(define-public texlive-latex-type1cm
5363 (package
5364 (name "texlive-latex-type1cm")
5365 (version (number->string %texlive-revision))
5366 (source (origin
5367 (method svn-fetch)
5368 (uri (texlive-ref "latex" "type1cm"))
5369 (file-name (string-append name "-" version "-checkout"))
5370 (sha256
5371 (base32
5372 "1lvxrqfwcwa4p31zyfm80gr05v8c28xybv5ri79zi2ngz6834z12"))))
5373 (build-system texlive-build-system)
5374 (arguments '(#:tex-directory "latex/type1cm"))
b8d8806b 5375 (home-page "https://www.ctan.org/pkg/type1cm")
274e3d4f
RW		 5376 (synopsis "Arbitrary size font selection in LaTeX")
5377 (description
5378 "LaTeX, by default, restricts the sizes at which you can use its default
5379computer modern fonts, to a fixed set of discrete sizes (effectively, a set
5380specified by Knuth). The @code{type1cm} package removes this restriction;
5381this is particularly useful when using scalable versions of the CM
5382fonts (Bakoma, or the versions from BSR/Y&Y, or True Type versions from Kinch,
5383PCTeX, etc.). In fact, since modern distributions will automatically generate
5384any bitmap font you might need, @code{type1cm} has wider application than just
36a17f05 5385those using scalable versions of the fonts. Note that the LaTeX distribution
274e3d4f
RW		 5386now contains a package @code{fix-cm},f which performs the task of
5387@code{type1cm}, as well as doing the same job for T1- and TS1-encoded
5388@code{ec} fonts.")
5389 (license license:lppl)))
5390
406af0d6
RW		 5391(define-public texlive-latex-lh
5392 (package
5393 (name "texlive-latex-lh")
5394 (version (number->string %texlive-revision))
5395 (source (origin
5396 (method svn-fetch)
5397 (uri (texlive-ref "latex" "lh"))
de20fd6a 5398 (file-name (string-append name "-" version "-checkout"))
406af0d6
RW		 5399 (sha256
5400 (base32
5401 "00gdiwh3sfhh1iimjhpja7lm7k4vzqzql2irgwnpz94qvh25zwi5"))))
5402 (build-system texlive-build-system)
5403 (arguments '(#:tex-directory "latex/lh"))
b8d8806b 5404 (home-page "https://www.ctan.org/pkg/lh")
406af0d6
RW		 5405 (synopsis "Cyrillic fonts that support LaTeX standard encodings")
5406 (description
5407 "The LH fonts address the problem of the wide variety of alphabets that
5408are written with Cyrillic-style characters. The fonts are the original basis
5409of the set of T2* and X2 encodings that are now used when LaTeX users need to
5410write in Cyrillic languages. Macro support in standard LaTeX encodings is
5411offered through the latex-cyrillic and t2 bundles, and the package itself
5412offers support for other (more traditional) encodings. The fonts, in the
5413standard T2* and X2 encodings are available in Adobe Type 1 format, in the
5414CM-Super family of fonts. The package also offers its own LaTeX support for
5415OT2 encoded fonts, CM bright shaped fonts and Concrete shaped fonts.")
5416 (license license:lppl)))
5417
44436def
RW		 5418(define-public texlive-metapost
5419 (package
5420 (name "texlive-metapost")
5421 (version (number->string %texlive-revision))
5422 (source (origin
5423 (method svn-fetch)
5424 (uri (svn-reference
5425 (url (string-append "svn://www.tug.org/texlive/tags/"
5426 %texlive-tag "/Master/texmf-dist/"
5427 "/metapost"))
5428 (revision %texlive-revision)))
b4bb2750 5429 (file-name (string-append name "-" version "-checkout"))
44436def
RW		 5430 (sha256
5431 (base32
85892948 5432 "1xyd57c8z1xi0kbqpbad61flcazz68i9ssxrag0gjvci3irxi8xh"))))
44436def
RW		 5433 (build-system trivial-build-system)
5434 (arguments
5435 `(#:modules ((guix build utils))
5436 #:builder
5437 (begin
5438 (use-modules (guix build utils))
5439 (let ((target (string-append (assoc-ref %outputs "out")
5440 "/share/texmf-dist/metapost")))
5441 (mkdir-p target)
5442 (copy-recursively (assoc-ref %build-inputs "source") target)
5443 #t))))
b8d8806b 5444 (home-page "https://www.ctan.org/pkg/metapost")
44436def
RW		 5445 (synopsis "Create scalable illustrations")
5446 (description
5447 "MetaPost uses a language based on that of Metafont to produce precise
5448technical illustrations. Its output is scalable PostScript or SVG, rather
5449than the bitmaps Metafont creates.")
5450 (license license:lppl)))
5451
9ff7161a
LC		 5452(define-public texlive-latex-acmart
5453 (package
5454 (name "texlive-latex-acmart")
ff281acc 5455 (version "1.60")
9ff7161a
LC		 5456 (source (origin
5457 (method svn-fetch)
5458 (uri (texlive-ref "latex" "acmart"))
5459 (sha256
5460 (base32
85892948 5461 "18rl67p2zhngskisnhv78mksv8q8q658l6igkswzswldixmkpphq"))
9ff7161a
LC		 5462 (file-name (string-append name "-" version "-checkout"))))
5463 (build-system texlive-build-system)
5464 (arguments '(#:tex-directory "latex/acmart"))
b8d8806b 5465 (home-page "https://www.ctan.org/pkg/acmart")
9ff7161a
LC		 5466 (synopsis "Class for typesetting publications of ACM")
5467 (description
5468 "This package provides a class for typesetting publications of the
5469Association for Computing Machinery (ACM).")
5470 (license license:lppl1.3+)))
5471
3966ebbb
RW		 5472(define-public texlive-latex-varwidth
5473 (package
5474 (name "texlive-latex-varwidth")
5475 (version (number->string %texlive-revision))
5476 (source (origin
5477 (method svn-fetch)
5478 (uri (svn-reference
5479 (url (string-append "svn://www.tug.org/texlive/tags/"
5480 %texlive-tag "/Master/texmf-dist/"
5481 "/tex/latex/varwidth"))
5482 (revision %texlive-revision)))
5483 (file-name (string-append name "-" version "-checkout"))
5484 (sha256
5485 (base32
5486 "1bmz9ap0ffyg7qry2xi7lki06qx4809w028xvk88cl66h7p46g52"))))
5487 (build-system trivial-build-system)
5488 (arguments
5489 `(#:modules ((guix build utils))
5490 #:builder
5491 (begin
5492 (use-modules (guix build utils))
5493 (let ((target (string-append (assoc-ref %outputs "out")
5494 "/share/texmf-dist/tex/latex/varwidth")))
5495 (mkdir-p target)
5496 (copy-recursively (assoc-ref %build-inputs "source") target)
5497 #t))))
b8d8806b 5498 (home-page "https://www.ctan.org/pkg/varwidth")
3966ebbb
RW		 5499 (synopsis "Variable-width minipage")
5500 (description
5501 "The @code{varwidth} environment is superficially similar to
5502@code{minipage}, but the specified width is just a maximum value — the box may
5503get a narrower “natural” width.")
5504 (license license:lppl)))
5505
cd2c77f4
RW		 5506(define-public texlive-latex-wasysym
5507 (package
5508 (name "texlive-latex-wasysym")
5509 (version (number->string %texlive-revision))
5510 (source (origin
5511 (method svn-fetch)
5512 (uri (texlive-ref "latex" "wasysym"))
2cc9c011 5513 (file-name (string-append name "-" version "-checkout"))
cd2c77f4
RW		 5514 (sha256
5515 (base32
5516 "1sgwbfwjjf70g54hh93gsd9jp9nm67w6n74x9d72a56n07jbk5hv"))))
5517 (build-system texlive-build-system)
5518 (arguments '(#:tex-directory "latex/wasysym"))
b8d8806b 5519 (home-page "https://www.ctan.org/pkg/wasysym")
cd2c77f4
RW		 5520 (synopsis "LaTeX support file to use the WASY2 fonts")
5521 (description
5522 "The wasy2WASY2 (Waldi Symbol) font by Roland Waldi provides many glyphs
5523like male and female symbols and astronomical symbols, as well as the complete
5524lasy font set and other odds and ends. The wasysym package implements an easy
5525to use interface for these symbols.")
5526 (license license:lppl)))
5527
63ed869b
RW		 5528(define-public texlive-latex-wrapfig
5529 (package
5530 (name "texlive-latex-wrapfig")
5531 (version (number->string %texlive-revision))
5532 (source (origin
5533 (method svn-fetch)
5534 (uri (svn-reference
5535 (url (string-append "svn://www.tug.org/texlive/tags/"
5536 %texlive-tag "/Master/texmf-dist/"
5537 "/tex/latex/wrapfig"))
5538 (revision %texlive-revision)))
5539 (file-name (string-append name "-" version "-checkout"))
5540 (sha256
5541 (base32
5542 "16xpyl0csmmwndz1xhzqfg9l0zcsnqxslsixsqkwd4zsvfj30sv4"))))
5543 (build-system trivial-build-system)
5544 (arguments
5545 `(#:modules ((guix build utils))
5546 #:builder
5547 (begin
5548 (use-modules (guix build utils))
5549 (let ((target (string-append (assoc-ref %outputs "out")
5550 "/share/texmf-dist/tex/latex/wrapfig")))
5551 (mkdir-p target)
5552 (copy-recursively (assoc-ref %build-inputs "source") target)
5553 #t))))
b8d8806b 5554 (home-page "https://www.ctan.org/pkg/wrapfig")
63ed869b
RW		 5555 (synopsis "Produces figures which text can flow around")
5556 (description
5557 "This package allows figures or tables to have text wrapped around them.
5558It does not work in combination with list environments, but can be used in a
5559@code{parbox} or @code{minipage}, and in two-column format.")
5560 (license license:lppl)))
5561
c178ffca
RW		 5562(define-public texlive-latex-ucs
5563 (package
5564 (name "texlive-latex-ucs")
5565 (version (number->string %texlive-revision))
5566 (source (origin
5567 (method svn-fetch)
5568 (uri (svn-reference
5569 (url (string-append "svn://www.tug.org/texlive/tags/"
5570 %texlive-tag "/Master/texmf-dist/"
5571 "/tex/latex/ucs"))
5572 (revision %texlive-revision)))
5573 (file-name (string-append name "-" version "-checkout"))
5574 (sha256
5575 (base32
5576 "0rrxwi60wmz5dfjifl4fwk66plf7wix85qnhfv4ylvmj6qi6hw37"))))
5577 (build-system trivial-build-system)
5578 (arguments
5579 `(#:modules ((guix build utils))
5580 #:builder
5581 (begin
5582 (use-modules (guix build utils))
5583 (let ((target (string-append (assoc-ref %outputs "out")
5584 "/share/texmf-dist/tex/latex/ucs")))
5585 (mkdir-p target)
5586 (copy-recursively (assoc-ref %build-inputs "source") target)
5587 #t))))
b8d8806b 5588 (home-page "https://www.ctan.org/pkg/ucs")
c178ffca
RW		 5589 (synopsis "Extended UTF-8 input encoding support for LaTeX")
5590 (description
5591 "The bundle provides the @code{ucs} package, and @code{utf8x.def},
5592together with a large number of support files. The @code{utf8x.def}
5593definition file for use with @code{inputenc} covers a wider range of Unicode
5594characters than does @code{utf8.def} in the LaTeX distribution. The package
5595provides facilities for efficient use of its large sets of Unicode characters.
5596Glyph production may be controlled by various options, which permits use of
5597non-ASCII characters when coding mathematical formulae. Note that the bundle
5598previously had an alias “unicode”; that alias has now been withdrawn, and no
5599package of that name now exists.")
5600 (license license:lppl1.3+)))
5601
86af0f2a
RW		 5602(define-public texlive-latex-preview
5603 (package
5604 (name "texlive-latex-preview")
5605 (version (number->string %texlive-revision))
5606 (source (origin
5607 (method svn-fetch)
5608 (uri (texlive-ref "latex" "preview"))
5609 (file-name (string-append name "-" version "-checkout"))
5610 (sha256
5611 (base32
d4d9a1ec 5612 "1hpsk4yp08qvbl43kqiv0hhwxv3gcqqxcpahyv6ch2b38pbj4bh6"))))
86af0f2a
RW		 5613 (build-system texlive-build-system)
5614 (arguments
5615 '(#:tex-directory "latex/preview"
5616 #:phases
5617 (modify-phases %standard-phases
5618 (add-after 'unpack 'remove-generated-file
5619 (lambda _
5620 (delete-file "preview.drv")
5621 #t)))))
b8d8806b 5622 (home-page "https://www.ctan.org/pkg/preview")
86af0f2a
RW		 5623 (synopsis "Extract bits of a LaTeX source for output")
5624 (description
5625 "The main purpose of the preview package is the extraction of selected
5626elements from a LaTeX source, like formulas or graphics, into separate
5627pages of a DVI file. A flexible and convenient interface allows it to
5628specify what commands and constructs should be extracted. This works
5629with DVI files postprocessed by either Dvips and Ghostscript or
5630dvipng, but it also works when you are using PDFTeX for generating PDF
5631files.")
5632 (license license:gpl3+)))
5633
87b4360e
RW		 5634(define-public texlive-latex-acronym
5635 (package
5636 (name "texlive-latex-acronym")
5637 (version (number->string %texlive-revision))
5638 (source (origin
5639 (method svn-fetch)
5640 (uri (texlive-ref "latex" "acronym"))
5641 (file-name (string-append name "-" version "-checkout"))
5642 (sha256
5643 (base32
5644 "0jmasg40bk53zdd2jc8nc18jvdai3p2wmamy7hwli8gls4nf25qp"))))
5645 (build-system texlive-build-system)
5646 (arguments '(#:tex-directory "latex/acronym"))
b8d8806b 5647 (home-page "https://www.ctan.org/pkg/acronym")
87b4360e
RW		 5648 (synopsis "Expand acronyms at least once")
5649 (description
5650 "This package ensures that all acronyms used in the text are spelled out
5651in full at least once. It also provides an environment to build a list of
5652acronyms used. The package is compatible with PDF bookmarks. The package
5653requires the suffix package, which in turn requires that it runs under
5654e-TeX.")
5655 (license license:lppl1.3+)))
5656
fedb80ee
RW		 5657(define-public texlive-generic-pdftex
5658 (package
5659 (name "texlive-generic-pdftex")
5660 (version (number->string %texlive-revision))
5661 (source (origin
5662 (method svn-fetch)
5663 (uri (svn-reference
5664 (url (string-append "svn://www.tug.org/texlive/tags/"
5665 %texlive-tag "/Master/texmf-dist/"
5666 "/tex/generic/pdftex"))
5667 (revision %texlive-revision)))
66e765a0 5668 (file-name (string-append name "-" version "-checkout"))
fedb80ee
RW		 5669 (sha256
5670 (base32
5671 "0k68zmqzs4qvrqxdwsrawbjb14hxqjfamq649azvai0jjxdpkljd"))))
5672 (build-system trivial-build-system)
5673 (arguments
5674 `(#:modules ((guix build utils))
5675 #:builder
5676 (begin
5677 (use-modules (guix build utils))
5678 (let ((target (string-append (assoc-ref %outputs "out")
7002a45d
PN		 5679 "/share/texmf-dist/tex/generic/pdftex"))
5680 (target-map (string-append (assoc-ref %outputs "out")
5681 "/share/texmf-dist/fonts/map/pdftex")))
fedb80ee
RW		 5682 (mkdir-p target)
5683 (copy-recursively (assoc-ref %build-inputs "source") target)
7002a45d
PN		 5684 (mkdir-p target-map)
5685 (copy-recursively (assoc-ref %build-inputs "pdftex-map") target-map)
fedb80ee 5686 #t))))
7002a45d
PN		 5687 (native-inputs
5688 `(("pdftex-map"
5689 ,(origin
5690 (method svn-fetch)
5691 (uri (svn-reference
5692 (url (string-append "svn://www.tug.org/texlive/tags/"
5693 %texlive-tag "/Master/texmf-dist/"
5694 "/fonts/map/pdftex"))
5695 (revision %texlive-revision)))
5696 (file-name (string-append name "-map-" version "-checkout"))
5697 (sha256
5698 (base32
85892948 5699 "03rfif2631pgd8g1ar4xblcdh078kky7fvw3kfsj5a47rxxgicp2"))))))
b8d8806b 5700 (home-page "https://www.ctan.org/pkg/pdftex")
fedb80ee
RW		 5701 (synopsis "TeX extension for direct creation of PDF")
5702 (description
5703 "This package provides an extension of TeX which can be configured to
5704directly generate PDF documents instead of DVI.")
5705 (license license:gpl2+)))
5706
8bcdc23f 5707(define texlive-texmf
0aa34e82
AE		 5708 (package
5709 (name "texlive-texmf")
85892948 5710 (version "20190410")
0aa34e82
AE		 5711 (source texlive-texmf-src)
5712 (build-system gnu-build-system)
5713 (inputs
5714 `(("texlive-bin" ,texlive-bin)
5715 ("lua" ,lua)
5716 ("perl" ,perl)
5717 ("python" ,python-2) ; incompatible with Python 3 (print syntax)
5718 ("ruby" ,ruby)
5719 ("tcsh" ,tcsh)))
5720 (arguments
5721 `(#:modules ((guix build gnu-build-system)
5722 (guix build utils)
5723 (srfi srfi-26))
a348af40
LC		 5724
5725 ;; This package takes 4 GiB, which we can't afford to distribute from
5726 ;; our servers.
5727 #:substitutable? #f
5728
0aa34e82 5729 #:phases
4a6635f3
AE		 5730 (modify-phases (map (cut assq <> %standard-phases)
5731 '(set-paths unpack patch-source-shebangs))
977403fe
RW		 5732 (add-after 'unpack 'unset-environment-variables
5733 (lambda _
5734 (unsetenv "TEXMF")
5735 (unsetenv "TEXMFCNF")
5736 #t))
4a6635f3
AE		 5737 (add-after 'patch-source-shebangs 'install
5738 (lambda* (#:key outputs #:allow-other-keys)
5739 (let ((share (string-append (assoc-ref outputs "out") "/share")))
5740 (mkdir-p share)
286eedec 5741 (invoke "mv" "texmf-dist" share))))
4a6635f3
AE		 5742 (add-after 'install 'texmf-config
5743 (lambda* (#:key inputs outputs #:allow-other-keys)
5744 (let* ((out (assoc-ref outputs "out"))
5745 (share (string-append out "/share"))
5746 (texmfroot (string-append share "/texmf-dist/web2c"))
5747 (texmfcnf (string-append texmfroot "/texmf.cnf"))
5748 (texlive-bin (assoc-ref inputs "texlive-bin"))
5749 (texbin (string-append texlive-bin "/bin"))
5750 (tlpkg (string-append texlive-bin "/share/tlpkg")))
5751 ;; Register SHARE as TEXMFROOT in texmf.cnf.
5752 (substitute* texmfcnf
5753 (("TEXMFROOT = \\$SELFAUTOPARENT")
2d634d9b
FB		 5754 (string-append "TEXMFROOT = " share))
5755 (("TEXMFLOCAL = \\$SELFAUTOGRANDPARENT/texmf-local")
5756 "TEXMFLOCAL = $SELFAUTODIR/share/texmf-local")
5757 (("!!\\$TEXMFLOCAL") "$TEXMFLOCAL"))
4a6635f3
AE		 5758 ;; Register paths in texmfcnf.lua, needed for context.
5759 (substitute* (string-append texmfroot "/texmfcnf.lua")
5760 (("selfautodir:") out)
5761 (("selfautoparent:") (string-append share "/")))
5762 ;; Set path to TeXLive Perl modules
5763 (setenv "PERL5LIB"
5764 (string-append (getenv "PERL5LIB") ":" tlpkg))
5765 ;; Configure the texmf-dist tree; inspired from
5766 ;; http://slackbuilds.org/repository/13.37/office/texlive/
5767 (setenv "PATH" (string-append (getenv "PATH") ":" texbin))
5768 (setenv "TEXMFCNF" texmfroot)
286eedec
MW		 5769 (invoke "updmap-sys" "--nohash" "--syncwithtrees")
5770 (invoke "mktexlsr")
0371132c 5771 (invoke "fmtutil-sys" "--all")))))))
7a15a68f 5772 (properties `((max-silent-time . 9600))) ; don't time out while grafting
0aa34e82 5773 (synopsis "TeX Live, a package of the TeX typesetting system")
eb0119ef
AE		 5774 (description
5775 "TeX Live provides a comprehensive TeX document production system.
5776It includes all the major TeX-related programs, macro packages, and fonts
5777that are free software, including support for many languages around the
0aa34e82
AE		 5778world.
5779
5780This package contains the complete tree of texmf-dist data.")
132e14b4
EF		 5781 (license (license:fsf-free "https://www.tug.org/texlive/copying.html"))
5782 (home-page "https://www.tug.org/texlive/")))
0aa34e82
AE		 5783
5784(define-public texlive
5785 (package
5786 (name "texlive")
85892948 5787 (version "20190410")
0aa34e82
AE		 5788 (source #f)
5789 (build-system trivial-build-system)
5790 (inputs `(("bash" ,bash) ; for wrap-program
5791 ("texlive-bin" ,texlive-bin)
5792 ("texlive-texmf" ,texlive-texmf)))
2d634d9b
FB		 5793 (native-search-paths
5794 (list (search-path-specification
5795 (variable "TEXMFLOCAL")
5796 (files '("share/texmf-local")))))
0aa34e82
AE		 5797 (arguments
5798 `(#:modules ((guix build utils))
5799 #:builder
5800 ;; Build the union of texlive-bin and texlive-texmf, but take the
5801 ;; conflicting subdirectory share/texmf-dist from texlive-texmf.
5802 (begin
5803 (use-modules (guix build utils))
5804 (let ((out (assoc-ref %outputs "out"))
5805 (bin (assoc-ref %build-inputs "texlive-bin"))
5806 (texmf (assoc-ref %build-inputs "texlive-texmf"))
5807 (bash (assoc-ref %build-inputs "bash")))
5808 (mkdir out)
5809 (with-directory-excursion out
5810 (for-each
5811 (lambda (name)
5812 (symlink (string-append bin "/" name) name))
5813 '("include" "lib"))
5814 (mkdir "bin")
5815 (with-directory-excursion "bin"
5816 (setenv "PATH" (string-append bash "/bin"))
5817 (for-each
5818 (lambda (name)
5819 (symlink name (basename name))
5820 (wrap-program
5821 (basename name)
5822 `("TEXMFCNF" =
5823 (,(string-append texmf "/share/texmf-dist/web2c")))))
5824 (find-files (string-append bin "/bin/") "")))
5825 (mkdir "share")
5826 (with-directory-excursion "share"
5827 (for-each
5828 (lambda (name)
5829 (symlink (string-append bin "/share/" name) name))
5830 '("info" "man" "tlpkg"))
5831 (for-each
5832 (lambda (name)
5833 (symlink (string-append texmf "/share/" name) name))
e3cfef22
MW		 5834 '("texmf-dist" "texmf-var"))))
5835 #t))))
0aa34e82
AE		 5836 (synopsis "TeX Live, a package of the TeX typesetting system")
5837 (description
5838 "TeX Live provides a comprehensive TeX document production system.
5839It includes all the major TeX-related programs, macro packages, and fonts
5840that are free software, including support for many languages around the
5841world.
5842
5843This package contains the complete TeX Live distribution.")
132e14b4
EF		 5844 (license (license:fsf-free "https://www.tug.org/texlive/copying.html"))
5845 (home-page "https://www.tug.org/texlive/")))
231eae53 5846
ebcf74da
RW		 5847(define-public perl-text-bibtex
5848 (package
5849 (name "perl-text-bibtex")
a2460e0f 5850 (version "0.85")
ebcf74da
RW		 5851 (source
5852 (origin
5853 (method url-fetch)
5854 (uri (string-append "mirror://cpan/authors/id/A/AM/AMBS/Text-BibTeX-"
5855 version ".tar.gz"))
5856 (sha256
5857 (base32
a2460e0f 5858 "036kxgbn1jf70pfm2lmjlzjwnhbkd888fp5lyvmkjpdd15gla18h"))))
ebcf74da
RW		 5859 (build-system perl-build-system)
5860 (arguments
5861 `(#:phases
5862 (modify-phases %standard-phases
5863 (add-after 'unpack 'add-output-directory-to-rpath
5864 (lambda* (#:key outputs #:allow-other-keys)
5865 (substitute* "inc/MyBuilder.pm"
5866 (("-Lbtparse" line)
5867 (string-append "-Wl,-rpath="
5868 (assoc-ref outputs "out") "/lib " line)))
5869 #t))
5870 (add-after 'unpack 'install-libraries-to-/lib
5871 (lambda* (#:key outputs #:allow-other-keys)
5872 (substitute* "Build.PL"
5873 (("lib64") "lib"))
5874 #t)))))
5875 (native-inputs
5876 `(("perl-capture-tiny" ,perl-capture-tiny)
5877 ("perl-config-autoconf" ,perl-config-autoconf)
5878 ("perl-extutils-libbuilder" ,perl-extutils-libbuilder)
5879 ("perl-module-build" ,perl-module-build)))
9aba9b12 5880 (home-page "https://metacpan.org/release/Text-BibTeX")
ebcf74da
RW		 5881 (synopsis "Interface to read and parse BibTeX files")
5882 (description "@code{Text::BibTeX} is a Perl library for reading, parsing,
5883and processing BibTeX files. @code{Text::BibTeX} gives you access to the data
5884at many different levels: you may work with BibTeX entries as simple field to
5885string mappings, or get at the original form of the data as a list of simple
5886values (strings, macros, or numbers) pasted together.")
2f3108ad 5887 (license license:perl-license)))
ebcf74da 5888
d4000680
RW		 5889(define-public biber
5890 (package
1335167a 5891 (name "biber")
41a01087 5892 (version "2.12")
d4000680 5893 (source (origin
41a01087
JL		 5894 (method git-fetch)
5895 (uri (git-reference
5896 (url "https://github.com/plk/biber/")
5897 (commit (string-append "v" version))))
5898 (file-name (git-file-name name version))
5899 ;; TODO: Patch awaiting inclusion upstream (see:
5900 ;; https://github.com/plk/biber/issues/239).
5901 (patches (search-patches "biber-fix-encoding-write.patch"))
d4000680
RW		 5902 (sha256
5903 (base32
41a01087 5904 "1g1hi6zvf2hmrjly1sidjaxy5440gfqm4p7p3n7kayshnjsmlskx"))))
d4000680
RW		 5905 (build-system perl-build-system)
5906 (arguments
5907 `(#:phases
5908 (modify-phases %standard-phases
5909 (add-after 'install 'wrap-programs
5910 (lambda* (#:key outputs #:allow-other-keys)
5911 (let* ((out (assoc-ref outputs "out"))
5912 (perl5lib (getenv "PERL5LIB")))
5913 (wrap-program (string-append out "/bin/biber")
5914 `("PERL5LIB" ":" prefix
5915 (,(string-append perl5lib ":" out
5916 "/lib/perl5/site_perl")))))
5917 #t)))))
5918 (inputs
5919 `(("perl-autovivification" ,perl-autovivification)
5920 ("perl-class-accessor" ,perl-class-accessor)
5921 ("perl-data-dump" ,perl-data-dump)
5922 ("perl-data-compare" ,perl-data-compare)
5923 ("perl-data-uniqid" ,perl-data-uniqid)
5924 ("perl-datetime-format-builder" ,perl-datetime-format-builder)
5925 ("perl-datetime-calendar-julian" ,perl-datetime-calendar-julian)
41a01087 5926 ("perl-file-slurper" ,perl-file-slurper)
d4000680
RW		 5927 ("perl-ipc-cmd" ,perl-ipc-cmd)
5928 ("perl-ipc-run3" ,perl-ipc-run3)
5929 ("perl-list-allutils" ,perl-list-allutils)
5930 ("perl-list-moreutils" ,perl-list-moreutils)
5931 ("perl-mozilla-ca" ,perl-mozilla-ca)
5932 ("perl-regexp-common" ,perl-regexp-common)
5933 ("perl-log-log4perl" ,perl-log-log4perl)
5934 ;; We cannot use perl-unicode-collate here, because otherwise the
5935 ;; hardcoded hashes in the tests would differ. See
5936 ;; https://mail-archive.com/debian-bugs-dist@lists.debian.org/msg1469249.html
5937 ;;("perl-unicode-collate" ,perl-unicode-collate)
5938 ("perl-unicode-normalize" ,perl-unicode-normalize)
5939 ("perl-unicode-linebreak" ,perl-unicode-linebreak)
5940 ("perl-encode-eucjpascii" ,perl-encode-eucjpascii)
5941 ("perl-encode-jis2k" ,perl-encode-jis2k)
5942 ("perl-encode-hanextra" ,perl-encode-hanextra)
5943 ("perl-xml-libxml" ,perl-xml-libxml)
5944 ("perl-xml-libxml-simple" ,perl-xml-libxml-simple)
5945 ("perl-xml-libxslt" ,perl-xml-libxslt)
5946 ("perl-xml-writer" ,perl-xml-writer)
5947 ("perl-sort-key" ,perl-sort-key)
5948 ("perl-text-csv" ,perl-text-csv)
5949 ("perl-text-csv-xs" ,perl-text-csv-xs)
5950 ("perl-text-roman" ,perl-text-roman)
5951 ("perl-uri" ,perl-uri)
5952 ("perl-text-bibtex" ,perl-text-bibtex)
5953 ("perl-libwww" ,perl-libwww)
5954 ("perl-lwp-protocol-https" ,perl-lwp-protocol-https)
5955 ("perl-business-isbn" ,perl-business-isbn)
5956 ("perl-business-issn" ,perl-business-issn)
5957 ("perl-business-ismn" ,perl-business-ismn)
5958 ("perl-lingua-translit" ,perl-lingua-translit)))
5959 (native-inputs
5960 `(("perl-config-autoconf" ,perl-config-autoconf)
5961 ("perl-extutils-libbuilder" ,perl-extutils-libbuilder)
5962 ("perl-module-build" ,perl-module-build)
5963 ;; for tests
5964 ("perl-file-which" ,perl-file-which)
5965 ("perl-test-more" ,perl-test-most) ; FIXME: "more" would be sufficient
5966 ("perl-test-differences" ,perl-test-differences)))
5967 (home-page "http://biblatex-biber.sourceforge.net/")
5968 (synopsis "Backend for the BibLaTeX citation management tool")
5969 (description "Biber is a BibTeX replacement for users of biblatex. Among
5970other things it comes with full Unicode support.")
5971 (license license:artistic2.0)))
5972
231eae53
LC		 5973(define-public rubber
5974 (package
5975 (name "rubber")
5976 (version "1.1")
5977 (source (origin
5978 (method url-fetch)
5979 (uri (list (string-append "https://launchpad.net/rubber/trunk/"
5980 version "/+download/rubber-"
5981 version ".tar.gz")
5982 (string-append "http://ebeffara.free.fr/pub/rubber-"
5983 version ".tar.gz")))
5984 (sha256
5985 (base32
5986 "1xbkv8ll889933gyi2a5hj7hhh216k04gn8fwz5lfv5iz8s34gbq"))))
5987 (build-system gnu-build-system)
5988 (arguments '(#:tests? #f)) ; no `check' target
5989 (inputs `(("texinfo" ,texinfo)
9bee5d6c 5990 ("python" ,python-2) ; incompatible with Python 3 (print syntax)
231eae53
LC		 5991 ("which" ,which)))
5992 (home-page "https://launchpad.net/rubber")
35b9e423 5993 (synopsis "Wrapper for LaTeX and friends")
231eae53
LC		 5994 (description
5995 "Rubber is a program whose purpose is to handle all tasks related to the
5996compilation of LaTeX documents. This includes compiling the document itself,
5997of course, enough times so that all references are defined, and running BibTeX
5998to manage bibliographic references. Automatic execution of dvips to produce
5999PostScript documents is also included, as well as usage of pdfLaTeX to produce
6000PDF documents.")
6001 (license license:gpl2+)))
4791876c
RJ		 6002
6003(define-public texmaker
6004 (package
6005 (name "texmaker")
585be42f 6006 (version "5.0.3")
4791876c
RJ		 6007 (source (origin
6008 (method url-fetch)
6009 (uri (string-append "http://www.xm1math.net/texmaker/texmaker-"
6010 version ".tar.bz2"))
6011 (sha256
6012 (base32
585be42f 6013 "0vrj9w5lk3vf6138n5bz8phmy3xp5kv4dq1rgirghcf4hbxdyx30"))))
4791876c
RJ		 6014 (build-system gnu-build-system)
6015 (arguments
6016 `(#:phases
6017 (modify-phases %standard-phases
6018 ;; Qt has its own configuration utility.
6019 (replace 'configure
6020 (lambda* (#:key outputs #:allow-other-keys)
6021 (let ((out (assoc-ref outputs "out")))
6c23ed9b
MW		 6022 (invoke "qmake"
6023 (string-append "PREFIX=" out)
c36d9725 6024 (string-append "DESKTOPDIR=" out "/share/applications")
6c23ed9b 6025 (string-append "ICONDIR=" out "/share/pixmaps")
c36d9725 6026 (string-append "METAINFODIR=" out "/share/metainfo")
6c23ed9b 6027 "texmaker.pro")))))))
4791876c
RJ		 6028 (inputs
6029 `(("poppler-qt5" ,poppler-qt5)
bd917486
TD		 6030 ("qtbase" ,qtbase)
6031 ("qtscript" ,qtscript)
6032 ("qtwebkit" ,qtwebkit)
4791876c
RJ		 6033 ("zlib" ,zlib)))
6034 (native-inputs
6035 `(("pkg-config" ,pkg-config)))
6036 (home-page "http://www.xm1math.net/texmaker/")
6037 (synopsis "LaTeX editor")
6038 (description "Texmaker is a program that integrates many tools needed to
6039develop documents with LaTeX, in a single application.")
6040 (license license:gpl2+)))
83457fe0 6041
83457fe0
JD		 6042(define-public teximpatient
6043 (package
6044 (name "teximpatient")
6045 (version "2.4")
6046 (source (origin
4f2ee8e2 6047 (method url-fetch/tarbomb)
83457fe0
JD		 6048 (uri (string-append "mirror://gnu/" name "/" name "-"
6049 version ".tar.gz"))
6050 (sha256
6051 (base32
6052 "0h56w22d99dh4fgld4ssik8ggnmhmrrbnrn1lnxi1zr0miphn1sd"))))
6053 (build-system gnu-build-system)
6054 (arguments
4f2ee8e2
RW		 6055 `(#:tests? #f ; there are none
6056 #:phases
83457fe0 6057 (modify-phases %standard-phases
4f2ee8e2
RW		 6058 (add-after 'unpack 'fix-packaging-error
6059 (lambda* (#:key inputs #:allow-other-keys)
6060 ;; This file should have been part of the tarball.
6061 (install-file (car
6062 (find-files
6063 (assoc-ref inputs "automake")
6064 "^install-sh$"))
6065 ".")
6066 ;; Remove generated file.
6067 (delete-file "book.pdf")
6068 #t)))))
83457fe0 6069 (native-inputs
f75aa97f 6070 `(("texlive" ,(texlive-union (list texlive-amsfonts
4f2ee8e2
RW		 6071 texlive-fonts-adobe-palatino
6072 texlive-fonts-adobe-zapfding
6073 texlive-fonts-knuth-lib
6074 texlive-fonts-mflogo-font
6075 texlive-generic-pdftex)))
83457fe0 6076 ("automake" ,automake)))
6fd52309 6077 (home-page "https://www.gnu.org/software/teximpatient/")
83457fe0
JD		 6078 (synopsis "Book on TeX, plain TeX and Eplain")
6079 (description "@i{TeX for the Impatient} is a ~350 page book on TeX,
6080plain TeX, and Eplain, originally written by Paul Abrahams, Kathryn Hargreaves,
6081and Karl Berry.")
6082 (license license:fdl1.3+)))
ec40a050
DM		 6083
6084(define-public lyx
6085 (package
6086 (name "lyx")
8c183d95 6087 (version "2.3.3")
ec40a050 6088 (source (origin
b17c8923 6089 (method url-fetch)
cb72994e 6090 (uri (string-append "https://ftp.lyx.org/pub/lyx/stable/"
e5a03489 6091 (version-major+minor version) ".x/"
3a4b8f44 6092 "lyx-" version ".tar.gz"))
b17c8923
RW		 6093 (sha256
6094 (base32
8c183d95 6095 "0j3xincwmsscfgv13g3z6h4kx1qfzgg8x71fs393akcdxsh2g07c"))
b17c8923
RW		 6096 (modules '((guix build utils)))
6097 (snippet
6098 '(begin
6099 (delete-file-recursively "3rdparty")
6100 #t))))
ec40a050
DM		 6101 (build-system cmake-build-system)
6102 (arguments
6103 `(#:configure-flags `("-DLYX_USE_QT=QT5"
6104 "-DLYX_EXTERNAL_BOOST=1"
6105 "-DLYX_INSTALL=1"
6106 "-DLYX_RELEASE=1"
6107 ,(string-append "-DLYX_INSTALL_PREFIX="
6108 (assoc-ref %outputs "out")
6109 ;; Exact name and level is necessary.
e5a03489 6110 "/lyx" ,(version-major+minor version)))
ec40a050
DM		 6111 #:phases
6112 (modify-phases %standard-phases
b17c8923
RW		 6113 ;; See ;; https://www.lyx.org/trac/changeset/3a123b90af838b08680471d87170c38e56787df9/lyxgit
6114 (add-after 'unpack 'fix-compilation-with-boost-1.69
6115 (lambda _
6116 (substitute* "src/support/FileName.cpp"
6117 (("^template struct boost::detail::crc_table_t.*") ""))
6118 #t))
ec40a050
DM		 6119 (add-after 'unpack 'patch-python
6120 (lambda* (#:key inputs #:allow-other-keys)
6121 (substitute* '("src/support/os.cpp")
b17c8923
RW		 6122 (("\"python ")
6123 (string-append "\""
6124 (assoc-ref inputs "python")
6125 "/bin/python ")))
ec40a050
DM		 6126 #t))
6127 (add-after 'patch-python 'patch-desktop-file
6128 (lambda* (#:key outputs #:allow-other-keys)
6129 (substitute* "lib/lyx.desktop.in"
b17c8923
RW		 6130 (("Exec=")
6131 (string-append "Exec="
6132 (assoc-ref outputs "out")
6133 "/")))
ec40a050
DM		 6134 #t))
6135 (add-before 'check 'setenv-check
6136 (lambda _
b17c8923
RW		 6137 ;; Create missing file that would cause tests to fail.
6138 (with-output-to-file (string-append "../lyx-"
6139 ,version
6140 "/src/tests/check_layout.cmake")
6141 (const #t))
e5a03489
EF		 6142 (setenv (string-append "LYX_DIR_"
6143 (string-join
6144 (string-split
6145 ,(version-major+minor version) #\-)) "x")
6146 (string-append (getcwd) "/../lyx-" ,version "/lib"))
ec40a050
DM		 6147 #t))
6148 (add-after 'install 'install-symlinks
6149 (lambda* (#:key outputs #:allow-other-keys)
6150 (let ((out (assoc-ref outputs "out")))
6151 (mkdir-p (string-append out "/bin"))
e5a03489
EF		 6152 (symlink (string-append "../lyx" ,(version-major+minor version)
6153 "/bin/lyx" ,(version-major+minor version))
6154 (string-append out "/bin/lyx" ,(version-major+minor version)))
ec40a050
DM		 6155 #t))))))
6156 (inputs
6157 `(("boost" ,boost)
b17c8923 6158 ("hunspell" ,hunspell) ; Note: Could also use aspell instead.
ec40a050 6159 ("libx11" ,libx11)
b17c8923 6160 ("mythes" ,mythes)
b3701ca1 6161 ("python" ,python)
ec40a050
DM		 6162 ("qtbase" ,qtbase)
6163 ("qtsvg" ,qtsvg)
6164 ("zlib" ,zlib)))
6165 (propagated-inputs
b17c8923 6166 `(("texlive" ,(texlive-union (list texlive-fonts-ec)))))
ec40a050 6167 (native-inputs
b3701ca1 6168 `(("python" ,python)
8c183d95 6169 ("pkg-config" ,pkg-config)))
8960b2e6 6170 (home-page "https://www.lyx.org/")
ec40a050
DM		 6171 (synopsis "Document preparation system with GUI")
6172 (description "LyX is a document preparation system. It excels at letting
6173you create complex technical and scientific articles with mathematics,
6174cross-references, bibliographies, indexes, etc. It is very good for working
6175with documents of any length in which the usual processing abilities are
6176required: automatic sectioning and pagination, spell checking and so forth.")
6177 (license license:gpl2+)))
7d50dff3
PN		 6178
6179(define-public texlive-latex-media9
6180 (package
6181 (name "texlive-latex-media9")
6182 (version (number->string %texlive-revision))
6183 (source (origin
6184 (method svn-fetch)
6185 (uri (svn-reference
6186 (url (string-append "svn://www.tug.org/texlive/tags/"
6187 %texlive-tag "/Master/texmf-dist/"
6188 "/tex/latex/media9"))
6189 (revision %texlive-revision)))
6190 (file-name (string-append name "-" version "-checkout"))
6191 (sha256
6192 (base32
85892948 6193 "0s86v2b6b1vky1svmmn8pn0l2gz3v280mvjbr2d9l2sjyarlgz9w"))))
7d50dff3
PN		 6194 (build-system trivial-build-system)
6195 (arguments
6196 `(#:modules ((guix build utils))
6197 #:builder
6198 (begin
6199 (use-modules (guix build utils))
6200 (let ((target (string-append (assoc-ref %outputs "out")
6201 "/share/texmf-dist/tex/latex/media9")))
6202 (mkdir-p target)
6203 (copy-recursively (assoc-ref %build-inputs "source") target)
6204 #t))))
6205 (home-page "https://www.ctan.org/pkg/media9")
6206 (synopsis "Multimedia inclusion package with Adobe Reader-9/X compatibility")
6207 (description
6208 "The package provides an interface to embed interactive Flash (SWF) and 3D
6209objects (Adobe U3D & PRC), as well as video and sound files or streams in the
6210popular MP4, FLV and MP3 formats into PDF documents with Acrobat-9/X
6211compatibility. Playback of multimedia files uses the built-in Flash Player of
6212Adobe Reader and does, therefore, not depend on external plug-ins. Flash Player
6213supports the efficient H.264 codec for video compression.
6214
6215The package is based on the RichMedia Annotation, an Adobe addition to the PDF
6216specification. It replaces the now obsolete @code{movie15} package.")
6217 (license license:lppl)))
288c8c97
PN		 6218
6219(define-public texlive-latex-ocgx2
6220 (package
6221 (name "texlive-latex-ocgx2")
6222 (version (number->string %texlive-revision))
6223 (source (origin
6224 (method svn-fetch)
6225 (uri (svn-reference
6226 (url (string-append "svn://www.tug.org/texlive/tags/"
6227 %texlive-tag "/Master/texmf-dist/"
6228 "/tex/latex/ocgx2"))
6229 (revision %texlive-revision)))
6230 (file-name (string-append name "-" version "-checkout"))
6231 (sha256
6232 (base32
85892948 6233 "1yhp51w8yr10c10pc9196q7hlw80brzqinnqbjw81d0sf2p0llc5"))))
288c8c97
PN		 6234 (build-system trivial-build-system)
6235 (arguments
6236 `(#:modules ((guix build utils))
6237 #:builder
6238 (begin
6239 (use-modules (guix build utils))
6240 (let ((target (string-append (assoc-ref %outputs "out")
6241 "/share/texmf-dist/tex/latex/ogcx2")))
6242 (mkdir-p target)
6243 (copy-recursively (assoc-ref %build-inputs "source") target)
6244 #t))))
6245 (home-page "https://www.ctan.org/pkg/ocgx2")
6246 (synopsis "Provide OCG (Optional Content Groups) support within a PDF document")
6247 (description
6248 "This package provides OCG (Optional Content Groups) support within a PDF
6249document.
6250
6251It re-implements the functionality of the @code{ocg}, @code{ocgx}, and
6252@code{ocg-p} packages and adds support for all known engines and back-ends
6253including:
6254
6255@itemize
6256@item LaTeX → dvips → @code{ps2pdf}/Distiller
6257@item (Xe)LaTeX(x) → @code{dvipdfmx}
6258@item pdfLaTeX and LuaLaTeX .
6259@end itemize
6260
6261It also ensures compatibility with the @code{media9} and @code{animate} packages.")
6262 (license license:lppl)))
b718793e
PN		 6263
6264(define-public texlive-latex-ms
6265 (package
6266 (name "texlive-latex-ms")
6267 (version (number->string %texlive-revision))
6268 (source (origin
6269 (method svn-fetch)
6270 (uri (texlive-ref "latex" "ms"))
6271 (file-name (string-append name "-" version "-checkout"))
6272 (sha256
6273 (base32
6274 "0m4wx3yjb5al1qsv995z8fii8xxy96mcfihbnlx43lpgayiwz35s"))))
6275 (build-system texlive-build-system)
6276 (arguments
6277 '(#:tex-directory "latex/ms"
6278 #:tex-format "latex"))
6279 (home-page "https://ctan.org/pkg/ms")
6280 (synopsis "Various LATEX packages by Martin Schröder")
6281 (description
6282 "A bundle of LATEX packages by Martin Schröder; the collection comprises:
6283
6284@itemize
6285@item @command{count1to}, make use of fixed TEX counters;
6286@item @command{everysel}, set commands to execute every time a font is selected;
6287@item @command{everyshi}, set commands to execute whenever a page is shipped out;
6288@item @command{multitoc}, typeset the table of contents in multiple columns;
6289@item @command{prelim2e}, mark typeset pages as preliminary; and
6290@item @command{ragged2e}, typeset ragged text and allow hyphenation.
6291@end itemize\n")
6292 (license license:lppl1.3c+)))
707babdd
PN		 6293
6294(define-public texlive-latex-needspace
6295 (package
6296 (name "texlive-latex-needspace")
6297 (version (number->string %texlive-revision))
6298 (source (origin
6299 (method svn-fetch)
6300 (uri (texlive-ref "latex" "needspace"))
6301 (file-name (string-append name "-" version "-checkout"))
6302 (sha256
6303 (base32
6304 "0kw80f5jh4gdpa2ka815abza3gr5z8b929w0745vrlc59pl0017y"))))
6305 (build-system texlive-build-system)
6306 (arguments
6307 '(#:tex-directory "latex/needspace"
6308 #:tex-format "latex"))
6309 (inputs
6310 `(("texlive-latex-filecontents" ,texlive-latex-filecontents)))
6311 (home-page "https://www.ctan.org/pkg/needspace")
6312 (synopsis "Insert pagebreak if not enough space")
6313 (description
6314 "Provides commands to disable pagebreaking within a given vertical
6315space. If there is not enough space between the command and the bottom of the
6316page, a new page will be started.")
6317 (license license:lppl)))
0e73c11b 6318
73635e3f
RW		 6319(define-public texlive-latex-changepage
6320 (package
6321 (name "texlive-latex-changepage")
6322 (version (number->string %texlive-revision))
6323 (source
6324 (origin
6325 (method svn-fetch)
6326 (uri (texlive-ref "latex" "changepage"))
e34a17e4 6327 (file-name (string-append name "-" version "-checkout"))
73635e3f
RW		 6328 (sha256
6329 (base32
6330 "1rpw8xg5p4jsyh236jma9dz3l29wjx4062f154b3wak5yjcxyxyb"))))
6331 (build-system texlive-build-system)
6332 (arguments
6333 '(#:tex-directory "latex/changepage"
6334 #:tex-format "latex"))
6335 (inputs
6336 `(("texlive-latex-filecontents" ,texlive-latex-filecontents)))
6337 (home-page "https://www.ctan.org/pkg/changepage")
6338 (synopsis "Margin adjustment and detection of odd/even pages")
6339 (description
6340 "The package provides commands to change the page layout in the middle of
6341a document, and to robustly check for typesetting on odd or even pages.
6342Instructions for use are at the end of the file. The package is an extraction
6343of code from the @code{memoir} class, whose user interface it shares.")
6344 (license license:lppl1.3+)))
6345
0e73c11b
PN		 6346(define-public texlive-latex-eukdate
6347 (package
6348 (name "texlive-latex-eukdate")
6349 (version (number->string %texlive-revision))
6350 (source
6351 (origin
6352 (method svn-fetch)
6353 (uri (svn-reference
6354 (url (string-append "svn://www.tug.org/texlive/tags/"
6355 %texlive-tag "/Master/texmf-dist/"
6356 "/tex/latex/eukdate"))
6357 (revision %texlive-revision)))
6358 (file-name (string-append name "-" version "-checkout"))
6359 (sha256
6360 (base32
6361 "18xan116l8w47v560bkw6nbhkrml7g04xrlzk3jrpc7qsyf3n5fz"))))
6362 (build-system trivial-build-system)
6363 (arguments
6364 `(#:modules ((guix build utils))
6365 #:builder
6366 (begin
6367 (use-modules (guix build utils))
6368 (let ((target (string-append (assoc-ref %outputs "out")
6369 "/share/texmf-dist/tex/latex/eukdate")))
6370 (mkdir-p target)
6371 (copy-recursively (assoc-ref %build-inputs "source") target)
6372 #t))))
6373 (home-page "https://www.ctan.org/pkg/eukdate")
6374 (synopsis "UK format dates, with weekday")
6375 (description
6376 "The package is used to change the format of @code{\\today}’s date,
6377including the weekday, e.g., \"Saturday, 26 June 2008\", the 'UK format', which
6378is preferred in many parts of the world, as distinct from that which is used in
6379@code{\\maketitle} of the article class, \"June 26, 2008\", the 'US format'.")
6380 (license license:lppl)))
910d67fb
PN		 6381
6382(define-public texlive-generic-ulem
6383 (package
6384 (name "texlive-generic-ulem")
6385 (version (number->string %texlive-revision))
6386 (source
6387 (origin
6388 (method svn-fetch)
6389 (uri (svn-reference
6390 (url (string-append "svn://www.tug.org/texlive/tags/"
6391 %texlive-tag "/Master/texmf-dist/"
6392 "/tex/generic/ulem"))
6393 (revision %texlive-revision)))
6394 (file-name (string-append name "-" version "-checkout"))
6395 (sha256
6396 (base32
6397 "1rzdniqq9zk39w8ch8ylx3ywh2mj87s4ivchrsk2b8nx06jyn797"))))
6398 (build-system trivial-build-system)
6399 (arguments
6400 `(#:modules ((guix build utils))
6401 #:builder
6402 (begin
6403 (use-modules (guix build utils))
6404 (let ((target (string-append (assoc-ref %outputs "out")
6405 "/share/texmf-dist/tex/generic/ulem")))
6406 (mkdir-p target)
6407 (copy-recursively (assoc-ref %build-inputs "source") target)
6408 #t))))
6409 (home-page "https://www.ctan.org/pkg/ulem")
6410 (synopsis "Underline text in TeX")
6411 (description
6412 "The package provides an @code{\\ul} (underline) command which will break
6413over line ends; this technique may be used to replace @code{\\em} (both in that
6414form and as the @code{\\emph} command), so as to make output look as if it comes
6415from a typewriter. The package also offers double and wavy underlining, and
6416striking out (line through words) and crossing out (/// over words).")
6417 (license license:lppl1.3c+)))
17ef5f1f
PN		 6418
6419(define-public texlive-latex-pgf
6420 (package
6421 (name "texlive-latex-pgf")
6422 (version (number->string %texlive-revision))
6423 (source
6424 (origin
6425 (method svn-fetch)
6426 (uri (svn-reference
6427 (url (string-append "svn://www.tug.org/texlive/tags/"
6428 %texlive-tag "/Master/texmf-dist/"
6429 "/tex/latex/pgf"))
6430 (revision %texlive-revision)))
6431 (file-name (string-append name "-" version "-checkout"))
6432 (sha256
6433 (base32
85892948 6434 "1dscrgwyr71vgx35mzb316xl669arzagfgq50fdv3nxga63959b3"))))
17ef5f1f
PN		 6435 (build-system trivial-build-system)
6436 (native-inputs
6437 `(("texlive-latex-pgf-generic"
6438 ,(origin
6439 (method svn-fetch)
6440 (uri (svn-reference
6441 (url (string-append "svn://www.tug.org/texlive/tags/"
6442 %texlive-tag "/Master/texmf-dist/"
6443 "/tex/generic/pgf"))
6444 (revision %texlive-revision)))
6445 (file-name (string-append "texlive-latex-pgf-generic" version "-checkout"))
6446 (sha256
6447 (base32
85892948 6448 "0hk5x2j15n4pps279cmkbjl1dvhasq3mbhna5xdvp2qgh635ahks"))))))
0fc71e4b
RW		 6449 (propagated-inputs
6450 `(("texlive-latex-xcolor" ,texlive-latex-xcolor)))
17ef5f1f
PN		 6451 (arguments
6452 `(#:modules ((guix build utils))
6453 #:builder
6454 (begin
6455 (use-modules (guix build utils))
6456 (let ((target-generic (string-append (assoc-ref %outputs "out")
6457 "/share/texmf-dist/tex/generic/pgf"))
6458 (target-latex (string-append (assoc-ref %outputs "out")
6459 "/share/texmf-dist/tex/latex/pgf")))
6460 (mkdir-p target-generic)
6461 (mkdir-p target-latex)
6462 (copy-recursively (assoc-ref %build-inputs "texlive-latex-pgf-generic") target-generic)
6463 (copy-recursively (assoc-ref %build-inputs "source") target-latex)
6464 #t))))
6465 (home-page "https://www.ctan.org/pkg/tikz")
6466 (synopsis "Create PostScript and PDF graphics in TeX")
6467 (description
6468 "PGF is a macro package for creating graphics. It is platform- and
6469format-independent and works together with the most important TeX backend
6470drivers, including pdfTeX and dvips. It comes with a user-friendly syntax layer
6471called TikZ.
6472
6473Its usage is similar to pstricks and the standard picture environment. PGF
6474works with plain (pdf-)TeX, (pdf-)LaTeX, and ConTeXt. Unlike pstricks, it can
6475produce either PostScript or PDF output.")
6476 (license license:lppl1.3c+)))
e7b2937d
PN		 6477
6478(define-public texlive-latex-koma-script
6479 (package
6480 (name "texlive-latex-koma-script")
6481 (version (number->string %texlive-revision))
6482 (source (origin
6483 (method svn-fetch)
6484 (uri (svn-reference
6485 (url (string-append "svn://www.tug.org/texlive/tags/"
6486 %texlive-tag "/Master/texmf-dist/"
6487 "/tex/latex/koma-script"))
6488 (revision %texlive-revision)))
6489 (file-name (string-append name "-" version "-checkout"))
6490 (sha256
6491 (base32
85892948 6492 "1vz9zg7s5w52xr323zgglzprfrvba2zvyzf6b8vrdf4wdghlpv4z"))))
e7b2937d
PN		 6493 (build-system trivial-build-system)
6494 (arguments
6495 `(#:modules ((guix build utils)
6496 (ice-9 match))
6497 #:builder
6498 (begin
6499 (use-modules (guix build utils)
6500 (ice-9 match))
6501 (let ((root (string-append (assoc-ref %outputs "out")
6502 "/share/texmf-dist/"))
6503 (pkgs '(("source" . "tex/latex/koma-script"))))
6504 (for-each (match-lambda
6505 ((pkg . dir)
6506 (let ((target (string-append root dir)))
6507 (mkdir-p target)
6508 (copy-recursively (assoc-ref %build-inputs pkg)
6509 target))))
6510 pkgs)
6511 #t))))
6512 (home-page "https://www.ctan.org/pkg/koma-script")
6513 (synopsis "Bundle of versatile classes and packages")
6514 (description
6515 "The KOMA-Script bundle provides replacements for the article, report, and
6516book classes with emphasis on typography and versatility. There is also a
6517letter class.
6518
6519The bundle also offers:
6520
6521@itemize
6522@item a package for calculating type areas in the way laid down by the
6523typographer Jan Tschichold,
6524@item packages for easily changing and defining page styles,
6525@item a package scrdate for getting not only the current date but also the name
6526of the day, and
6527@item a package scrtime for getting the current time.
6528@end itemize
6529
6530All these packages may be used not only with KOMA-Script classes but also with
6531the standard classes.
6532
6533Since every package has its own version number, the version number quoted only
6534refers to the version of scrbook, scrreprt, scrartcl, scrlttr2 and
6535typearea (which are the main parts of the bundle).")
6536 (license license:lppl1.3+)))
893fbf12
RW		 6537
6538(define-public texlive-generic-listofitems
6539 (package
6540 (name "texlive-generic-listofitems")
6541 (version (number->string %texlive-revision))
6542 (source (origin
6543 (method svn-fetch)
6544 (uri (svn-reference
6545 (url (string-append "svn://www.tug.org/texlive/tags/"
6546 %texlive-tag "/Master/texmf-dist/"
6547 "/tex/generic/listofitems"))
6548 (revision %texlive-revision)))
6549 (file-name (string-append name "-" version "-checkout"))
6550 (sha256
6551 (base32
85892948 6552 "1x4wnpca97rnbvvg6wjmbkxxvnfva274q9ahzx746b435q93z3i1"))))
893fbf12
RW		 6553 (build-system trivial-build-system)
6554 (arguments
6555 `(#:modules ((guix build utils))
6556 #:builder
6557 (begin
6558 (use-modules (guix build utils))
6559 (let ((target (string-append (assoc-ref %outputs "out")
6560 "/share/texmf-dist/tex/generic/listofitems")))
6561 (mkdir-p target)
6562 (copy-recursively (assoc-ref %build-inputs "source") target)
6563 #t))))
6564 (home-page "https://www.ctan.org/pkg/listofitems")
88868575 6565 (synopsis "Grab items in lists using user-specified separation character")
893fbf12
RW		 6566 (description
6567 "This package allows one to capture all the items of a list, for which
6568the parsing character has been selected by the user, and to access any of
6569these items with a simple syntax.")
6570 (license license:lppl1.3c+)))
1d0669f4
RW		 6571
6572(define-public texlive-latex-readarray
6573 (package
6574 (name "texlive-latex-readarray")
6575 (version (number->string %texlive-revision))
6576 (source (origin
6577 (method svn-fetch)
6578 (uri (svn-reference
6579 (url (string-append "svn://www.tug.org/texlive/tags/"
6580 %texlive-tag "/Master/texmf-dist/"
6581 "/tex/latex/readarray"))
6582 (revision %texlive-revision)))
6583 (file-name (string-append name "-" version "-checkout"))
6584 (sha256
6585 (base32
6586 "0c53k180ivn1n7fz3ngvd2w1i5dw3kxml0n64vhki88xsylz7lxp"))))
6587 (build-system trivial-build-system)
6588 (arguments
6589 `(#:modules ((guix build utils))
6590 #:builder
6591 (begin
6592 (use-modules (guix build utils))
6593 (let ((target (string-append (assoc-ref %outputs "out")
6594 "/share/texmf-dist/tex/latex/readarray")))
6595 (mkdir-p target)
6596 (copy-recursively (assoc-ref %build-inputs "source") target)
6597 #t))))
6598 (propagated-inputs
6599 `(("texlive-generic-listofitems" ,texlive-generic-listofitems)))
6600 (home-page "https://www.ctan.org/pkg/readarray")
6601 (synopsis "Read, store and recall array-formatted data")
6602 (description
6603 "This package allows the user to input formatted data into elements of a
66042-D or 3-D array and to recall that data at will by individual cell number.
6605The data can be but need not be numerical in nature. It can be, for example,
6606formatted text.")
6607 (license license:lppl1.3)))
f50f343e
RW		 6608
6609(define-public texlive-latex-verbatimbox
6610 (package
6611 (name "texlive-latex-verbatimbox")
6612 (version (number->string %texlive-revision))
6613 (source (origin
6614 (method svn-fetch)
6615 (uri (svn-reference
6616 (url (string-append "svn://www.tug.org/texlive/tags/"
6617 %texlive-tag "/Master/texmf-dist/"
6618 "/tex/latex/verbatimbox"))
6619 (revision %texlive-revision)))
6620 (file-name (string-append name "-" version "-checkout"))
6621 (sha256
6622 (base32
6623 "0qh1cgvfs463zsi2pjg490gj0mkjfdpfc381j10cbb5la304psna"))))
6624 (build-system trivial-build-system)
6625 (arguments
6626 `(#:modules ((guix build utils))
6627 #:builder
6628 (begin
6629 (use-modules (guix build utils))
6630 (let ((target (string-append (assoc-ref %outputs "out")
6631 "/share/texmf-dist/tex/latex/verbatimbox")))
6632 (mkdir-p target)
6633 (copy-recursively (assoc-ref %build-inputs "source") target)
6634 #t))))
6635 (propagated-inputs
6636 `(("texlive-latex-readarray" ,texlive-latex-readarray)))
6637 (home-page "https://www.ctan.org/pkg/verbatimbox")
6638 (synopsis "Deposit verbatim text in a box")
6639 (description
6640 "The package provides a @code{verbbox} environment to place its contents
6641into a globally available box, or into a box specified by the user. The
6642global box may then be used in a variety of situations (for example, providing
6643a replica of the @code{boxedverbatim} environment itself). A valuable use is
6644in places where the standard @code{verbatim} environment (which is based on a
6645@code{trivlist}) may not appear.")
6646 (license license:lppl1.3+)))
4348a059
RW		 6647
6648(define-public texlive-latex-examplep
6649 (package
6650 (name "texlive-latex-examplep")
6651 (version (number->string %texlive-revision))
6652 (source (origin
6653 (method svn-fetch)
6654 (uri (svn-reference
6655 (url (string-append "svn://www.tug.org/texlive/tags/"
6656 %texlive-tag "/Master/texmf-dist/"
6657 "/tex/latex/examplep"))
6658 (revision %texlive-revision)))
6659 (file-name (string-append name "-" version "-checkout"))
6660 (sha256
6661 (base32
6662 "0fsvvmz68ij0zwfzrny6x13d92grxr4ap59lxgah4smbkccd6s27"))))
6663 (build-system trivial-build-system)
6664 (arguments
6665 `(#:modules ((guix build utils))
6666 #:builder
6667 (begin
6668 (use-modules (guix build utils))
6669 (let ((target (string-append (assoc-ref %outputs "out")
6670 "/share/texmf-dist/tex/latex/examplep")))
6671 (mkdir-p target)
6672 (copy-recursively (assoc-ref %build-inputs "source") target)
6673 #t))))
6674 (home-page "https://www.ctan.org/pkg/examplep")
6675 (synopsis "Verbatim phrases and listings in LaTeX")
6676 (description
6677 "Examplep provides sophisticated features for typesetting verbatim source
6678code listings, including the display of the source code and its compiled LaTeX
6679or METAPOST output side-by-side, with automatic width detection and enabled
6680page breaks (in the source), without the need for specifying the source twice.
6681Special care is taken that section, page and footnote numbers do not interfere
6682with the main document. For typesetting short verbatim phrases, a replacement
6683for the @code{\\verb} command is also provided in the package, which can be
6684used inside tables and moving arguments such as footnotes and section
6685titles.")
6686 ;; No version of the GPL is specified.
6687 (license license:gpl3+)))
547ab650 6688
8bc9afeb
RW		 6689(define-public texlive-xypic
6690 (let ((template (simple-texlive-package
6691 "texlive-xypic"
6692 (list "/doc/generic/xypic/"
6693 "/dvips/xypic/xy389dict.pro"
6694 "/fonts/enc/dvips/xypic/"
6695 "/fonts/map/dvips/xypic/xypic.map"
6696
6697 "/fonts/source/public/xypic/"
6698 "/fonts/afm/public/xypic/"
6699 "/fonts/tfm/public/xypic/"
6700 "/fonts/type1/public/xypic/"
63d57404 6701 "/tex/generic/xypic/")
8bc9afeb 6702 (base32
63d57404
RW		 6703 "09b51bbm189xh7039h5n8nmab5nn2bybhh26qjn08763m80zdhjg")
6704 #:trivial? #t)))
8bc9afeb
RW		 6705 (package
6706 (inherit template)
6707 (arguments
6708 (substitute-keyword-arguments (package-arguments template)
8bc9afeb
RW		 6709 ((#:phases phases)
6710 `(modify-phases ,phases
6711 (delete 'reset-gzip-timestamps)))))
6712 (home-page "https://www.ctan.org/pkg/xypic")
6713 (synopsis "Flexible diagramming macros")
6714 (description "This is a package for typesetting a variety of graphs and
6715diagrams with TeX. Xy-pic works with most formats (including LaTeX,
6716AMS-LaTeX, AMS-TeX, and plain TeX). The distribution includes Michael Barr's
6717@code{diag} package, which was previously distributed stand-alone.")
6718 (license license:gpl3+))))
1d9ce461
PN		 6719
6720(define-public texlive-fonts-xypic
8bc9afeb
RW		 6721 (deprecated-package "texlive-fonts-xypic" texlive-xypic))
6722
6723(define-public texlive-generic-xypic
6724 (deprecated-package "texblive-generic-xypic" texlive-xypic))
31595689
PN		 6725
6726(define-public texlive-bibtex
6727 (package
6728 (name "texlive-bibtex")
6729 (version (number->string %texlive-revision))
6730 (source
6731 (origin
6732 (method svn-fetch)
6733 (uri (svn-reference
6734 (url (string-append "svn://www.tug.org/texlive/tags/"
6735 %texlive-tag "/Master/texmf-dist/"
6736 "/bibtex"))
6737 (revision %texlive-revision)))
6738 (file-name (string-append name "-" version "-checkout"))
6739 (sha256
6740 (base32
85892948 6741 "1wijqq605cbhn2bdaryby3xpkwmnk9ixcrjn5zwlfrxbgfblzfmz"))))
31595689
PN		 6742 (build-system trivial-build-system)
6743 (arguments
6744 `(#:modules ((guix build utils))
6745 #:builder
6746 (begin
6747 (use-modules (guix build utils))
6748 (let ((target (string-append (assoc-ref %outputs "out")
6749 "/share/texmf-dist/bibtex")))
6750 (mkdir-p target)
6751 (copy-recursively (assoc-ref %build-inputs "source") target)
6752 #t))))
6753 (home-page "https://www.ctan.org/pkg/bibtex")
6754 (synopsis "Process bibliographies for LaTeX")
6755 (description
6756 "BibTeX allows the user to store his citation data in generic form, while
6757printing citations in a document in the form specified by a BibTeX style, to
6758be specified in the document itself (one often needs a LaTeX citation-style
6759package, such as @command{natbib} as well).")
6760 (license license:knuth)))
744b883e 6761
1f50ae63 6762(define-public texlive-charter
744b883e 6763 (package
1f50ae63
RW		 6764 (inherit (simple-texlive-package
6765 "texlive-charter"
6766 (list "/doc/fonts/charter/readme.charter"
6767 "/fonts/afm/bitstrea/charter/"
6768 "/fonts/tfm/bitstrea/charter/"
6769 "/fonts/type1/bitstrea/charter/"
6770 "/fonts/vf/bitstrea/charter/")
6771 (base32
6772 "09l5ymgz48s3hyn776l01g3isk3dnhrj1vdavdw4qq4kfxxpqdn9")
6773 #:trivial? #t))
744b883e
PN		 6774 (home-page "https://www.ctan.org/pkg/charter")
6775 (synopsis "Charter fonts for TeX")
1f50ae63
RW		 6776 (description "This package provides a copy of the Charter Type-1 fonts
6777which Bitstream contributed to the X consortium, renamed for use with TeX.
6778Support for use with LaTeX is available in @code{freenfss}, part of
744b883e 6779@command{psnfss}. ")
1f50ae63
RW		 6780 (license (license:non-copyleft
6781 "http://mirrors.ctan.org/fonts/charter/readme.charter"))))
6782
6783(define-public texlive-fonts-charter
6784 (deprecated-package "texlive-fonts-charter" texlive-charter))
a5bfedb4
PN		 6785
6786(define-public texlive-context-base
6787 (package
6788 (name "texlive-context-base")
6789 (version (number->string %texlive-revision))
6790 (source (origin
6791 (method svn-fetch)
6792 (uri (svn-reference
6793 (url (string-append "svn://www.tug.org/texlive/tags/"
6794 %texlive-tag "/Master/texmf-dist/"
6795 "/tex/context/base"))
6796 (revision %texlive-revision)))
6797 (file-name (string-append name "-" version "-checkout"))
6798 (sha256
6799 (base32
85892948 6800 "0d7d74giz5knvj4rj6mbzd6c05mwg9jrxab86jxdqbc3jy7cl4kz"))))
a5bfedb4
PN		 6801 (build-system trivial-build-system)
6802 (arguments
6803 `(#:modules ((guix build utils))
6804 #:builder
6805 (begin
6806 (use-modules (guix build utils))
6807 (let ((target (string-append (assoc-ref %outputs "out")
6808 "/share/texmf-dist/tex/context/case")))
6809 (mkdir-p target)
6810 (copy-recursively (assoc-ref %build-inputs "source") target)
6811 #t))))
6812 (home-page "https://www.ctan.org/pkg/context")
6813 (synopsis "Full featured, parameter driven macro package for TeX")
6814 (description "A full featured, parameter driven macro package, which fully
6815supports advanced interactive documents. See the ConTeXt garden for a wealth
6816of support information.")
6817 (license license:gpl2+)))
63133706 6818
81ca4614 6819(define-public texlive-beamer
63133706 6820 (package
81ca4614
RW		 6821 (inherit (simple-texlive-package
6822 "texlive-beamer"
6823 (list "/doc/latex/beamer/"
6824 "/tex/latex/beamer/")
6825 (base32
85892948 6826 "1fqzbkmw2kfxihab8j4dadc3v68xap6v2ghpp2064fna47xlwy1c")
81ca4614 6827 #:trivial? #t))
63133706
RW		 6828 (propagated-inputs
6829 `(("texlive-latex-hyperref" ,texlive-latex-hyperref)
6830 ("texlive-latex-oberdiek" ,texlive-latex-oberdiek)
6831 ("texlive-latex-etoolbox" ,texlive-latex-etoolbox)
6832 ("texlive-latex-pgf" ,texlive-latex-pgf)))
63133706
RW		 6833 (home-page "https://www.ctan.org/pkg/beamer")
6834 (synopsis "LaTeX class for producing presentations and slides")
6835 (description "The beamer LaTeX class can be used for producing slides.
6836The class works in both PostScript and direct PDF output modes, using the
6837@code{pgf} graphics system for visual effects. Content is created in the
6838@code{frame} environment, and each frame can be made up of a number of slides
6839using a simple notation for specifying material to appear on each slide within
6840a frame. Short versions of title, authors, institute can also be specified as
6841optional parameters. Whole frame graphics are supported by plain frames. The
6842class supports @code{figure} and @code{table} environments, transparency
6843effects, varying slide transitions and animations.")
6844 ;; Code is dual licensed under GPLv2+ or LPPL1.3c+; documentation is
6845 ;; dual-licensed under either FDLv1.3+ or LPPL1.3c+.
6846 (license (list license:lppl1.3c+ license:gpl2+ license:fdl1.3+))))
cafd4d38 6847
81ca4614
RW		 6848(define-public texlive-latex-beamer
6849 (deprecated-package "texlive-latex-beamer" texlive-beamer))
6850
cafd4d38
RW		 6851(define-public texlive-latex-xmpincl
6852 (package
6853 (name "texlive-latex-xmpincl")
6854 (version (number->string %texlive-revision))
6855 (source
6856 (origin
6857 (method svn-fetch)
6858 (uri (texlive-ref "latex" "xmpincl"))
97656fc9 6859 (file-name (string-append name "-" version "-checkout"))
cafd4d38
RW		 6860 (sha256
6861 (base32
6862 "0lq3dfb4fsw955gjwllnk7cg00ciq5mva64mlpbva6g2jz117734"))))
6863 (build-system texlive-build-system)
6864 (arguments '(#:tex-directory "latex/xmpincl"))
6865 (home-page "http://www.ctan.org/pkg/xmpincl")
6866 (synopsis "Include eXtensible Metadata Platform data in pdfLaTeX")
6867 (description
6868 "The XMP (eXtensible Metadata platform) is a framework to add metadata to
6869digital material to enhance the workflow in publication. The essence is that
6870the metadata is stored in an XML file, and this XML stream is then embedded in
6871the file to which it applies.")
6872 (license license:gpl3+)))
f87dcb4d
RW		 6873
6874(define-public texlive-latex-pdfx
6875 (package
6876 (name "texlive-latex-pdfx")
6877 (version (number->string %texlive-revision))
6878 (source
6879 (origin
6880 (method svn-fetch)
6881 (uri (texlive-ref "latex" "pdfx"))
2ada1259 6882 (file-name (string-append name "-" version "-checkout"))
f87dcb4d
RW		 6883 (sha256
6884 (base32
85892948 6885 "18294h0cr05fs424m3x6aq24z5hf5zmiflalkj4kvpmsyyqqsj74"))))
f87dcb4d
RW		 6886 (build-system texlive-build-system)
6887 (arguments
6888 '(#:tex-directory "latex/pdfx"
6889 #:phases
6890 (modify-phases %standard-phases
6891 (add-after 'unpack 'fix-encoding
6892 (lambda _
6893 (substitute* "pdfx.dtx"
6894 ((" .+umaczy") "umaczy"))
6895 #t))
6896 (add-before 'install 'install-tex-files
6897 (lambda* (#:key inputs outputs #:allow-other-keys)
6898 (let ((target (string-append (assoc-ref outputs "out")
6899 "/share/texmf-dist/tex/latex/pdfx")))
6900 (mkdir-p target)
6901 (copy-recursively (assoc-ref inputs "texlive-tex-pdfx") target)
6902 ;; Install the generated version in the "install" phase.
6903 (delete-file (string-append target "/pdfx.sty"))
6904 #t))))))
6905 (propagated-inputs
6906 `(("texlive-generic-pdftex" ,texlive-generic-pdftex)))
6907 (native-inputs
6908 `(("texlive-tex-pdfx"
6909 ,(origin
6910 (method svn-fetch)
6911 (uri (svn-reference
6912 (url (string-append "svn://www.tug.org/texlive/tags/"
6913 %texlive-tag "/Master/texmf-dist/"
6914 "/tex/latex/pdfx"))
6915 (revision %texlive-revision)))
6916 (file-name (string-append "texlive-tex-latex-pdfx-" version "-checkout"))
6917 (sha256
6918 (base32
85892948 6919 "171ffvpkj2fab4ljcxv3l6l5c8ga8zavdhmhfq07id8zyyr619ip"))))))
f87dcb4d
RW		 6920 (home-page "https://www.ctan.org/pkg/pdfx")
6921 (synopsis "PDF/X and PDF/A support for pdfTeX, LuaTeX and XeTeX")
6922 (description
6923 "This package helps LaTeX users to create PDF/X, PFD/A and other
6924standards-compliant PDF documents with pdfTeX, LuaTeX and XeTeX.")
6925 (license license:lppl1.2+)))
73ce4421
RW		 6926
6927(define-public texlive-ydoc
6928 (let ((template (simple-texlive-package
6929 "texlive-ydoc"
6930 (list "/doc/latex/ydoc/"
6931 "/source/latex/ydoc/")
6932 (base32
6933 "0ckcpy1b8v1fk3qc8qkxgiag2wc0qzxm6bgksv000m4m1hsi2g8b")
6934 #:trivial? #f)))
6935 (package
6936 (inherit template)
6937 (outputs '("out" "doc"))
6938 (arguments
6939 (substitute-keyword-arguments (package-arguments template)
6940 ((#:tex-directory _ #t)
6941 "latex/ydoc")
6942 ((#:build-targets _ #t)
6943 ''("ydoc.dtx"))
6944 ((#:phases phases)
6945 `(modify-phases ,phases
6946 (add-after 'unpack 'chdir
6947 (lambda _ (chdir "source/latex/ydoc") #t))
6948 (add-after 'copy-files 'move-files
6949 (lambda* (#:key outputs #:allow-other-keys)
6950 (let* ((share (string-append (assoc-ref outputs "out")
6951 "/share/texmf-dist"))
6952 (target (string-append share "/tex/generic/ydoc"))
6953 (doc (string-append (assoc-ref outputs "doc")
6954 "/share/texmf-dist/doc") ))
6955 (mkdir-p target)
6956 (for-each
6957 (lambda (file)
6958 (rename-file (string-append share "/tex/latex/ydoc/" file)
6959 (string-append target "/" file)))
6960 '("ydocincl.tex" "ydocstrip.tex"))
6961 (mkdir-p doc)
6962 (rename-file (string-append share "/doc") doc)
6963 #t)))))))
6964 (home-page "http://www.ctan.org/pkg/ydoc")
6965 (synopsis "Macros for documentation of LaTeX classes and packages")
6966 (description "The package provides macros and environments to document
6967LaTeX packages and classes. It is an (as yet unfinished) alternative to the
6968@code{ltxdoc} class and the @code{doc} or @code{xdoc} packages. The aim is to
6969provide a different layout and more modern styles (using the @code{xcolor},
6970@code{hyperref} packages, etc.) This is an alpha release, and should probably
6971not (yet) be used with other packages, since the implementation might
6972change.")
6973 (license license:lppl1.3+))))
e5c08129
RW		 6974
6975(define-public texlive-pstricks
6976 (let ((template (simple-texlive-package
6977 "texlive-pstricks"
6978 (list "/doc/generic/pstricks/"
6979 "/dvips/pstricks/"
6980 "/tex/generic/pstricks/"
6981 "/tex/latex/pstricks/")
6982 (base32
85892948 6983 "0sdxdd0qi4sccw9il7d4s7jivs24pq99cdzfnrf0gkqjb1y8s7cl")
e5c08129
RW		 6984 #:trivial? #t)))
6985 (package
6986 (inherit template)
6987 (arguments
6988 (substitute-keyword-arguments (package-arguments template)
6989 ((#:phases phases)
6990 `(modify-phases ,phases
6991 (delete 'reset-gzip-timestamps)))))
6992 (home-page "http://www.ctan.org/pkg/pstricks")
6993 (synopsis "PostScript macros for TeX")
6994 (description "PSTricks offers an extensive collection of macros for
6995generating PostScript that is usable with most TeX macro formats, including
6996Plain TeX, LaTeX, AMS-TeX, and AMS-LaTeX. Included are macros for colour,
6997graphics, pie charts, rotation, trees and overlays. It has many special
6998features, including a wide variety of graphics (picture drawing) macros, with
6999a flexible interface and with colour support. There are macros for colouring
7000or shading the cells of tables.")
7001 (license license:lppl1.3+))))
a72d343a
RW		 7002
7003(define-public texlive-pst-text
7004 (let ((template (simple-texlive-package
7005 "texlive-pst-text"
7006 (list "/doc/generic/pst-text/"
a72d343a
RW		 7007 "/dvips/pst-text/pst-text.pro"
7008 "/tex/generic/pst-text/"
7009 "/tex/latex/pst-text/")
7010 (base32
85892948 7011 "146fpzd1xlqi94q5r48z8ni8qww713yh6nwkbr9pw27mjrqdadb9")
a72d343a
RW		 7012 #:trivial? #t)))
7013 (package
7014 (inherit template)
7015 (propagated-inputs
7016 `(("texlive-pstricks" ,texlive-pstricks)))
7017 (home-page "http://www.ctan.org/pkg/pst-text")
7018 (synopsis "Text and character manipulation in PSTricks")
7019 (description "Pst-text is a PSTricks based package for plotting text along
7020a different path and manipulating characters. It includes the functionality
7021of the old package @code{pst-char}.")
7022 (license license:lppl))))
51bf1c51
RW		 7023
7024(define-public texlive-iftex
7025 (let ((template (simple-texlive-package
7026 "texlive-iftex"
7027 (list "/doc/generic/iftex/"
7028 "/tex/generic/iftex/iftex.sty")
7029 (base32
7030 "089zvw31gby150n1k0zdk2c0q97pgbqs46phxydaqil64b55nnl7")
7031 #:trivial? #t)))
7032 (package
7033 (inherit template)
7034 (home-page "http://www.ctan.org/pkg/iftex")
7035 (synopsis "Determine the currently used TeX engine")
7036 (description "This package, which works both for Plain TeX and for
7037LaTeX, defines the @code{\\ifPDFTeX}, @code{\\ifXeTeX}, and @code{\\ifLuaTeX}
7038conditionals for testing which engine is being used for typesetting. The
7039package also provides the @code{\\RequirePDFTeX}, @code{\\RequireXeTeX}, and
7040@code{\\RequireLuaTeX} commands which throw an error if pdfTeX, XeTeX or
7041LuaTeX (respectively) is not the engine in use.")
7042 (license license:lppl1.3+))))
99b14365
RW		 7043
7044(define-public texlive-tools
7045 (let ((template (simple-texlive-package
7046 "texlive-tools"
7047 (list "/doc/latex/tools/"
7048 "/source/latex/tools/")
7049 (base32
85892948 7050 "1ivhij7171wvrgcjn4wah84wxwpd21d0chh3zxab4pj067c8d0mh"))))
99b14365
RW		 7051 (package
7052 (inherit template)
7053 (arguments
7054 (substitute-keyword-arguments (package-arguments template)
7055 ((#:tex-directory _ '())
7056 "latex/tools")
7057 ((#:build-targets _ '())
7058 ''("tools.ins"))
7059 ((#:phases phases)
7060 `(modify-phases ,phases
7061 (add-after 'unpack 'chdir
7062 (lambda _ (chdir "source/latex/tools") #t))))))
7063 (home-page "https://www.ctan.org/tex-archive/macros/latex/required/tools/")
7064 (synopsis "LaTeX standard tools bundle")
7065 (description "This package provides a collection of simple tools that
7066are part of the LaTeX required tools distribution, comprising the packages:
7067@code{afterpage}, @code{array}, @code{bm}, @code{calc}, @code{dcolumn},
7068@code{delarray}, @code{enumerate}, @code{fileerr}, @code{fontsmpl},
7069@code{ftnright}, @code{hhline}, @code{indentfirst}, @code{layout},
7070@code{longtable}, @code{multicol}, @code{rawfonts}, @code{showkeys},
7071@code{somedefs}, @code{tabularx}, @code{theorem}, @code{trace},
7072@code{varioref}, @code{verbatim}, @code{xr}, and @code{xspace}.")
7073 (license license:lppl1.3+))))
f16e0948
RW		 7074
7075(define-public texlive-latex-xkeyval
7076 (package
7077 (name "texlive-latex-xkeyval")
7078 (version (number->string %texlive-revision))
7079 (source (origin
7080 (method svn-fetch)
7081 (uri (texlive-ref "latex" "xkeyval"))
04f46e5d 7082 (file-name (string-append name "-" version "-checkout"))
f16e0948
RW		 7083 (sha256
7084 (base32
7085 "0wancavix39j240pd8m9cgmwsijwx6jd6n54v8wg0x2rk5m44myp"))))
7086 (build-system texlive-build-system)
7087 (arguments
7088 '(#:tex-directory "latex/xkeyval"
7089 #:build-targets '("xkeyval.dtx")
7090 #:tex-format "latex" ; won't build with luatex
7091 #:phases
7092 (modify-phases %standard-phases
7093 ;; This package cannot be built out of tree as it expects to find
7094 ;; built files in the working directory.
7095 (add-before 'build 'fix-build
7096 (lambda _
7097 (setenv "TEXINPUTS"
7098 (string-append (getcwd) "/build:"))
7099 (substitute* "xkeyval.dtx"
7100 (("usepackage\\{xcolor\\}")
7101 "usepackage[dvips]{xcolor}"))
7102 #t))
7103 ;; FIXME: We don't have a package for this font yet.
7104 (add-after 'unpack 'remove-dependency-on-fourier
7105 (lambda _
7106 (substitute* "xkeyval.dtx"
7107 (("\\\\usepackage\\{fourier\\}") ""))
7108 #t))
7109 (add-after 'install 'move-files
7110 (lambda* (#:key outputs #:allow-other-keys)
7111 (let* ((out (assoc-ref outputs "out"))
7112 (share (string-append out "/share/texmf-dist"))
7113 (source (string-append share "/tex/latex/xkeyval/"))
7114 (target (string-append share "/tex/generic/xkeyval/")))
7115 (mkdir-p target)
7116 (for-each (lambda (file)
7117 (rename-file (string-append source file)
7118 (string-append target file)))
7119 '("keyval.tex"
7120 "pst-xkey.tex"
7121 "xkeyval.tex"
7122 "xkvex1.tex"
7123 "xkvex2.tex"
7124 "xkvex3.tex"
7125 "xkvex4.tex"
7126 "xkvtxhdr.tex"
7127 "xkvutils.tex"))
7128 #t))))))
7129 (native-inputs
7130 `(("texlive-latex-base" ,texlive-latex-base)
7131 ("texlive-cm" ,texlive-cm)
7132 ("texlive-lm" ,texlive-lm)
7133 ("texlive-url" ,texlive-url)
7134 ("texlive-graphics-def" ,texlive-graphics-def)
7135 ("texlive-xcolor" ,texlive-xcolor)
7136 ("texlive-latex-footmisc" ,texlive-latex-footmisc)
7137 ("texlive-latex-listings" ,texlive-latex-listings)
7138 ("texlive-iftex" ,texlive-iftex)
7139 ("texlive-pstricks" ,texlive-pstricks)
7140 ("texlive-pst-text" ,texlive-pst-text)
7141 ("texlive-tools" ,texlive-tools)
7142 ("texlive-latex-pgf" ,texlive-latex-pgf)))
7143 (home-page "http://www.ctan.org/pkg/xkeyval")
7144 (synopsis "Extension of the keyval package")
7145 (description
7146 "This package is an extension of the keyval package and offers additional
7147macros for setting keys and declaring and setting class or package options.
7148The package allows the programmer to specify a prefix to the name of the
7149macros it defines for keys, and to define families of key definitions; these
7150all help use in documents where several packages define their own sets of
7151keys.")
7152 (license license:lppl1.3+)))
11ecf9f4
RW		 7153
7154(define-public texlive-standalone
7155 (package
7156 (name "texlive-standalone")
7157 (version (number->string %texlive-revision))
7158 (source
7159 (origin
7160 (method svn-fetch)
7161 (uri (texlive-ref "latex" "standalone"))
4c08aa57 7162 (file-name (string-append name "-" version "-checkout"))
11ecf9f4
RW		 7163 (sha256
7164 (base32
7165 "192ydxcn8ir96q8qwvnppksmqf5i0p50i0wz6iqazbwmh3dqxpx4"))))
7166 (build-system texlive-build-system)
7167 (arguments '(#:tex-directory "latex/standalone"))
7168 (propagated-inputs
7169 `(("texlive-latex-xkeyval" ,texlive-latex-xkeyval)))
7170 (native-inputs
7171 `(("texlive-ydoc" ,texlive-ydoc)))
7172 (home-page "http://www.ctan.org/pkg/standalone")
7173 (synopsis "Compile TeX pictures stand-alone or as part of a document")
7174 (description "A class and package is provided which allows TeX pictures or
7175other TeX code to be compiled standalone or as part of a main document.
7176Special support for pictures with beamer overlays is also provided. The
7177package is used in the main document and skips extra preambles in sub-files.
7178The class may be used to simplify the preamble in sub-files. By default the
7179@code{preview} package is used to display the typeset code without margins.
7180The behaviour in standalone mode may adjusted using a configuration file
7181@code{standalone.cfg} to redefine the standalone environment.")
7182 (license license:lppl1.3+)))
69f0c8cf
RW		 7183
7184(define-public texlive-siunitx
7185 (package
7186 (name "texlive-siunitx")
7187 (version (number->string %texlive-revision))
7188 (source (texlive-origin
7189 name version
7190 (list "/source/latex/siunitx/siunitx.dtx"
7191 "/doc/latex/siunitx/README.md")
7192 (base32
85892948 7193 "11kf6znkgw7y5qmw75qk6px6pqf57bwr53q0673zaiyq20lif96c")))
69f0c8cf
RW		 7194 (build-system texlive-build-system)
7195 (arguments
7196 '(#:tex-directory "latex/siunitx"
7197 #:build-targets '("siunitx.dtx")
7198 #:phases
7199 (modify-phases %standard-phases
7200 (add-after 'unpack 'chdir
7201 (lambda _ (chdir "source/latex/siunitx") #t)))))
7202 (propagated-inputs
7203 `(("texlive-latex-l3kernel" ,texlive-latex-l3kernel)
7204 ("texlive-latex-l3packages" ,texlive-latex-l3packages)))
7205 (home-page "http://www.ctan.org/pkg/siunitx")
7206 (synopsis "Comprehensive SI units package")
7207 (description
7208 "Typesetting values with units requires care to ensure that the combined
7209mathematical meaning of the value plus unit combination is clear. In
7210particular, the SI units system lays down a consistent set of units with rules
7211on how they are to be used. However, different countries and publishers have
7212differing conventions on the exact appearance of numbers (and units). A
7213number of LaTeX packages have been developed to provide consistent application
7214of the various rules. The @code{siunitx} package takes the best from the
7215existing packages, and adds new features and a consistent interface. A number
7216of new ideas have been incorporated, to fill gaps in the existing provision.
7217The package also provides backward-compatibility with @code{SIunits},
7218@code{sistyle}, @code{unitsdef} and @code{units}. The aim is to have one
7219package to handle all of the possible unit-related needs of LaTeX users.")
7220 (license license:lppl1.3c)))
66d21335
RW		 7221
7222(define-public texlive-booktabs
7223 (package
7224 (name "texlive-booktabs")
7225 (version (number->string %texlive-revision))
7226 (source
7227 (origin
7228 (method svn-fetch)
7229 (uri (texlive-ref "latex" "booktabs"))
dc08ede8 7230 (file-name (string-append name "-" version "-checkout"))
66d21335
RW		 7231 (sha256
7232 (base32
7233 "1dqid48vgh25wmw8xzmx6x3pfgz1y9f0r8aza1yxq2mjny5yf68x"))))
7234 (build-system texlive-build-system)
7235 (arguments '(#:tex-directory "latex/booktabs"))
7236 (home-page "http://www.ctan.org/pkg/booktabs")
7237 (synopsis "Publication quality tables in LaTeX")
7238 (description
7239 "This package enhances the quality of tables in LaTeX, providing extra
7240commands as well as behind-the-scenes optimisation. Guidelines are given as
7241to what constitutes a good table in this context. The package offers
7242@code{longtable} compatibility.")
7243 (license license:lppl1.3+)))
jackhill's copy of GNU Guix: https://guix.gnu.org/