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