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