gnu: Add texlive-latex-verbatimbox.
[jackhill/guix/guix.git] / gnu / packages / tex.scm
1 ;;; GNU Guix --- Functional package management for GNU
2 ;;; Copyright © 2013, 2014, 2015, 2016 Andreas Enge <andreas@enge.fr>
3 ;;; Copyright © 2014 Eric Bavier <bavier@member.fsf.org>
4 ;;; Copyright © 2015 Mark H Weaver <mhw@netris.org>
5 ;;; Copyright © 2016 Roel Janssen <roel@gnu.org>
6 ;;; Copyright © 2016, 2018 Efraim Flashner <efraim@flashner.co.il>
7 ;;; Copyright © 2016 Federico Beffa <beffa@fbengineering.ch>
8 ;;; Copyright © 2016 Thomas Danckaert <post@thomasdanckaert.be>
9 ;;; Copyright © 2016, 2017, 2018 Ricardo Wurmus <rekado@elephly.net>
10 ;;; Copyright © 2017 Leo Famulari <leo@famulari.name>
11 ;;; Copyright © 2017 Marius Bakke <mbakke@fastmail.com>
12 ;;; Copyright © 2017, 2018 Tobias Geerinckx-Rice <me@tobias.gr>
13 ;;; Copyright © 2018 Danny Milosavljevic <dannym+a@scratchpost.org>
14 ;;; Copyright © 2018 Arun Isaac <arunisaac@systemreboot.net>
15 ;;;
16 ;;; This file is part of GNU Guix.
17 ;;;
18 ;;; GNU Guix is free software; you can redistribute it and/or modify it
19 ;;; under the terms of the GNU General Public License as published by
20 ;;; the Free Software Foundation; either version 3 of the License, or (at
21 ;;; your option) any later version.
22 ;;;
23 ;;; GNU Guix is distributed in the hope that it will be useful, but
24 ;;; WITHOUT ANY WARRANTY; without even the implied warranty of
25 ;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
26 ;;; GNU General Public License for more details.
27 ;;;
28 ;;; You should have received a copy of the GNU General Public License
29 ;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
30
31 (define-module (gnu packages tex)
32 #:use-module ((guix licenses) #:prefix license:)
33 #:use-module (guix packages)
34 #:use-module (guix download)
35 #:use-module (guix build-system cmake)
36 #:use-module (guix build-system gnu)
37 #:use-module (guix build-system perl)
38 #:use-module (guix build-system trivial)
39 #:use-module (guix build-system texlive)
40 #:use-module (guix utils)
41 #:use-module (guix git-download)
42 #:use-module (guix svn-download)
43 #:use-module (gnu packages)
44 #:use-module (gnu packages algebra)
45 #:use-module (gnu packages autotools)
46 #:use-module (gnu packages bash)
47 #:use-module (gnu packages boost)
48 #:use-module (gnu packages compression)
49 #:use-module (gnu packages fontutils)
50 #:use-module (gnu packages gd)
51 #:use-module (gnu packages ghostscript)
52 #:use-module (gnu packages gtk)
53 #:use-module (gnu packages icu4c)
54 #:use-module (gnu packages image)
55 #:use-module (gnu packages libreoffice)
56 #:use-module (gnu packages lua)
57 #:use-module (gnu packages multiprecision)
58 #:use-module (gnu packages pdf)
59 #:use-module (gnu packages perl)
60 #:use-module (gnu packages perl-check)
61 #:use-module (gnu packages pkg-config)
62 #:use-module (gnu packages python)
63 #:use-module (gnu packages qt)
64 #:use-module (gnu packages ruby)
65 #:use-module (gnu packages shells)
66 #:use-module (gnu packages base)
67 #:use-module (gnu packages web)
68 #:use-module (gnu packages xml)
69 #:use-module (gnu packages xorg)
70 #:use-module (gnu packages xdisorg)
71 #:autoload (gnu packages texinfo) (texinfo)
72 #:use-module (ice-9 ftw)
73 #:use-module (ice-9 match)
74 #:use-module ((srfi srfi-1) #:hide (zip)))
75
76 (define texlive-extra-src
77 (origin
78 (method url-fetch)
79 (uri "ftp://tug.org/historic/systems/texlive/2017/texlive-20170524-extra.tar.xz")
80 (sha256 (base32
81 "0zvd2zskk78ig114mfj24g15qys41hzqv59fmqpirdbgq9c9gr5g"))))
82
83 (define texlive-texmf-src
84 (origin
85 (method url-fetch)
86 (uri "ftp://tug.org/historic/systems/texlive/2017/texlive-20170524-texmf.tar.xz")
87 (sha256 (base32
88 "1v69y3kgkbk24f7s4dfkknwd317mqmck5jgpyb35wqgqfy5p0qrz"))))
89
90 (define-public texlive-bin
91 (package
92 (name "texlive-bin")
93 (version "20170524")
94 (source
95 (origin
96 (method url-fetch)
97 (uri (string-append "ftp://tug.org/historic/systems/texlive/2017/"
98 "texlive-" version "-source.tar.xz"))
99 (patches
100 (list
101 ;; This is required for compatibility with Poppler >= 0.58.
102 ;; See <http://tutex.tug.org/pipermail/tex-k/2017-September/002809.html>
103 ;; and <https://bugs.archlinux.org/task/55720> for some discussion.
104 (origin
105 (method url-fetch)
106 (uri (string-append "https://git.archlinux.org/svntogit/packages.git/plain"
107 "/trunk/texlive-poppler-0.59.patch?h=packages/texlive-bin"
108 "&id=ba2de374e2b21ecc4b85cc9777f2f15c4d356c61"))
109 (file-name "texlive-poppler-compat.patch")
110 (sha256
111 (base32
112 "1c4ikq4kxw48bi3i33bzpabrjvbk01fwjr2lz20gkc9kv8l0bg3n")))))
113 (sha256 (base32
114 "1amjrxyasplv4alfwcxwnw4nrx7dz2ydmddkq16k6hg90i9njq81"))))
115 (build-system gnu-build-system)
116 (inputs
117 `(("texlive-extra-src" ,texlive-extra-src)
118 ("cairo" ,cairo)
119 ("fontconfig" ,fontconfig)
120 ("fontforge" ,fontforge)
121 ("freetype" ,freetype)
122 ("gd" ,gd)
123 ("gmp" ,gmp)
124 ("ghostscript" ,ghostscript)
125 ("graphite2" ,graphite2)
126 ("harfbuzz" ,harfbuzz)
127 ("icu4c" ,icu4c)
128 ("libpaper" ,libpaper)
129 ("libpng" ,libpng)
130 ("libxaw" ,libxaw)
131 ("libxt" ,libxt)
132 ("mpfr" ,mpfr)
133 ("perl" ,perl)
134 ("pixman" ,pixman)
135 ("poppler" ,poppler)
136 ("potrace" ,potrace)
137 ("python" ,python-2) ; incompatible with Python 3 (print syntax)
138 ("ruby" ,ruby)
139 ("tcsh" ,tcsh)
140 ("teckit" ,teckit)
141 ("zlib" ,zlib)
142 ("zziplib" ,zziplib)))
143 (native-inputs
144 `(("pkg-config" ,pkg-config)))
145 (arguments
146 `(#:out-of-source? #t
147 #:configure-flags
148 `("--disable-native-texlive-build"
149 ;; XXX: This is needed because recent Poppler requires C++11 or later.
150 ;; Remove after switch to GCC >= 6.
151 "CXXFLAGS=-std=gnu++11"
152 "--with-system-cairo"
153 "--with-system-freetype2"
154 "--with-system-gd"
155 "--with-system-gmp"
156 "--with-system-graphite2"
157 "--with-system-harfbuzz"
158 "--with-system-icu"
159 "--with-system-libgs"
160 "--with-system-libpaper"
161 "--with-system-libpng"
162 "--with-system-mpfr"
163 "--with-system-pixman"
164 "--with-system-poppler"
165 "--with-system-potrace"
166 "--with-system-teckit"
167 "--with-system-xpdf"
168 "--with-system-zlib"
169 "--with-system-zziplib")
170
171 ;; Disable tests on mips64/aarch64 to cope with a failure of luajiterr.test.
172 ;; XXX FIXME fix luajit properly on mips64 and aarch64.
173 #:tests? ,(let ((s (or (%current-target-system)
174 (%current-system))))
175 (not (or (string-prefix? "aarch64" s)
176 (string-prefix? "mips64" s))))
177 #:phases
178 (modify-phases %standard-phases
179 (add-after 'unpack 'configure-ghostscript-executable
180 ;; ps2eps.pl uses the "gswin32c" ghostscript executable on Windows,
181 ;; and the "gs" ghostscript executable on Unix. It detects Unix by
182 ;; checking for the existence of the /usr/bin directory. Since
183 ;; GuixSD does not have /usr/bin, it is also detected as Windows.
184 (lambda* (#:key inputs #:allow-other-keys)
185 (substitute* "utils/ps2eps/ps2eps-src/bin/ps2eps.pl"
186 (("gswin32c") "gs"))
187 (substitute* "texk/texlive/linked_scripts/epstopdf/epstopdf.pl"
188 (("\"gs\"")
189 (string-append "\"" (assoc-ref inputs "ghostscript") "/bin/gs\"")))
190 #t))
191 (add-after 'install 'postint
192 (lambda* (#:key inputs outputs #:allow-other-keys #:rest args)
193 (let* ((out (assoc-ref outputs "out"))
194 (share (string-append out "/share"))
195 (texlive-extra (assoc-ref inputs "texlive-extra-src"))
196 (unpack (assoc-ref %standard-phases 'unpack))
197 (patch-source-shebangs
198 (assoc-ref %standard-phases 'patch-source-shebangs)))
199 ;; Create symbolic links for the latex variants and their
200 ;; man pages.
201 (with-directory-excursion (string-append out "/bin/")
202 (for-each symlink
203 '("pdftex" "pdftex" "xetex" "luatex")
204 '("latex" "pdflatex" "xelatex" "lualatex")))
205 (with-directory-excursion (string-append share "/man/man1/")
206 (symlink "luatex.1" "lualatex.1"))
207 ;; Unpack texlive-extra and install tlpkg.
208 (mkdir "texlive-extra")
209 (with-directory-excursion "texlive-extra"
210 (apply unpack (list #:source texlive-extra))
211 (apply patch-source-shebangs (list #:source texlive-extra))
212 (invoke "mv" "tlpkg" share))
213 ;; texlua shebangs are not patched by the patch-source-shebangs
214 ;; phase because the texlua executable does not exist at that
215 ;; time.
216 (setenv "PATH" (string-append (getenv "PATH") ":" out "/bin"))
217 (with-directory-excursion out
218 (patch-source-shebangs))))))))
219 (synopsis "TeX Live, a package of the TeX typesetting system")
220 (description
221 "TeX Live provides a comprehensive TeX document production system.
222 It includes all the major TeX-related programs, macro packages, and fonts
223 that are free software, including support for many languages around the
224 world.
225
226 This package contains the binaries.")
227 (license (license:fsf-free "https://www.tug.org/texlive/copying.html"))
228 (home-page "https://www.tug.org/texlive/")))
229
230 (define-public texlive-dvips
231 (package
232 (name "texlive-dvips")
233 (version (number->string %texlive-revision))
234 (source (origin
235 (method svn-fetch)
236 (uri (svn-reference
237 (url (string-append "svn://www.tug.org/texlive/tags/"
238 %texlive-tag "/Master/texmf-dist/"
239 "/dvips"))
240 (revision %texlive-revision)))
241 (file-name (string-append name "-" version "-checkout"))
242 (sha256
243 (base32
244 "0fcy2hpapbj01ncpjj3v39yhr0jjxb6rm13qaxjjw66s3vydxls1"))))
245 (build-system trivial-build-system)
246 (arguments
247 `(#:modules ((guix build utils))
248 #:builder
249 (begin
250 (use-modules (guix build utils))
251 (let* ((root (string-append (assoc-ref %outputs "out")
252 "/share/texmf-dist"))
253 (dvips (string-append root "/dvips"))
254 (maps (string-append root "/fonts/map/dvips/tetex"))
255 (encs (string-append root "/fonts/enc/dvips/base")))
256 (mkdir-p dvips)
257 (copy-recursively (assoc-ref %build-inputs "source") dvips)
258 (mkdir-p maps)
259 (copy-recursively (assoc-ref %build-inputs "dvips-font-maps") maps)
260 (mkdir-p encs)
261 (copy-recursively (assoc-ref %build-inputs "dvips-base-enc") encs)
262 #t))))
263 (native-inputs
264 `(("dvips-font-maps"
265 ,(origin
266 (method svn-fetch)
267 (uri (svn-reference
268 (url (string-append "svn://www.tug.org/texlive/tags/"
269 %texlive-tag "/Master/texmf-dist/"
270 "/fonts/map/dvips/tetex"))
271 (revision %texlive-revision)))
272 (file-name (string-append "dvips-font-maps-" version "-checkout"))
273 (sha256
274 (base32
275 "100208pg7q6lj7swiq9p9287nn6b64bl62bnlaxpjni9y2kdrqy5"))))
276 ("dvips-base-enc"
277 ,(origin
278 (method svn-fetch)
279 (uri (svn-reference
280 (url (string-append "svn://www.tug.org/texlive/tags/"
281 %texlive-tag "/Master/texmf-dist/"
282 "/fonts/enc/dvips/base"))
283 (revision %texlive-revision)))
284 (file-name (string-append "dvips-base-enc-" version "-checkout"))
285 (sha256
286 (base32
287 "1xnf6ms0h87r55kxik4vicwr1907scj789lhqflqns8svvsli5iy"))))))
288 (home-page "https://www.ctan.org/pkg/dvips")
289 (synopsis "DVI to PostScript drivers")
290 (description "This package provides files needed for converting DVI files
291 to PostScript.")
292 ;; Various free software licenses apply to individual files.
293 (license (list license:lppl1.3c+
294 license:expat
295 license:lgpl3+))))
296
297 (define-public texlive-generic-unicode-data
298 (package
299 (name "texlive-generic-unicode-data")
300 (version (number->string %texlive-revision))
301 (source (origin
302 (method svn-fetch)
303 (uri (svn-reference
304 (url (string-append "svn://www.tug.org/texlive/tags/"
305 %texlive-tag "/Master/texmf-dist/"
306 "/tex/generic/unicode-data"))
307 (revision %texlive-revision)))
308 (file-name (string-append name "-" version "-checkout"))
309 (sha256
310 (base32
311 "0ivrhp6jz31pl4z841g4ws41lmvdiwz4sslmhf02inlib79gz6r2"))))
312 (build-system trivial-build-system)
313 (arguments
314 `(#:modules ((guix build utils))
315 #:builder
316 (begin
317 (use-modules (guix build utils))
318 (let ((target (string-append (assoc-ref %outputs "out")
319 "/share/texmf-dist/tex/generic/unicode-data")))
320 (mkdir-p target)
321 (copy-recursively (assoc-ref %build-inputs "source") target)
322 #t))))
323 (home-page "https://www.ctan.org/pkg/unicode-data")
324 (synopsis "Unicode data and loaders for TeX")
325 (description "This bundle provides generic access to Unicode Consortium
326 data for TeX use. It contains a set of text files provided by the Unicode
327 Consortium which are currently all from Unicode 8.0.0, with the exception of
328 @code{MathClass.txt} which is not currently part of the Unicode Character
329 Database. Accompanying these source data are generic TeX loader files
330 allowing this data to be used as part of TeX runs, in particular in building
331 format files. Currently there are two loader files: one for general character
332 set up and one for initializing XeTeX character classes as has been carried
333 out to date by @code{unicode-letters.tex}. ")
334 (license license:lppl1.3c+)))
335
336 (define-public texlive-generic-dehyph-exptl
337 (package
338 (name "texlive-generic-dehyph-exptl")
339 (version (number->string %texlive-revision))
340 (source (origin
341 (method svn-fetch)
342 (uri (svn-reference
343 (url (string-append "svn://www.tug.org/texlive/tags/"
344 %texlive-tag "/Master/texmf-dist/"
345 "/tex/generic/dehyph-exptl"))
346 (revision %texlive-revision)))
347 (file-name (string-append name "-" version "-checkout"))
348 (sha256
349 (base32
350 "1l9wgv99qq0ysvlxqpj4g8bl0dywbzra4g8m2kmpg2fb0i0hczap"))))
351 (build-system trivial-build-system)
352 (arguments
353 `(#:modules ((guix build utils))
354 #:builder
355 (begin
356 (use-modules (guix build utils))
357 (let ((target (string-append (assoc-ref %outputs "out")
358 "/share/texmf-dist/tex/generic/dehyph-exptl")))
359 (mkdir-p target)
360 (copy-recursively (assoc-ref %build-inputs "source") target)
361 #t))))
362 (home-page "http://projekte.dante.de/Trennmuster/WebHome")
363 (synopsis "Hyphenation patterns for German")
364 (description "The package provides experimental hyphenation patterns for
365 the German language, covering both traditional and reformed orthography. The
366 patterns can be used with packages Babel and hyphsubst from the Oberdiek
367 bundle.")
368 ;; Hyphenation patterns are under the Expat license; documentation is
369 ;; under LPPL.
370 (license (list license:expat license:lppl))))
371
372 (define-public texlive-generic-tex-ini-files
373 (package
374 (name "texlive-generic-tex-ini-files")
375 (version (number->string %texlive-revision))
376 (source (origin
377 (method svn-fetch)
378 (uri (svn-reference
379 (url (string-append "svn://www.tug.org/texlive/tags/"
380 %texlive-tag "/Master/texmf-dist/"
381 "/tex/generic/tex-ini-files"))
382 (revision %texlive-revision)))
383 (file-name (string-append name "-" version "-checkout"))
384 (sha256
385 (base32
386 "1wh42n1lmzcvi3g6mm31nm3yd5ha5bl260xqc444jg1m9fdp3wz5"))))
387 (build-system trivial-build-system)
388 (arguments
389 `(#:modules ((guix build utils))
390 #:builder
391 (begin
392 (use-modules (guix build utils))
393 (let ((target (string-append (assoc-ref %outputs "out")
394 "/share/texmf-dist/tex/generic/tex-ini-files")))
395 (mkdir-p target)
396 (copy-recursively (assoc-ref %build-inputs "source") target)
397 #t))))
398 (home-page "https://www.ctan.org/pkg/tex-ini-files")
399 (synopsis "Files for creating TeX formats")
400 (description "This bundle provides a collection of model \".ini\" files
401 for creating TeX formats. These files are commonly used to introduced
402 distribution-dependent variations in formats. They are also used to
403 allow existing format source files to be used with newer engines, for example
404 to adapt the plain e-TeX source file to work with XeTeX and LuaTeX.")
405 (license license:public-domain)))
406
407 (define-public texlive-generic-hyph-utf8
408 (package
409 (name "texlive-generic-hyph-utf8")
410 (version (number->string %texlive-revision))
411 (source (origin
412 (method svn-fetch)
413 (uri (svn-reference
414 (url (string-append "svn://www.tug.org/texlive/tags/"
415 %texlive-tag "/Master/texmf-dist/"
416 "/tex/generic/hyph-utf8"))
417 (revision %texlive-revision)))
418 (file-name (string-append name "-" version "-checkout"))
419 (sha256
420 (base32
421 "0ghizcz7ps16dzfqf66wwg5i181assc6qsm0g7g5dbmp909931vi"))))
422 (build-system trivial-build-system)
423 (arguments
424 `(#:modules ((guix build utils))
425 #:builder
426 (begin
427 (use-modules (guix build utils))
428 (let ((target (string-append (assoc-ref %outputs "out")
429 "/share/texmf-dist/tex/generic/hyph-utf8")))
430 (mkdir-p target)
431 (copy-recursively (assoc-ref %build-inputs "source") target)
432 #t))))
433 (home-page "https://ctan.org/pkg/hyph-utf8")
434 (synopsis "Hyphenation patterns expressed in UTF-8")
435 (description "Modern native UTF-8 engines such as XeTeX and LuaTeX need
436 hyphenation patterns in UTF-8 format, whereas older systems require
437 hyphenation patterns in the 8-bit encoding of the font in use (such encodings
438 are codified in the LaTeX scheme with names like OT1, T2A, TS1, OML, LY1,
439 etc). The present package offers a collection of conversions of existing
440 patterns to UTF-8 format, together with converters for use with 8-bit fonts in
441 older systems. Since hyphenation patterns for Knuthian-style TeX systems are
442 only read at iniTeX time, it is hoped that the UTF-8 patterns, with their
443 converters, will completely supplant the older patterns.")
444 ;; Individual files each have their own license. Most of these files are
445 ;; independent hyphenation patterns.
446 (license (list license:lppl1.0+
447 license:lppl1.2+
448 license:lppl1.3
449 license:lppl1.3+
450 license:lppl1.3a+
451 license:lgpl2.1
452 license:lgpl2.1+
453 license:lgpl3+
454 license:gpl2+
455 license:gpl3+
456 license:mpl1.1
457 license:asl2.0
458 license:expat
459 license:bsd-3
460 license:cc0
461 license:public-domain
462 license:wtfpl2))))
463
464 (define-public texlive-metafont-base
465 (package
466 (name "texlive-metafont-base")
467 (version (number->string %texlive-revision))
468 (source (origin
469 (method svn-fetch)
470 (uri (svn-reference
471 (url (string-append "svn://www.tug.org/texlive/tags/"
472 %texlive-tag "/Master/texmf-dist/"
473 "/metafont"))
474 (revision %texlive-revision)))
475 (file-name (string-append name "-" version "-checkout"))
476 (sha256
477 (base32
478 "1yl4n8cn5xqk2nc22zgzq6ymd7bhm6xx1mz3azip7i3ki4bhb5q5"))))
479 (build-system gnu-build-system)
480 (arguments
481 `(#:tests? #f ; no test target
482 #:phases
483 (modify-phases %standard-phases
484 (delete 'configure)
485 (replace 'build
486 (lambda* (#:key inputs #:allow-other-keys)
487 (let ((cwd (getcwd)))
488 (setenv "MFINPUTS"
489 (string-append cwd "/base:"
490 cwd "/misc:"
491 cwd "/roex:"
492 cwd "/feynmf:"
493 cwd "/mfpic:"
494 cwd "/config")))
495 (mkdir "build")
496 (with-directory-excursion "build"
497 (invoke "inimf" "mf.mf"))))
498 (replace 'install
499 (lambda* (#:key outputs #:allow-other-keys)
500 (let* ((out (assoc-ref outputs "out"))
501 (base (string-append out "/share/texmf-dist/web2c"))
502 (mf (string-append out "/share/texmf-dist/metafont/base")))
503 (mkdir-p base)
504 (mkdir-p mf)
505 (install-file "build/mf.base" base)
506 (copy-recursively "base" mf)
507 #t))))))
508 (native-inputs
509 `(("texlive-bin" ,texlive-bin)))
510 (home-page "https://www.ctan.org/pkg/metafont")
511 (synopsis "Metafont base files")
512 (description "This package provides the Metafont base files needed to
513 build fonts using the Metafont system.")
514 (license license:knuth)))
515
516 (define-public texlive-fontname
517 (package
518 (name "texlive-fontname")
519 (version (number->string %texlive-revision))
520 (source (origin
521 (method svn-fetch)
522 (uri (svn-reference
523 (url (string-append "svn://www.tug.org/texlive/tags/"
524 %texlive-tag "/Master/texmf-dist/"
525 "/fonts/map/fontname"))
526 (revision %texlive-revision)))
527 (file-name (string-append name "-" version "-checkout"))
528 (sha256
529 (base32
530 "0cssbzcx15221dynp5sii72qh4l18mwkr14n8w1xb19j8pbaqasz"))))
531 (build-system trivial-build-system)
532 (arguments
533 `(#:modules ((guix build utils))
534 #:builder
535 (begin
536 (use-modules (guix build utils))
537 (let ((target (string-append (assoc-ref %outputs "out")
538 "/share/texmf-dist/fonts/map/fontname")))
539 (mkdir-p target)
540 (copy-recursively (assoc-ref %build-inputs "source") target)
541 #t))))
542 (home-page "https://www.ctan.org/pkg/fontname")
543 (synopsis "Scheme for naming fonts in TeX")
544 (description "This is Fontname, a naming scheme for (the base part of)
545 external TeX font filenames. This makes at most eight-character names
546 from (almost) arbitrarily complex font names, thus helping portability of TeX
547 documents.")
548 (license license:public-domain)))
549
550 (define-public texlive-fonts-cm
551 (package
552 (name "texlive-fonts-cm")
553 (version (number->string %texlive-revision))
554 (source (origin
555 (method svn-fetch)
556 (uri (svn-reference
557 (url (string-append "svn://www.tug.org/texlive/tags/"
558 %texlive-tag "/Master/texmf-dist/"
559 "/fonts/source/public/cm"))
560 (revision %texlive-revision)))
561 (file-name (string-append name "-" version "-checkout"))
562 (sha256
563 (base32
564 "045k5b9rdmbxpy1a3006l1x96z1rd18vg3cwrvnld9bqybw5qz44"))))
565 (build-system gnu-build-system)
566 (arguments
567 `(#:modules ((guix build gnu-build-system)
568 (guix build utils)
569 (srfi srfi-1)
570 (srfi srfi-26))
571 #:tests? #f ; no tests
572 #:phases
573 (modify-phases %standard-phases
574 (delete 'configure)
575 (replace 'build
576 (lambda* (#:key inputs #:allow-other-keys)
577 (let ((mf (assoc-ref inputs "texlive-metafont-base")))
578 ;; Tell mf where to find mf.base
579 (setenv "MFBASES" (string-append mf "/share/texmf-dist/web2c"))
580 ;; Tell mf where to look for source files
581 (setenv "MFINPUTS"
582 (string-append (getcwd) ":"
583 mf "/share/texmf-dist/metafont/base")))
584 (mkdir "build")
585 (for-each (lambda (font)
586 (format #t "building font ~a\n" font)
587 (invoke "mf" "-progname=mf"
588 "-output-directory=build"
589 (string-append "\\"
590 "mode:=ljfour; "
591 "mag:=1; "
592 "batchmode; "
593 "input "
594 (basename font ".mf"))))
595 (find-files "." "cm(.*[0-9]+.*|inch)\\.mf$"))
596 #t))
597 (replace 'install
598 (lambda* (#:key outputs #:allow-other-keys)
599 (let* ((out (assoc-ref outputs "out"))
600 (tfm (string-append
601 out "/share/texmf-dist/fonts/tfm/public/cm"))
602 (mf (string-append
603 out "/share/texmf-dist/fonts/source/public/cm")))
604 (for-each (cut install-file <> tfm)
605 (find-files "build" "\\.*"))
606 (for-each (cut install-file <> mf)
607 (find-files "." "\\.mf"))
608 #t))))))
609 (native-inputs
610 `(("texlive-bin" ,texlive-bin)
611 ("texlive-metafont-base" ,texlive-metafont-base)))
612 (home-page "https://www.ctan.org/pkg/cm")
613 (synopsis "Computer Modern fonts for TeX")
614 (description "This package provides the Computer Modern fonts by Donald
615 Knuth. The Computer Modern font family is a large collection of text,
616 display, and mathematical fonts in a range of styles, based on Monotype Modern
617 8A.")
618 (license license:knuth)))
619
620 (define-public texlive-fonts-knuth-lib
621 (package
622 (name "texlive-fonts-knuth-lib")
623 (version (number->string %texlive-revision))
624 (source (origin
625 (method svn-fetch)
626 (uri (svn-reference
627 (url (string-append "svn://www.tug.org/texlive/tags/"
628 %texlive-tag "/Master/texmf-dist/"
629 "/fonts/source/public/knuth-lib"))
630 (revision %texlive-revision)))
631 (file-name (string-append name "-" version "-checkout"))
632 (sha256
633 (base32
634 "0in9aqyi8jkyf9d16z0li50z5fpwj1iwgwm83gmvwqcf7chfs04y"))))
635 (build-system gnu-build-system)
636 (arguments
637 `(#:modules ((guix build gnu-build-system)
638 (guix build utils)
639 (srfi srfi-26))
640 #:tests? #f ; no tests
641 #:phases
642 (modify-phases %standard-phases
643 (delete 'configure)
644 (replace 'build
645 (lambda* (#:key inputs #:allow-other-keys)
646 (let ((mf (assoc-ref inputs "texlive-metafont-base")))
647 ;; Tell mf where to find mf.base
648 (setenv "MFBASES"
649 (string-append mf "/share/texmf-dist/web2c"))
650 ;; Tell mf where to look for source files
651 (setenv "MFINPUTS"
652 (string-append (getcwd) ":"
653 mf "/share/texmf-dist/metafont/base")))
654 (mkdir "build")
655 (invoke "mf" "-progname=mf"
656 "-output-directory=build"
657 (string-append "\\"
658 "mode:=ljfour; "
659 "mag:=1; "
660 "batchmode; "
661 "input manfnt"))))
662 (replace 'install
663 (lambda* (#:key outputs #:allow-other-keys)
664 (let* ((out (assoc-ref outputs "out"))
665 (tfm (string-append
666 out "/share/texmf-dist/fonts/tfm/public/knuth-lib"))
667 (mf (string-append
668 out "/share/texmf-dist/fonts/source/public/knuth-lib")))
669 (for-each (cut install-file <> tfm)
670 (find-files "build" "\\.*"))
671 (for-each (cut install-file <> mf)
672 (find-files "." "\\.mf"))
673 #t))))))
674 (native-inputs
675 `(("texlive-bin" ,texlive-bin)
676 ("texlive-metafont-base" ,texlive-metafont-base)))
677 (home-page "https://www.ctan.org/pkg/knuth-lib")
678 (synopsis "Small library of METAFONT sources")
679 (description "This is a collection of core TeX and METAFONT macro files
680 from Donald Knuth, including the plain format, plain base, and the MF logo
681 fonts.")
682 (license license:knuth)))
683
684 (define-public texlive-fonts-latex
685 (package
686 (name "texlive-fonts-latex")
687 (version (number->string %texlive-revision))
688 (source (origin
689 (method svn-fetch)
690 (uri (svn-reference
691 (url (string-append "svn://www.tug.org/texlive/tags/"
692 %texlive-tag "/Master/texmf-dist/"
693 "/fonts/source/public/latex-fonts"))
694 (revision %texlive-revision)))
695 (file-name (string-append name "-" version "-checkout"))
696 (sha256
697 (base32
698 "0ypsm4xv9cw0jckk2qc7gi9hcmhf31mrg56pz3llyx3yd9vq2lps"))))
699 (build-system gnu-build-system)
700 (arguments
701 `(#:modules ((guix build gnu-build-system)
702 (guix build utils)
703 (srfi srfi-1)
704 (srfi srfi-26))
705 #:tests? #f ; no tests
706 #:phases
707 (modify-phases %standard-phases
708 (delete 'configure)
709 (replace 'build
710 (lambda* (#:key inputs #:allow-other-keys)
711 (let ((mf (assoc-ref inputs "texlive-metafont-base")))
712 ;; Tell mf where to find mf.base
713 (setenv "MFBASES" (string-append mf "/share/texmf-dist/web2c"))
714 ;; Tell mf where to look for source files
715 (setenv "MFINPUTS"
716 (string-append (getcwd) ":"
717 mf "/share/texmf-dist/metafont/base:"
718 (assoc-ref inputs "texlive-fonts-cm")
719 "/share/texmf-dist/fonts/source/public/cm")))
720 (mkdir "build")
721 (for-each (lambda (font)
722 (format #t "building font ~a\n" font)
723 (invoke "mf" "-progname=mf"
724 "-output-directory=build"
725 (string-append "\\"
726 "mode:=ljfour; "
727 "mag:=1; "
728 "batchmode; "
729 "input " font)))
730 '("icmcsc10" "icmex10" "icmmi8" "icmsy8" "icmtt8"
731 "ilasy8" "ilcmss8" "ilcmssb8" "ilcmssi8"
732 "lasy5" "lasy6" "lasy7" "lasy8" "lasy9" "lasy10" "lasyb10"
733 "lcircle10" "lcirclew10" "lcmss8" "lcmssb8" "lcmssi8"
734 "line10" "linew10"))
735 #t))
736 (replace 'install
737 (lambda* (#:key outputs #:allow-other-keys)
738 (let* ((out (assoc-ref outputs "out"))
739 (tfm (string-append
740 out "/share/texmf-dist/fonts/tfm/public/latex-fonts"))
741 (mf (string-append
742 out "/share/texmf-dist/fonts/source/public/latex-fonts")))
743 (for-each (cut install-file <> tfm)
744 (find-files "build" "\\.*"))
745 (for-each (cut install-file <> mf)
746 (find-files "." "\\.mf"))
747 #t))))))
748 (native-inputs
749 `(("texlive-bin" ,texlive-bin)
750 ("texlive-metafont-base" ,texlive-metafont-base)
751 ("texlive-fonts-cm" ,texlive-fonts-cm)))
752 (home-page "https://www.ctan.org/pkg/latex-fonts")
753 (synopsis "Collection of fonts used in LaTeX distributions")
754 (description "This is a collection of fonts for use with standard LaTeX
755 packages and classes. It includes invisible fonts (for use with the slides
756 class), line and circle fonts (for use in the picture environment) and LaTeX
757 symbol fonts.")
758 (license license:lppl1.2+)))
759
760 (define-public texlive-fonts-amsfonts
761 (package
762 (name "texlive-fonts-amsfonts")
763 (version (number->string %texlive-revision))
764 (source (origin
765 (method svn-fetch)
766 (uri (svn-reference
767 (url (string-append "svn://www.tug.org/texlive/tags/"
768 %texlive-tag "/Master/texmf-dist/"
769 "/fonts/source/public/amsfonts"))
770 (revision %texlive-revision)))
771 (file-name (string-append name "-" version "-checkout"))
772 (sha256
773 (base32
774 "07h20rvpbdb4k72hzmjkyb29426zr9wxsfp6yd4ajbbpd3vx8grb"))))
775 (build-system gnu-build-system)
776 (arguments
777 `(#:modules ((guix build gnu-build-system)
778 (guix build utils)
779 (srfi srfi-1)
780 (srfi srfi-26))
781 #:tests? #f ; no tests
782 #:phases
783 (modify-phases %standard-phases
784 (delete 'configure)
785 (replace 'build
786 (lambda* (#:key inputs #:allow-other-keys)
787 (let ((mf (assoc-ref inputs "texlive-metafont-base"))
788 (cwd (getcwd)))
789 ;; Make METAFONT reproducible
790 (setenv "SOURCE_DATE_EPOCH" "1")
791 ;; Tell mf where to find mf.base
792 (setenv "MFBASES" (string-append mf "/share/texmf-dist/web2c"))
793 ;; Tell mf where to look for source files
794 (setenv "MFINPUTS"
795 (string-append cwd ":"
796 cwd "/cmextra:"
797 cwd "/cyrillic:"
798 cwd "/dummy:"
799 cwd "/symbols:"
800 mf "/share/texmf-dist/metafont/base:"
801 (assoc-ref inputs "texlive-fonts-cm")
802 "/share/texmf-dist/fonts/source/public/cm")))
803 (mkdir "build")
804 (for-each (lambda (font)
805 (format #t "building font ~a\n" (basename font ".mf"))
806 (with-directory-excursion (dirname font)
807 (invoke "mf" "-progname=mf"
808 "-output-directory=../build"
809 (string-append "\\"
810 "mode:=ljfour; "
811 "mag:=1; "
812 "nonstopmode; "
813 "input "
814 (getcwd) "/"
815 (basename font ".mf")))))
816 (find-files "." "[0-9]+\\.mf$"))
817 #t))
818 (replace 'install
819 (lambda* (#:key outputs #:allow-other-keys)
820 (let* ((out (assoc-ref outputs "out"))
821 (tfm (string-append
822 out "/share/texmf-dist/fonts/tfm/public/amsfonts"))
823 (mf (string-append
824 out "/share/texmf-dist/fonts/source/public/amsfonts")))
825 (for-each (cut install-file <> tfm)
826 (find-files "build" "\\.*"))
827 (for-each (cut install-file <> mf)
828 (find-files "." "\\.mf"))
829 #t))))))
830 (native-inputs
831 `(("texlive-fonts-cm" ,texlive-fonts-cm)
832 ("texlive-metafont-base" ,texlive-metafont-base)
833 ("texlive-bin" ,texlive-bin)))
834 (home-page "https://www.ctan.org/pkg/amsfonts")
835 (synopsis "TeX fonts from the American Mathematical Society")
836 (description
837 "This package provides an extended set of fonts for use in mathematics,
838 including: extra mathematical symbols; blackboard bold letters (uppercase
839 only); fraktur letters; subscript sizes of bold math italic and bold Greek
840 letters; subscript sizes of large symbols such as sum and product; added sizes
841 of the Computer Modern small caps font; cyrillic fonts (from the University of
842 Washington); Euler mathematical fonts. All fonts are provided as Adobe Type 1
843 files, and all except the Euler fonts are provided as Metafont source. The
844 distribution also includes the canonical Type 1 versions of the Computer
845 Modern family of fonts. The Euler fonts are supported by separate packages;
846 details can be found in the documentation.")
847 (license license:silofl1.1)))
848
849 (define-public texlive-latex-amsfonts
850 (package
851 (name "texlive-latex-amsfonts")
852 (version (number->string %texlive-revision))
853 (source (origin
854 (method svn-fetch)
855 (uri (texlive-ref "latex" "amsfonts"))
856 (file-name (string-append name "-" version "-checkout"))
857 (sha256
858 (base32
859 "0slzfv5h2m03b2xvm2sasznz4azh6rgi069z161dja3l8rln79hm"))))
860 (build-system texlive-build-system)
861 (arguments '(#:tex-directory "latex/amsfonts"))
862 (native-inputs
863 `(("texlive-fonts-cm" ,texlive-fonts-cm)
864 ("texlive-metafont-base" ,texlive-metafont-base)))
865 (home-page "https://www.ctan.org/pkg/amsfonts")
866 (synopsis "TeX fonts from the American Mathematical Society")
867 (description
868 "This package provides basic LaTeX support for the symbol fonts provides
869 by the amsfonts package. It provides @code{amsfonts.sty}, with names of
870 individual symbols defined in @code{amssymb.sty}.")
871 (license license:silofl1.1)))
872
873 ;; This provides etex.src which is needed to build various formats, including
874 ;; luatex.fmt and pdflatex.fmt
875 (define-public texlive-tex-plain
876 (package
877 (name "texlive-tex-plain")
878 (version (number->string %texlive-revision))
879 (source (origin
880 (method svn-fetch)
881 (uri (svn-reference
882 (url (string-append "svn://www.tug.org/texlive/tags/"
883 %texlive-tag "/Master/texmf-dist/"
884 "/tex/plain"))
885 (revision %texlive-revision)))
886 (file-name (string-append name "-" version "-checkout"))
887 (sha256
888 (base32
889 "0mjgl3gscn3ps29yjambz1j9fg81ynnncb96vpprwx4xsijhsns0"))))
890 (build-system trivial-build-system)
891 (arguments
892 `(#:modules ((guix build utils))
893 #:builder
894 (begin
895 (use-modules (guix build utils))
896 (let ((target (string-append (assoc-ref %outputs "out")
897 "/share/texmf-dist/tex/plain")))
898 (mkdir-p target)
899 (copy-recursively (assoc-ref %build-inputs "source") target)
900 #t))))
901 (home-page "https://www.ctan.org/pkg/plain")
902 (synopsis "Plain TeX format and supporting files")
903 (description
904 "Contains files used to build the Plain TeX format, as described in the
905 TeXbook, together with various supporting files (some also discussed in the
906 book).")
907 (license license:knuth)))
908
909 (define-public texlive-latex-base
910 (let ((texlive-dir
911 (lambda (dir hash)
912 (origin
913 (method svn-fetch)
914 (uri (svn-reference
915 (url (string-append "svn://www.tug.org/texlive/tags/"
916 %texlive-tag "/Master/texmf-dist/"
917 dir))
918 (revision %texlive-revision)))
919 (file-name (string-append "texlive-generic-"
920 (last (string-split
921 (string-drop-right dir 1) #\/))
922 "-" (number->string %texlive-revision)
923 "-checkout"))
924 (sha256 (base32 hash))))))
925 (package
926 (name "texlive-latex-base")
927 (version (number->string %texlive-revision))
928 (source (origin
929 (method svn-fetch)
930 (uri (texlive-ref "latex" "base"))
931 (file-name (string-append name "-" version "-checkout"))
932 (sha256
933 (base32
934 "1h9pir2hz6i9avc4lrl733p3zf4rpkg8537x1zdbhs91hvhikw9k"))))
935 (build-system gnu-build-system)
936 (arguments
937 `(#:modules ((guix build gnu-build-system)
938 (guix build utils)
939 (ice-9 match)
940 (srfi srfi-1)
941 (srfi srfi-26))
942 #:tests? #f ; no tests
943 #:phases
944 (modify-phases %standard-phases
945 (delete 'configure)
946 (replace 'build
947 (lambda* (#:key inputs #:allow-other-keys)
948 ;; Find required fonts
949 (setenv "TFMFONTS"
950 (string-append (assoc-ref inputs "texlive-fonts-cm")
951 "/share/texmf-dist/fonts/tfm/public/cm:"
952 (assoc-ref inputs "texlive-fonts-latex")
953 "/share/texmf-dist/fonts/tfm/public/latex-fonts:"
954 (assoc-ref inputs "texlive-fonts-knuth-lib")
955 "/share/texmf-dist/fonts/tfm/public/knuth-lib"))
956 (setenv "TEXINPUTS"
957 (string-append
958 (getcwd) ":"
959 (getcwd) "/build:"
960 (string-join
961 (append-map (match-lambda
962 ((_ . dir)
963 (find-files dir
964 (lambda (_ stat)
965 (eq? 'directory (stat:type stat)))
966 #:directories? #t
967 #:stat stat)))
968 inputs)
969 ":")))
970
971 ;; Create an empty texsys.cfg, because latex.ltx wants to include
972 ;; it. This file must exist and it's fine if it's empty.
973 (with-output-to-file "texsys.cfg"
974 (lambda _ (format #t "%")))
975
976 (mkdir "build")
977 (mkdir "web2c")
978 (invoke "luatex" "-ini" "-interaction=batchmode"
979 "-output-directory=build" "unpack.ins")
980 (invoke "tex" "-ini" "-interaction=batchmode"
981 "-output-directory=web2c" "tex.ini")
982 ;; LaTeX, pdfetex/pdftex, and XeTeX require e-TeX, which
983 ;; is enabled only in extended mode (activated with a
984 ;; leading asterisk). We should not use luatex here,
985 ;; because that would make the generated format files
986 ;; incompatible with any other TeX engine.
987 (for-each (lambda (format)
988 (invoke "latex" "-ini" "-interaction=batchmode"
989 "-output-directory=web2c"
990 "-translate-file=cp227.tcx"
991 (string-append "*" format ".ini")))
992 '("latex"
993 "pdflatex"
994 "pdfetex"))
995 (for-each (lambda (format)
996 (invoke format "-ini" "-interaction=batchmode"
997 "-output-directory=web2c"
998 (string-append "*" format ".ini")))
999 '("xetex"
1000 "xelatex"))
1001 (for-each (lambda (format)
1002 (invoke "luatex" "-ini" "-interaction=batchmode"
1003 "-output-directory=web2c"
1004 (string-append format ".ini")))
1005 '("dviluatex" "dvilualatex" "luatex" "lualatex"))
1006 #t))
1007 (replace 'install
1008 (lambda* (#:key inputs outputs #:allow-other-keys)
1009 (let* ((out (assoc-ref outputs "out"))
1010 (target (string-append
1011 out "/share/texmf-dist/tex/latex/base"))
1012 (web2c (string-append
1013 out "/share/texmf-dist/web2c"))
1014 (support-files (assoc-ref inputs "texlive-latex-base-support-files")))
1015 (mkdir-p target)
1016 (mkdir-p web2c)
1017 (for-each delete-file (find-files "." "\\.(log|aux)$"))
1018 (for-each (cut install-file <> target)
1019 (find-files "build" ".*"))
1020 (for-each (cut install-file <> web2c)
1021 (find-files "web2c" ".*"))
1022 ;; pdftex is really just the same as pdfetex, but since it
1023 ;; doesn't have its own format file, we need to copy it.
1024 (copy-file "web2c/pdfetex.fmt"
1025 (string-append web2c "/pdftex.fmt"))
1026 ;; "source" is missing the support files as per doc/latex/base/manifest.txt.
1027 ;; FIXME: We are probably not packaging this right.
1028 (for-each (lambda (file)
1029 (install-file
1030 (string-append support-files "/" file)
1031 target))
1032 '("ltxguide.cls" "ltnews.cls" "minimal.cls" "idx.tex"
1033 "lablst.tex" "testpage.tex" "ltxcheck.tex"))
1034 #t))))))
1035 (native-inputs
1036 `(("texlive-bin" ,texlive-bin)
1037 ("texlive-generic-unicode-data" ,texlive-generic-unicode-data)
1038 ("texlive-generic-dehyph-exptl" ,texlive-generic-dehyph-exptl)
1039 ("texlive-generic-tex-ini-files" ,texlive-generic-tex-ini-files)
1040 ("texlive-latex-latexconfig"
1041 ,(texlive-dir "tex/latex/latexconfig/"
1042 "1zb3j49cj8p75yph6c8iysjp7qbdvghwf0mn9j0l7qq3qkbz2xaf"))
1043 ("texlive-generic-hyph-utf8" ,texlive-generic-hyph-utf8)
1044 ("texlive-generic-hyphen"
1045 ,(texlive-dir "tex/generic/hyphen/"
1046 "0xim36wybw2625yd0zwlp9m2c2xrcybw58gl4rih9nkph0wqwwhd"))
1047 ("texlive-generic-ruhyphen"
1048 ,(texlive-dir "tex/generic/ruhyphen/"
1049 "14rjkpl4zkjqs13rcf9kcd24mn2kx7i1jbdwxq8ds94bi66ylzsd"))
1050 ("texlive-generic-ukrhyph"
1051 ,(texlive-dir "tex/generic/ukrhyph/"
1052 "1cfwdg2rhbayl3w0x1xqd36d45zbc96f029myp13s7cb6kbmbppv"))
1053 ("texlive-generic-config"
1054 ,(texlive-dir "tex/generic/config/"
1055 "19vj088p4kkp6xll0141m4kl6ssgdzhs3g10i232khb07aqiag8s"))
1056 ("texlive-latex-base-support-files"
1057 ,(origin
1058 (method svn-fetch)
1059 (uri (svn-reference
1060 (url (string-append "svn://www.tug.org/texlive/tags/"
1061 %texlive-tag "/Master/texmf-dist/"
1062 "/tex/latex/base"))
1063 (revision %texlive-revision)))
1064 (file-name (string-append name "-" version "-checkout"))
1065 (sha256
1066 (base32
1067 "16bs9pi3nq407xhg59glklqv43v102cg3yim6k3zcri5d9nkbv3a"))))
1068 ("texlive-tex-plain" ,texlive-tex-plain)
1069 ("texlive-fonts-cm" ,texlive-fonts-cm)
1070 ("texlive-fonts-latex" ,texlive-fonts-latex)
1071 ("texlive-fonts-knuth-lib" ,texlive-fonts-knuth-lib)))
1072 (home-page "https://www.ctan.org/pkg/latex-base")
1073 (synopsis "Base sources of LaTeX")
1074 (description
1075 "This bundle comprises the source of LaTeX itself, together with several
1076 packages which are considered \"part of the kernel\". This bundle, together
1077 with the required packages, constitutes what every LaTeX distribution should
1078 contain.")
1079 (license license:lppl1.3c+))))
1080
1081 (define-public texlive-latex-filecontents
1082 (package
1083 (name "texlive-latex-filecontents")
1084 (version (number->string %texlive-revision))
1085 (source (origin
1086 (method svn-fetch)
1087 (uri (texlive-ref "latex" "filecontents"))
1088 (file-name (string-append name "-" version "-checkout"))
1089 (sha256
1090 (base32
1091 "0swkbxv8vg0yizadfnvrwjb4cj0pn34v9wm6v7wqq903fdav7k7q"))))
1092 (build-system texlive-build-system)
1093 (arguments '(#:tex-directory "latex/filecontents"))
1094 (home-page "https://www.ctan.org/pkg/filecontents")
1095 (synopsis "Extended filecontents and filecontents* environments")
1096 (description
1097 "LaTeX2e's @code{filecontents} and @code{filecontents*} environments
1098 enable a LaTeX source file to generate external files as it runs through
1099 LaTeX. However, there are two limitations of these environments: they refuse
1100 to overwrite existing files, and they can only be used in the preamble of a
1101 document. The filecontents package removes these limitations, letting you
1102 overwrite existing files and letting you use @code{filecontents} /
1103 @code{filecontents*} anywhere.")
1104 (license license:lppl1.3c+)))
1105
1106 (define-public texlive-generic-ifxetex
1107 (package
1108 (name "texlive-generic-ifxetex")
1109 (version (number->string %texlive-revision))
1110 (source (origin
1111 (method svn-fetch)
1112 (uri (texlive-ref "generic" "ifxetex"))
1113 (file-name (string-append name "-" version "-checkout"))
1114 (sha256
1115 (base32
1116 "0w2xj7n0szavj329kds09q626szkc378p3w0sk022q0ln4ksz86d"))))
1117 (build-system texlive-build-system)
1118 (arguments
1119 '(#:tex-directory "generic/ifxetex"
1120 #:tex-format "xelatex"))
1121 (inputs
1122 `(("texlive-latex-filecontents" ,texlive-latex-filecontents)))
1123 (home-page "https://www.ctan.org/pkg/ifxetex")
1124 (synopsis "Am I running under XeTeX?")
1125 (description
1126 "This is a simple package which provides an @code{\\ifxetex} conditional,
1127 so that other code can determine that it is running under XeTeX. The package
1128 requires the e-TeX extensions to the TeX primitive set.")
1129 (license license:lppl1.3c+)))
1130
1131 (define-public texlive-generic-epsf
1132 (package
1133 (name "texlive-generic-epsf")
1134 (version (number->string %texlive-revision))
1135 (source (origin
1136 (method svn-fetch)
1137 (uri (svn-reference
1138 (url (string-append "svn://www.tug.org/texlive/tags/"
1139 %texlive-tag "/Master/texmf-dist/"
1140 "/tex/generic/epsf"))
1141 (revision %texlive-revision)))
1142 (file-name (string-append name "-" version "-checkout"))
1143 (sha256
1144 (base32
1145 "14w3j81ympyvg8hkk9i1xgr8a0gfnfsb2ki8qqsk5pa051za1xcy"))))
1146 (build-system trivial-build-system)
1147 (arguments
1148 `(#:modules ((guix build utils))
1149 #:builder
1150 (begin
1151 (use-modules (guix build utils))
1152 (let ((target (string-append (assoc-ref %outputs "out")
1153 "/share/texmf-dist/tex/generic/epfs")))
1154 (mkdir-p target)
1155 (copy-recursively (assoc-ref %build-inputs "source") target)
1156 #t))))
1157 (home-page "https://www.ctan.org/pkg/epsf")
1158 (synopsis "Simple macros for EPS inclusion")
1159 (description
1160 "This package provides the original (and now obsolescent) graphics
1161 inclusion macros for use with dvips, still widely used by Plain TeX users (in
1162 particular). For LaTeX users, the package is nowadays (rather strongly)
1163 deprecated in favour of the more sophisticated standard LaTeX latex-graphics
1164 bundle of packages. (The latex-graphics bundle is also available to Plain TeX
1165 users, via its Plain TeX version.)")
1166 (license license:public-domain)))
1167
1168 (define-public texlive-latex-fancyvrb
1169 (package
1170 (name "texlive-latex-fancyvrb")
1171 (version (number->string %texlive-revision))
1172 (source (origin
1173 (method svn-fetch)
1174 (uri (texlive-ref "latex" "fancyvrb"))
1175 (file-name (string-append name "-" version "-checkout"))
1176 (sha256
1177 (base32
1178 "03l7140y031rr14h02i4z9zqsfvrbn7wzwxbjsrjcgrk6sdr71wv"))))
1179 (build-system texlive-build-system)
1180 (arguments
1181 '(#:tex-directory "latex/fancyvrb"
1182 ;; We exclude "fvrb-ex" to avoid a dependency on texlive-luaotfload and
1183 ;; thus texlive-luatex-lualibs.
1184 #:build-targets '("fancyvrb.ins")))
1185 (home-page "https://www.ctan.org/pkg/fancyvrb")
1186 (synopsis "Sophisticated verbatim text")
1187 (description
1188 "This package provides tools for the flexible handling of verbatim text
1189 including: verbatim commands in footnotes; a variety of verbatim environments
1190 with many parameters; ability to define new customized verbatim environments;
1191 save and restore verbatim text and environments; write and read files in
1192 verbatim mode; build \"example\" environments (showing both result and
1193 verbatim source).")
1194 (license license:lppl1.0+)))
1195
1196 (define-public texlive-latex-graphics
1197 (package
1198 (name "texlive-latex-graphics")
1199 (version (number->string %texlive-revision))
1200 (source (origin
1201 (method svn-fetch)
1202 (uri (texlive-ref "latex" "graphics"))
1203 (file-name (string-append name "-" version "-checkout"))
1204 (sha256
1205 (base32
1206 "07azyn0b1s49vbdlr6dmygrminxp72ndl24j1091hiiccvrjq3xc"))))
1207 (build-system texlive-build-system)
1208 (arguments
1209 '(#:tex-directory "latex/graphics"
1210 #:phases
1211 (modify-phases %standard-phases
1212 (add-after 'install 'install-config
1213 (lambda* (#:key inputs outputs #:allow-other-keys)
1214 (let ((cfg (assoc-ref inputs "graphics-cfg"))
1215 (target (string-append (assoc-ref outputs "out")
1216 "/share/texmf-dist/tex/latex/graphics-cfg")))
1217 (mkdir-p target)
1218 (install-file (string-append cfg "/graphics.cfg") target)
1219 (install-file (string-append cfg "/color.cfg") target)
1220 #t)))
1221 (add-after 'install 'install-defs
1222 (lambda* (#:key inputs outputs #:allow-other-keys)
1223 (let ((def (assoc-ref inputs "graphics-def"))
1224 (target (string-append (assoc-ref outputs "out")
1225 "/share/texmf-dist/tex/latex/graphics-def")))
1226 (mkdir-p target)
1227 (copy-recursively def target)
1228 #t))))))
1229 (native-inputs
1230 `(("graphics-cfg"
1231 ,(origin
1232 (method git-fetch)
1233 (uri (git-reference
1234 (url "https://github.com/latex3/graphics-cfg.git")
1235 (commit "19d1238af17df376cd46333b229579b0f7f3a41f")))
1236 (file-name (string-append "graphics-cfg-"
1237 (number->string %texlive-revision)
1238 "-checkout"))
1239 (sha256
1240 (base32
1241 "12kbgbm52gmmgn8zajb74s8n5rvnxcfdvs3iyj8vcw5vrsw5i6mh"))))
1242 ("graphics-def"
1243 ,(origin
1244 (method svn-fetch)
1245 (uri (svn-reference
1246 (url (string-append "svn://www.tug.org/texlive/tags/"
1247 %texlive-tag "/Master/texmf-dist/"
1248 "/tex/latex/graphics-def"))
1249 (revision %texlive-revision)))
1250 (file-name (string-append "graphics-def-"
1251 (number->string %texlive-revision)
1252 "-checkout"))
1253 (sha256
1254 (base32
1255 "0gi4qv6378nl84s8n1yx3hjqvv7r4lza7hpbymbl5rzwgw8qrnyb"))))))
1256 (home-page "https://www.ctan.org/pkg/latex-graphics")
1257 (synopsis "LaTeX standard graphics bundle")
1258 (description
1259 "This is a collection of LaTeX packages for producing color, including
1260 graphics (e.g. PostScript) files, and rotation and scaling of text in LaTeX
1261 documents. It comprises the packages color, graphics, graphicx, trig, epsfig,
1262 keyval, and lscape.")
1263 ;; The configuration files are released under CC0.
1264 (license (list license:lppl1.3c+
1265 license:cc0))))
1266
1267 (define-public texlive-latex-xcolor
1268 (package
1269 (name "texlive-latex-xcolor")
1270 (version (number->string %texlive-revision))
1271 (source (origin
1272 (method svn-fetch)
1273 (uri (texlive-ref "latex" "xcolor"))
1274 (file-name (string-append name "-" version "-checkout"))
1275 (sha256
1276 (base32
1277 "01n613s7bcrd2n4jfawm0k4nn2ny3aaifp2jjfif3lz4sbv31494"))))
1278 (build-system texlive-build-system)
1279 (arguments '(#:tex-directory "latex/xcolor"))
1280 (home-page "https://www.ctan.org/pkg/xcolor")
1281 (synopsis "Driver-independent color extensions for LaTeX and pdfLaTeX")
1282 (description
1283 "The package starts from the basic facilities of the colorcolor package,
1284 and provides easy driver-independent access to several kinds of color tints,
1285 shades, tones, and mixes of arbitrary colors. It allows a user to select a
1286 document-wide target color model and offers complete tools for conversion
1287 between eight color models. Additionally, there is a command for alternating
1288 row colors plus repeated non-aligned material (like horizontal lines) in
1289 tables.")
1290 (license license:lppl1.2+)))
1291
1292 (define-public texlive-latex-hyperref
1293 (package
1294 (name "texlive-latex-hyperref")
1295 (version "6.84a2")
1296 ;; The sources in the TeX Live SVN repository do not contain hluatex.dtx,
1297 ;; so we fetch the release from GitHub.
1298 (source (origin
1299 (method url-fetch)
1300 (uri (string-append "https://github.com/ho-tex/hyperref/"
1301 "archive/release-" version ".tar.gz"))
1302 (file-name (string-append name "-" version ".tar.gz"))
1303 (sha256
1304 (base32
1305 "1d3rmjgzh0025a1dza55zb6nzzlgd1y9snwx45wq1c1vf42m79h2"))))
1306 (build-system texlive-build-system)
1307 (arguments '(#:tex-directory "latex/hyperref"))
1308 (home-page "https://www.ctan.org/pkg/hyperref")
1309 (synopsis "Extensive support for hypertext in LaTeX")
1310 (description
1311 "The @code{hyperref} package is used to handle cross-referencing commands
1312 in LaTeX to produce hypertext links in the document. The package provides
1313 backends for the @code{\\special} set defined for HyperTeX DVI processors; for
1314 embedded @code{pdfmark} commands for processing by Acrobat
1315 Distiller (@code{dvips} and Y&Y's @code{dvipsone}); for Y&Y's @code{dviwindo};
1316 for PDF control within pdfTeX and @code{dvipdfm}; for TeX4ht; and for VTeX's
1317 pdf and HTML backends. The package is distributed with the @code{backref} and
1318 @code{nameref} packages, which make use of the facilities of @code{hyperref}.")
1319 (license license:lppl1.3+)))
1320
1321 (define-public texlive-latex-oberdiek
1322 (package
1323 (name "texlive-latex-oberdiek")
1324 (version (number->string %texlive-revision))
1325 (source (origin
1326 (method svn-fetch)
1327 (uri (texlive-ref "latex" "oberdiek"))
1328 (file-name (string-append name "-" version "-checkout"))
1329 (sha256
1330 (base32
1331 "0aswvsxgsn709xmvpcg50d2xl7vcy1ckdxb9c1cligqqfjjvviqf"))))
1332 (build-system texlive-build-system)
1333 (arguments
1334 '(#:tex-directory "latex/oberdiek"
1335 #:build-targets '("oberdiek.ins")
1336 #:phases
1337 (modify-phases %standard-phases
1338 ;; "ifpdf.ins" is not generated, so we need to process the dtx file.
1339 (add-after 'unpack 'do-not-process-ifpdf.ins
1340 (lambda _
1341 (substitute* "oberdiek.ins"
1342 (("ifpdf.ins") "ifpdf.dtx"))
1343 #t)))))
1344 (home-page "https://www.ctan.org/pkg/oberdiek")
1345 (synopsis "Bundle of packages submitted by Heiko Oberdiek")
1346 (description
1347 "The bundle comprises various LaTeX packages, providing among others:
1348 better accessibility support for PDF files; extensible chemists reaction
1349 arrows; record information about document class(es) used; and many more.")
1350 (license license:lppl1.3+)))
1351
1352 (define-public texlive-latex-tools
1353 (package
1354 (name "texlive-latex-tools")
1355 (version (number->string %texlive-revision))
1356 (source (origin
1357 (method svn-fetch)
1358 (uri (texlive-ref "latex" "tools"))
1359 (file-name (string-append name "-" version "-checkout"))
1360 (sha256
1361 (base32
1362 "052a0pch2k5zls5jlay9xxcf93rw3i60a2x28y3ip3rhbsv3xgiz"))))
1363 (build-system texlive-build-system)
1364 (arguments
1365 '(#:tex-directory "latex/tools"
1366 #:build-targets '("tools.ins")))
1367 (home-page "https://www.ctan.org/pkg/latex-tools")
1368 (synopsis "LaTeX standard tools bundle")
1369 (description
1370 "This package is a collection of (variously) simple tools provided as
1371 part of the LaTeX required tools distribution, comprising the following
1372 packages: afterpage, array, bm, calc, dcolumn, delarray, enumerate, fileerr,
1373 fontsmpl, ftnright, hhline, indentfirst, layout, longtable, multicol,
1374 rawfonts, showkeys, somedefs, tabularx, theorem, trace, varioref, verbatim,
1375 xr, and xspace.")
1376 (license license:lppl1.3+)))
1377
1378 (define-public texlive-latex-url
1379 (package
1380 (name "texlive-latex-url")
1381 (version (number->string %texlive-revision))
1382 (source (origin
1383 (method svn-fetch)
1384 (uri (svn-reference
1385 (url (string-append "svn://www.tug.org/texlive/tags/"
1386 %texlive-tag "/Master/texmf-dist/"
1387 "/tex/latex/url"))
1388 (revision %texlive-revision)))
1389 (file-name (string-append name "-" version "-checkout"))
1390 (sha256
1391 (base32
1392 "184s2543cwia5l7iibhlkl1ffbncfhjpv5p56zq0c15by5sghlac"))))
1393 (build-system trivial-build-system)
1394 (arguments
1395 `(#:modules ((guix build utils))
1396 #:builder
1397 (begin
1398 (use-modules (guix build utils))
1399 (let ((target (string-append (assoc-ref %outputs "out")
1400 "/share/texmf-dist/tex/latex/url")))
1401 (mkdir-p target)
1402 (copy-recursively (assoc-ref %build-inputs "source") target)
1403 #t))))
1404 (home-page "https://www.ctan.org/pkg/url")
1405 (synopsis "Verbatim with URL-sensitive line breaks")
1406 (description "The command @code{\\url} is a form of verbatim command that
1407 allows linebreaks at certain characters or combinations of characters, accepts
1408 reconfiguration, and can usually be used in the argument to another command.
1409 The command is intended for email addresses, hypertext links,
1410 directories/paths, etc., which normally have no spaces, so by default the
1411 package ignores spaces in its argument. However, a package option allows
1412 spaces, which is useful for operating systems where spaces are a common part
1413 of file names.")
1414 ;; The license header states that it is under LPPL version 2 or later, but
1415 ;; the latest version is 1.3c.
1416 (license license:lppl1.3c+)))
1417
1418 (define-public texlive-latex-l3kernel
1419 (package
1420 (name "texlive-latex-l3kernel")
1421 (version (number->string %texlive-revision))
1422 (source (origin
1423 (method svn-fetch)
1424 (uri (texlive-ref "latex" "l3kernel"))
1425 (file-name (string-append name "-" version "-checkout"))
1426 (sha256
1427 (base32
1428 "0r0wfk594j8wkdqhh21haimwsfq8x5jch4ldm21hkzk5dnmvpbg6"))))
1429 (build-system texlive-build-system)
1430 (arguments
1431 '(#:tex-directory "latex/l3kernel"))
1432 (home-page "https://www.ctan.org/pkg/l3kernel")
1433 (synopsis "LaTeX3 programmers’ interface")
1434 (description
1435 "The l3kernel bundle provides an implementation of the LaTeX3
1436 programmers’ interface, as a set of packages that run under LaTeX 2e. The
1437 interface provides the foundation on which the LaTeX3 kernel and other future
1438 code are built: it is an API for TeX programmers. The packages are set up so
1439 that the LaTeX3 conventions can be used with regular LaTeX 2e packages.")
1440 (license license:lppl1.3c+)))
1441
1442 (define-public texlive-latex-l3packages
1443 (package
1444 (name "texlive-latex-l3packages")
1445 (version (number->string %texlive-revision))
1446 (source (origin
1447 (method svn-fetch)
1448 (uri (texlive-ref "latex" "l3packages"))
1449 (file-name (string-append name "-" version "-checkout"))
1450 (sha256
1451 (base32
1452 "16jplkvzdysfssijq9l051nsks65c2nrarsl17k8gjhc28yznj8y"))))
1453 (build-system texlive-build-system)
1454 (arguments
1455 '(#:tex-directory "latex/l3packages"
1456 ;; build-targets must be specified manually since they are in
1457 ;; sub-directories.
1458 #:build-targets '("l3keys2e.ins" "xparse.ins" "xfrac.ins" "xfp.ins" "xtemplate.ins")
1459 #:phases
1460 (modify-phases %standard-phases
1461 ;; All package sources are in sub-directories, so we need to add them
1462 ;; to TEXINPUTS.
1463 (add-after 'unpack 'set-TEXINPUTS
1464 (lambda _
1465 (let ((cwd (getcwd)))
1466 (setenv "TEXINPUTS"
1467 (string-append cwd "/l3keys2e:"
1468 cwd "/xparse:"
1469 cwd "/xfrac:"
1470 cwd "/xfp:"
1471 cwd "/xtemplate"
1472 ;; The terminating ":" is required to include the
1473 ;; l3kernel input as well.
1474 ":")))
1475 #t)))
1476 ))
1477 (inputs
1478 `(("texlive-latex-l3kernel" ,texlive-latex-l3kernel)))
1479 (home-page "https://www.ctan.org/pkg/l3packages")
1480 (synopsis "High-level LaTeX3 concepts")
1481 (description
1482 "This bundle holds prototype implementations of concepts for a LaTeX
1483 designer interface, to be used with the experimental LaTeX kernel as
1484 programming tools and kernel sup­port. Packages provided in this release are:
1485
1486 @enumerate
1487 @item l3keys2e, which makes the facilities of the kernel module l3keys
1488 available for use by LaTeX 2e packages;
1489 @item xfrac, which provides flexible splitlevel fractions;
1490 @item xparse, which provides a high-level interface for declaring document
1491 commands; and
1492 @item xtemplate, which provides a means of defining generic functions using a
1493 key-value syntax.
1494 @end enumerate\n")
1495 (license license:lppl1.3c+)))
1496
1497 (define-public texlive-latex-fontspec
1498 (package
1499 (name "texlive-latex-fontspec")
1500 (version (number->string %texlive-revision))
1501 (source (origin
1502 (method svn-fetch)
1503 (uri (texlive-ref "latex" "fontspec"))
1504 (file-name (string-append name "-" version "-checkout"))
1505 (sha256
1506 (base32
1507 "1rx43y5xmjqvc27pjdnmqwp4pcw3czcfd6nfpmzc1gnqfl1hlc0q"))))
1508 (build-system texlive-build-system)
1509 (arguments
1510 '(#:tex-directory "latex/fontspec"
1511 #:build-targets '("fontspec.dtx")))
1512 (inputs
1513 `(("texlive-latex-l3kernel" ,texlive-latex-l3kernel)))
1514 (home-page "https://www.ctan.org/pkg/fontspec")
1515 (synopsis "Advanced font selection in XeLaTeX and LuaLaTeX")
1516 (description
1517 "Fontspec is a package for XeLaTeX and LuaLaTeX. It provides an
1518 automatic and unified interface to feature-rich AAT and OpenType fonts through
1519 the NFSS in LaTeX running on XeTeX or LuaTeX engines. The package requires
1520 the l3kernel and xparse bundles from the LaTeX 3 development team.")
1521 (license license:lppl1.3+)))
1522
1523 ;; The SVN directory contains little more than a dtx file that generates three
1524 ;; of the many lua files that should be installed as part of this package.
1525 ;; This is why we take the release from GitHub instead.
1526 (define-public texlive-luatex-lualibs
1527 (package
1528 (name "texlive-luatex-lualibs")
1529 (version "2.5")
1530 (source (origin
1531 (method url-fetch)
1532 (uri (string-append "https://github.com/lualatex/lualibs/"
1533 "releases/download/v"
1534 version "/lualibs.zip"))
1535 (file-name (string-append name "-" version ".zip"))
1536 (sha256
1537 (base32
1538 "1xx9blvrmx9hyhrl345lpai9m6xxnw997261a1ahn1bm5r2j5fqy"))))
1539 (build-system gnu-build-system)
1540 (arguments
1541 `(#:make-flags
1542 (list (string-append "DESTDIR="
1543 (assoc-ref %outputs "out")
1544 "/share/texmf-dist"))
1545 #:phases
1546 (modify-phases %standard-phases
1547 (delete 'configure))))
1548 (native-inputs
1549 `(("texlive-bin" ,texlive-bin)
1550 ("unzip" ,unzip)
1551 ("zip" ,zip)))
1552 (home-page "https://github.com/lualatex/lualibs")
1553 (synopsis "Lua modules for general programming (in the (La)TeX world)")
1554 (description
1555 "Lualibs is a collection of Lua modules useful for general programming.
1556 The bundle is based on Lua modules shipped with ConTeXt, and made available in
1557 this bundle for use independent of ConTeXt.")
1558 ;; GPL version 2 only
1559 (license license:gpl2)))
1560
1561 (define-public texlive-latex-amsmath
1562 (package
1563 (name "texlive-latex-amsmath")
1564 (version (number->string %texlive-revision))
1565 (source (origin
1566 (method svn-fetch)
1567 (uri (texlive-ref "latex" "amsmath"))
1568 (file-name (string-append name "-" version "-checkout"))
1569 (sha256
1570 (base32
1571 "178ywjpdlv78qmfzqdyn6gy14620zjsn2q9wap76fbr9s4hw6dba"))))
1572 (build-system texlive-build-system)
1573 (arguments '(#:tex-directory "latex/amsmath"))
1574 (home-page "https://www.ctan.org/pkg/amsmath")
1575 (synopsis "AMS mathematical facilities for LaTeX")
1576 (description
1577 "This is the principal package in the AMS-LaTeX distribution. It adapts
1578 for use in LaTeX most of the mathematical features found in AMS-TeX; it is
1579 highly recommended as an adjunct to serious mathematical typesetting in LaTeX.
1580 When amsmath is loaded, AMS-LaTeX packages @code{amsbsyamsbsy} (for bold
1581 symbols), @code{amsopnamsopn} (for operator names) and
1582 @code{amstextamstext} (for text embedded in mathematics) are also loaded.
1583 This package is part of the LaTeX required distribution; however, several
1584 contributed packages add still further to its appeal; examples are
1585 @code{empheqempheq}, which provides functions for decorating and highlighting
1586 mathematics, and @code{ntheoremntheorem}, for specifying theorem (and similar)
1587 definitions.")
1588 (license license:lppl1.3c+)))
1589
1590 (define-public texlive-latex-amscls
1591 (package
1592 (name "texlive-latex-amscls")
1593 (version (number->string %texlive-revision))
1594 (source (origin
1595 (method svn-fetch)
1596 (uri (texlive-ref "latex" "amscls"))
1597 (file-name (string-append name "-" version "-checkout"))
1598 (sha256
1599 (base32
1600 "0jmcr37mcdi7drczppvr6lmz5d5yd9m67ii79gp2nglg1xpw934j"))))
1601 (build-system texlive-build-system)
1602 (arguments
1603 `(#:tex-directory "latex/amscls"))
1604 (home-page "https://www.ctan.org/pkg/amscls")
1605 (synopsis "AMS document classes for LaTeX")
1606 (description
1607 "This bundle contains three AMS classes: @code{amsartamsart} (for writing
1608 articles for the AMS), @code{amsbookamsbook} (for books) and
1609 @code{amsprocamsproc} (for proceedings), together with some supporting
1610 material. The material is made available as part of the AMS-LaTeX
1611 distribution.")
1612 (license license:lppl1.3c+)))
1613
1614 (define-public texlive-latex-babel
1615 (package
1616 (name "texlive-latex-babel")
1617 (version (number->string %texlive-revision))
1618 (source (origin
1619 (method svn-fetch)
1620 (uri (texlive-ref "latex" "babel"))
1621 (file-name (string-append name "-" version "-checkout"))
1622 (sha256
1623 (base32
1624 "1n3i5adsyy7jw0imnzrm2i8wkf73i3mjk9h3ic8cb9cd19i4r9r3"))))
1625 (build-system texlive-build-system)
1626 (arguments
1627 '(#:tex-directory "generic/babel"
1628 #:phases
1629 (modify-phases %standard-phases
1630 ;; This package tries to produce babel.aux twice but refuses to
1631 ;; overwrite the first one.
1632 (add-before 'build 'fix-ins
1633 (lambda _
1634 (substitute* "babel.ins"
1635 (("askonceonly") "askforoverwritefalse"))
1636 #t)))))
1637 (home-page "https://www.ctan.org/pkg/babel")
1638 (synopsis "Multilingual support for Plain TeX or LaTeX")
1639 (description
1640 "The package manages culturally-determined typographical (and other)
1641 rules, and hyphenation patterns for a wide range of languages. A document may
1642 select a single language to be supported, or it may select several, in which
1643 case the document may switch from one language to another in a variety of
1644 ways. Babel uses contributed configuration files that provide the detail of
1645 what has to be done for each language. Users of XeTeX are advised to use the
1646 polyglossia package rather than Babel.")
1647 (license license:lppl1.3+)))
1648
1649 (define-public texlive-generic-babel-english
1650 (package
1651 (name "texlive-generic-babel-english")
1652 (version (number->string %texlive-revision))
1653 (source (origin
1654 (method svn-fetch)
1655 (uri (texlive-ref "generic" "babel-english"))
1656 (file-name (string-append name "-" version "-checkout"))
1657 (sha256
1658 (base32
1659 "1s404wbx91z5w65hm024kyl4h56zsa096irx18vsx8jvlmwsr5wc"))))
1660 (build-system texlive-build-system)
1661 (arguments '(#:tex-directory "generic/babel-english"))
1662 (home-page "https://www.ctan.org/pkg/babel-english")
1663 (synopsis "Babel support for English")
1664 (description
1665 "This package provides the language definition file for support of
1666 English in @code{babel}. Care is taken to select British hyphenation patterns
1667 for British English and Australian text, and default (\"american\") patterns
1668 for Canadian and USA text.")
1669 (license license:lppl1.3+)))
1670
1671 (define-public texlive-latex-cyrillic
1672 (package
1673 (name "texlive-latex-cyrillic")
1674 (version (number->string %texlive-revision))
1675 (source (origin
1676 (method svn-fetch)
1677 (uri (texlive-ref "latex" "cyrillic"))
1678 (file-name (string-append name "-" version "-checkout"))
1679 (sha256
1680 (base32
1681 "1mdhl35hwas68ki56qqngzar37dwv4mm64l2canihr255bz34lbv"))))
1682 (build-system texlive-build-system)
1683 (arguments
1684 '(#:tex-directory "latex/cyrillic"))
1685 (home-page "https://www.ctan.org/pkg/latex-cyrillic")
1686 (synopsis "Support for Cyrillic fonts in LaTeX")
1687 (description
1688 "This bundle of macros files provides macro support (including font
1689 encoding macros) for the use of Cyrillic characters in fonts encoded under the
1690 T2* and X2 encodings. These encodings cover (between them) pretty much every
1691 language that is written in a Cyrillic alphabet.")
1692 (license license:lppl1.3c+)))
1693
1694 (define-public texlive-latex-psnfss
1695 (package
1696 (name "texlive-latex-psnfss")
1697 (version (number->string %texlive-revision))
1698 (source (origin
1699 (method svn-fetch)
1700 (uri (texlive-ref "latex" "psnfss"))
1701 (file-name (string-append name "-" version "-checkout"))
1702 (sha256
1703 (base32
1704 "1920dcq8613yzprasbg80fh4fcjcidvvl54wkx438nimyxcri7qz"))))
1705 (build-system texlive-build-system)
1706 (arguments '(#:tex-directory "latex/psnfss"))
1707 (home-page "https://www.ctan.org/pkg/psnfss")
1708 (synopsis "Font support for common PostScript fonts")
1709 (description
1710 "The PSNFSS collection includes a set of files that provide a complete
1711 working setup of the LaTeX font selection scheme (NFSS2) for use with common
1712 PostScript fonts. It covers the so-called \"Base\" fonts (which are built
1713 into any Level 2 PostScript printing device and the Ghostscript interpreter)
1714 and a number of free fonts. It provides font definition files, macros and
1715 font metrics. The bundle as a whole is part of the LaTeX required set of
1716 packages.")
1717 (license license:lppl1.2+)))
1718
1719 (define-public texlive-union
1720 (lambda* (#:optional (packages '()))
1721 "Return 'texlive-union' package which is a union of PACKAGES and the
1722 standard LaTeX packages."
1723 (let ((default-packages
1724 (list texlive-bin
1725 texlive-dvips
1726 texlive-fontname
1727 texlive-fonts-cm
1728 texlive-fonts-latex
1729 texlive-metafont-base
1730 texlive-latex-base
1731 ;; LaTeX packages from the "required" set.
1732 texlive-latex-amsmath
1733 texlive-latex-amscls
1734 texlive-latex-babel
1735 texlive-generic-babel-english
1736 texlive-latex-cyrillic
1737 texlive-latex-graphics
1738 texlive-latex-psnfss
1739 texlive-latex-tools)))
1740 (package
1741 (name "texlive-union")
1742 (version (number->string %texlive-revision))
1743 (source #f)
1744 (build-system trivial-build-system)
1745 (arguments
1746 '(#:modules ((guix build union)
1747 (guix build utils)
1748 (guix build texlive-build-system)
1749 (guix build gnu-build-system)
1750 (guix build gremlin)
1751 (guix elf))
1752 #:builder
1753 (begin
1754 (use-modules (ice-9 match)
1755 (srfi srfi-26)
1756 (guix build union)
1757 (guix build utils)
1758 (guix build texlive-build-system))
1759 (let* ((out (assoc-ref %outputs "out"))
1760 (texmf.cnf (string-append out "/share/texmf-dist/web2c/texmf.cnf")))
1761 ;; Build a modifiable union of all inputs (but exclude bash)
1762 (match (filter (match-lambda
1763 ((name . _)
1764 (not (string=? "bash" name))))
1765 %build-inputs)
1766 (((names . directories) ...)
1767 (union-build (assoc-ref %outputs "out")
1768 directories
1769 #:create-all-directories? #t
1770 #:log-port (%make-void-port "w"))))
1771
1772 ;; The configuration file "texmf.cnf" is provided by the
1773 ;; "texlive-bin" package. We take it and override only the
1774 ;; setting for TEXMFROOT and TEXMF. This file won't be consulted
1775 ;; by default, though, so we still need to set TEXMFCNF.
1776 (substitute* texmf.cnf
1777 (("^TEXMFROOT = .*")
1778 (string-append "TEXMFROOT = " out "/share\n"))
1779 (("^TEXMF = .*")
1780 "TEXMF = $TEXMFROOT/share/texmf-dist\n"))
1781 (setenv "PATH" (string-append (assoc-ref %build-inputs "bash")
1782 "/bin"))
1783 (for-each
1784 (cut wrap-program <>
1785 `("TEXMFCNF" ":" = (,(dirname texmf.cnf)))
1786 `("TEXMF" ":" = (,(string-append out "/share/texmf-dist"))))
1787 (find-files (string-append out "/bin") ".*"))
1788 #t))))
1789 (inputs
1790 `(("bash" ,bash)
1791 ,@(map (lambda (package)
1792 (list (package-name package) package))
1793 (append default-packages packages))))
1794 (home-page (package-home-page texlive-bin))
1795 (synopsis "Union of TeX Live packages")
1796 (description "This package provides a subset of the TeX Live
1797 distribution.")
1798 (license (fold (lambda (package result)
1799 (match (package-license package)
1800 ((lst ...)
1801 (append lst result))
1802 ((? license:license? license)
1803 (cons license result))))
1804 '()
1805 (append default-packages packages)))))))
1806
1807 (define-public texlive-tiny
1808 (package
1809 (inherit (texlive-union))
1810 (name "texlive-tiny")
1811 (description "This is a very limited subset of the TeX Live distribution.
1812 It includes little more than the required set of LaTeX packages.")))
1813
1814 (define-public texlive-latex-amsrefs
1815 (package
1816 (name "texlive-latex-amsrefs")
1817 (version (number->string %texlive-revision))
1818 (source (origin
1819 (method svn-fetch)
1820 (uri (texlive-ref "latex" "amsrefs"))
1821 (file-name (string-append name "-" version "-checkout"))
1822 (sha256
1823 (base32
1824 "15i4k479dwrpr0kspmm70g1yn4p3dkh0whyzmr93hph9bggnh1i1"))))
1825 (build-system texlive-build-system)
1826 (arguments '(#:tex-directory "latex/amsrefs"))
1827 (home-page "https://www.ctan.org/pkg/amsrefs")
1828 (synopsis "LaTeX-based replacement for BibTeX")
1829 (description
1830 "Amsrefs is a LaTeX package for bibliographies that provides an archival
1831 data format similar to the format of BibTeX database files, but adapted to
1832 make direct processing by LaTeX easier. The package can be used either in
1833 conjunction with BibTeX or as a replacement for BibTeX.")
1834 (license license:lppl1.3+)))
1835
1836 (define-public texlive-latex-bigfoot
1837 (package
1838 (name "texlive-latex-bigfoot")
1839 (version (number->string %texlive-revision))
1840 (source (origin
1841 (method svn-fetch)
1842 (uri (texlive-ref "latex" "bigfoot"))
1843 (file-name (string-append name "-" version "-checkout"))
1844 (sha256
1845 (base32
1846 "092g8alnsdwlgl1isdnqrr32l161994295kadr1n05d81xgj5wnv"))))
1847 (build-system texlive-build-system)
1848 (arguments
1849 '(#:tex-directory "latex/bigfoot"
1850 #:phases
1851 (modify-phases %standard-phases
1852 (add-after 'unpack 'remove-generated-file
1853 (lambda _
1854 (for-each delete-file (find-files "." "\\.drv$"))
1855 #t)))))
1856 (home-page "https://www.ctan.org/pkg/bigfoot")
1857 (synopsis "Footnotes for critical editions")
1858 (description
1859 "This package aims to provide a one-stop solution to requirements for
1860 footnotes. It offers: Multiple footnote apparatus superior to that of
1861 @code{manyfoot}. Footnotes can be formatted in separate paragraphs, or be run
1862 into a single paragraph (this choice may be selected per footnote series);
1863 Things you might have expected (such as @code{\\verb}-like material in
1864 footnotes, and color selections over page breaks) now work. Note that the
1865 majority of the bigfoot package's interface is identical to that of
1866 @code{manyfoot}; users should seek information from that package's
1867 documentation. The bigfoot bundle also provides the @code{perpage} and
1868 @code{suffix} packages.")
1869 (license license:gpl2+)))
1870
1871 (define-public texlive-latex-blindtext
1872 (package
1873 (name "texlive-latex-blindtext")
1874 (version (number->string %texlive-revision))
1875 (source (origin
1876 (method svn-fetch)
1877 (uri (texlive-ref "latex" "blindtext"))
1878 (file-name (string-append name "-" version "-checkout"))
1879 (sha256
1880 (base32
1881 "1jrja9b1pzdh9zgv1jh807w4xijqja58n2mqny6dkwicv8qfgbfg"))))
1882 (build-system texlive-build-system)
1883 (arguments '(#:tex-directory "latex/blindtext"))
1884 (home-page "https://www.ctan.org/pkg/blindtext")
1885 (synopsis "Producing 'blind' text for testing")
1886 (description
1887 "The package provides the commands @code{\\blindtext} and
1888 @code{\\Blindtext} for creating \"blind\" text useful in testing new classes
1889 and packages, and @code{\\blinddocument}, @code{\\Blinddocument} for creating
1890 an entire random document with sections, lists, mathematics, etc. The package
1891 supports three languages, @code{english}, @code{(n)german} and @code{latin};
1892 the @code{latin} option provides a short \"lorem ipsum\" (for a fuller \"lorem
1893 ipsum\" text, see the @code{lipsum} package).")
1894 (license license:lppl)))
1895
1896 (define-public texlive-latex-dinbrief
1897 (package
1898 (name "texlive-latex-dinbrief")
1899 (version (number->string %texlive-revision))
1900 (source (origin
1901 (method svn-fetch)
1902 (uri (texlive-ref "latex" "dinbrief"))
1903 (file-name (string-append name "-" version "-checkout"))
1904 (sha256
1905 (base32
1906 "0lb0kiy8fxzl6cnhcw1sggy6jrjvcd6kj1kkw3k9lkimm388yjz6"))))
1907 (build-system texlive-build-system)
1908 (arguments
1909 '(#:tex-directory "latex/dinbrief"
1910 #:phases
1911 (modify-phases %standard-phases
1912 (add-after 'unpack 'remove-generated-file
1913 (lambda _
1914 (delete-file "dinbrief.drv")
1915 #t)))))
1916 (home-page "https://www.ctan.org/pkg/dinbrief")
1917 (synopsis "German letter DIN style")
1918 (description
1919 "This package implements a document layout for writing letters according
1920 to the rules of DIN (Deutsches Institut für Normung, German standardisation
1921 institute). A style file for LaTeX 2.09 (with limited support of the
1922 features) is part of the package. Since the letter layout is based on a
1923 German standard, the user guide is written in German, but most macros have
1924 English names from which the user can recognize what they are used for. In
1925 addition there are example files showing how letters may be created with the
1926 package.")
1927 (license license:lppl)))
1928
1929 (define-public texlive-latex-draftwatermark
1930 (package
1931 (name "texlive-latex-draftwatermark")
1932 (version (number->string %texlive-revision))
1933 (source (origin
1934 (method svn-fetch)
1935 (uri (texlive-ref "latex" "draftwatermark"))
1936 (file-name (string-append name "-" version "-checkout"))
1937 (sha256
1938 (base32
1939 "1zyl2pcz2x529gzj5m93a1s4ipymdabf7qdjl3l1673pizd4hfyv"))))
1940 (build-system texlive-build-system)
1941 (arguments '(#:tex-directory "latex/draftwatermark"))
1942 (home-page "https://www.ctan.org/pkg/draftwatermark")
1943 (synopsis "Put a grey textual watermark on document pages")
1944 (description
1945 "This package provides a means to add a textual, light grey watermark on
1946 every page or on the first page of a document. Typical usage may consist in
1947 writing words such as DRAFT or CONFIDENTIAL across document pages. The
1948 package performs a similar function to that of @code{draftcopy}, but its
1949 implementation is output device independent, and made very simple by relying
1950 on everypage.")
1951 (license license:lppl1.3+)))
1952
1953 (define-public texlive-latex-environ
1954 (package
1955 (name "texlive-latex-environ")
1956 (version (number->string %texlive-revision))
1957 (source (origin
1958 (method svn-fetch)
1959 (uri (texlive-ref "latex" "environ"))
1960 (file-name (string-append name "-" version "-checkout"))
1961 (sha256
1962 (base32
1963 "06h28b26dyjkj9shksphgqfv4130jfkwhbw737hxn7d3yvdfffyd"))))
1964 (build-system texlive-build-system)
1965 (arguments '(#:tex-directory "latex/environ"))
1966 (home-page "https://www.ctan.org/pkg/environ")
1967 (synopsis "New interface for environments in LaTeX")
1968 (description
1969 "This package provides the @code{\\collect@@body} command (as in
1970 @code{amsmath}), as well as a @code{\\long} version @code{\\Collect@@Body},
1971 for collecting the body text of an environment. These commands are used to
1972 define a new author interface to creating new environments.")
1973 (license license:lppl)))
1974
1975 (define-public texlive-latex-eqparbox
1976 (package
1977 (name "texlive-latex-eqparbox")
1978 (version (number->string %texlive-revision))
1979 (source (origin
1980 (method svn-fetch)
1981 (uri (texlive-ref "latex" "eqparbox"))
1982 (file-name (string-append name "-" version "-checkout"))
1983 (sha256
1984 (base32
1985 "0pvmhsd4xmpil0m3c7qcgwilbk266mlkzv03g0jr8r3zd8jxlyzq"))))
1986 (build-system texlive-build-system)
1987 (arguments '(#:tex-directory "latex/eqparbox"))
1988 (home-page "https://www.ctan.org/pkg/eqparbox")
1989 (synopsis "Create equal-widthed parboxes")
1990 (description
1991 "LaTeX users sometimes need to ensure that two or more blocks of text
1992 occupy the same amount of horizontal space on the page. To that end, the
1993 @code{eqparbox} package defines a new command, @code{\\eqparbox}, which works
1994 just like @code{\\parbox}, except that instead of specifying a width, one
1995 specifies a tag. All @code{eqparbox}es with the same tag---regardless of
1996 where they are in the document---will stretch to fit the widest
1997 @code{eqparbox} with that tag. This simple, equal-width mechanism can be used
1998 for a variety of alignment purposes, as is evidenced by the examples in
1999 @code{eqparbox}'s documentation. Various derivatives of @code{\\eqparbox} are
2000 also provided.")
2001 (license license:lppl1.3+)))
2002
2003 (define-public texlive-latex-expdlist
2004 (package
2005 (name "texlive-latex-expdlist")
2006 (version (number->string %texlive-revision))
2007 (source (origin
2008 (method svn-fetch)
2009 (uri (texlive-ref "latex" "expdlist"))
2010 (file-name (string-append name "-" version "-checkout"))
2011 (sha256
2012 (base32
2013 "1x7byk6x10njir3y9rm56glhdzrxwqag7gsnw2sqn1czlq525w7r"))))
2014 (build-system texlive-build-system)
2015 (arguments
2016 '(#:tex-directory "latex/expdlist"
2017 #:phases
2018 (modify-phases %standard-phases
2019 (add-after 'unpack 'remove-generated-file
2020 (lambda _
2021 (for-each delete-file
2022 (find-files "." "\\.drv$"))
2023 #t)))))
2024 (home-page "https://www.ctan.org/pkg/expdlist")
2025 (synopsis "Expanded description environments")
2026 (description
2027 "The package provides additional features for the LaTeX
2028 @code{description} environment, including adjustable left margin. The package
2029 also allows the user to \"break\" a list (for example, to interpose a comment)
2030 without affecting the structure of the list (this works for @code{itemize} and
2031 @code{enumerate} lists, and numbered lists remain in sequence).")
2032 (license license:lppl)))
2033
2034 (define-public texlive-latex-filemod
2035 (package
2036 (name "texlive-latex-filemod")
2037 (version (number->string %texlive-revision))
2038 (source (origin
2039 (method svn-fetch)
2040 (uri (svn-reference
2041 (url (string-append "svn://www.tug.org/texlive/tags/"
2042 %texlive-tag "/Master/texmf-dist/"
2043 "/tex/latex/filemod"))
2044 (revision %texlive-revision)))
2045 (file-name (string-append name "-" version "-checkout"))
2046 (sha256
2047 (base32
2048 "0vpxilfw69xv78f03g0j0zw0bw4qcn36whqp8phcq48qk1ax2kr2"))))
2049 (build-system trivial-build-system)
2050 (arguments
2051 `(#:modules ((guix build utils))
2052 #:builder
2053 (begin
2054 (use-modules (guix build utils))
2055 (let ((target (string-append (assoc-ref %outputs "out")
2056 "/share/texmf-dist/tex/latex/filemod")))
2057 (mkdir-p target)
2058 (copy-recursively (assoc-ref %build-inputs "source") target)
2059 #t))))
2060 (home-page "https://www.ctan.org/pkg/filemod")
2061 (synopsis "Provide file modification times, and compare them")
2062 (description
2063 "This package provides macros to read and compare the modification dates
2064 of files. The files may be @code{.tex} files, images or other files (as long
2065 as they can be found by LaTeX). It uses the @code{\\pdffilemoddate} primitive
2066 of pdfLaTeX to find the file modification date as PDF date string, parses the
2067 string and returns the value to the user. The package will also work for DVI
2068 output with recent versions of the LaTeX compiler which uses pdfLaTeX in DVI
2069 mode. The functionality is provided by purely expandable macros or by faster
2070 but non-expandable ones.")
2071 (license license:lppl1.3+)))
2072
2073 (define-public texlive-latex-ifplatform
2074 (package
2075 (name "texlive-latex-ifplatform")
2076 (version (number->string %texlive-revision))
2077 (source (origin
2078 (method svn-fetch)
2079 (uri (texlive-ref "latex" "ifplatform"))
2080 (file-name (string-append name "-" version "-checkout"))
2081 (sha256
2082 (base32
2083 "11gvvjvmdfs9b7mm19yf80zwkx49jqcbq6g8qb9y5ns1r1qvnixp"))))
2084 (build-system texlive-build-system)
2085 (arguments '(#:tex-directory "latex/ifplatform"))
2086 (home-page "https://www.ctan.org/pkg/ifplatform")
2087 (synopsis "Conditionals to test which platform is being used")
2088 (description
2089 "This package uses the (La)TeX extension @code{-shell-escape} to
2090 establish whether the document is being processed on a Windows or on a
2091 Unix-like system, or on Cygwin (Unix environment over a Windows system).
2092 Booleans provided are: @code{\\ifwindows}, @code{\\iflinux}, @code{\\ifmacosx}
2093 and @code{\\ifcygwin}. The package also preserves the output of @code{uname}
2094 on a Unix-like system, which may be used to distinguish between various
2095 classes of systems.")
2096 (license license:lppl)))
2097
2098 (define-public texlive-latex-natbib
2099 (package
2100 (name "texlive-latex-natbib")
2101 (version (number->string %texlive-revision))
2102 (source (origin
2103 (method svn-fetch)
2104 (uri (texlive-ref "latex" "natbib"))
2105 (file-name (string-append name "-" version "-checkout"))
2106 (sha256
2107 (base32
2108 "0aqliq0nwblxyrzhwhv77pnmk7qh2y3prgq7z7qhwcbgz5kisld7"))))
2109 (build-system texlive-build-system)
2110 (arguments '(#:tex-directory "latex/natbib"))
2111 (home-page "https://www.ctan.org/pkg/natbib")
2112 (synopsis "Flexible bibliography support")
2113 (description
2114 "This bundle provides a package that implements both author-year and
2115 numbered references, as well as much detailed of support for other
2116 bibliography use. Also provided are versions of the standard BibTeX styles
2117 that are compatible with @code{natbib}: @code{plainnat}, @code{unsrtnat},
2118 @code{abbrnat}. The bibliography styles produced by @code{custom-bib} are
2119 designed from the start to be compatible with @code{natbib}.")
2120 (license license:lppl)))
2121
2122 (define-public texlive-latex-psfrag
2123 (package
2124 (name "texlive-latex-psfrag")
2125 (version (number->string %texlive-revision))
2126 (source (origin
2127 (method svn-fetch)
2128 (uri (texlive-ref "latex" "psfrag"))
2129 (file-name (string-append name "-" version "-checkout"))
2130 (sha256
2131 (base32
2132 "1dxbl5il7wbbsp0v45vk884xi1192wxw03849pb1g5q4x808n352"))))
2133 (build-system texlive-build-system)
2134 (arguments '(#:tex-directory "latex/psfrag"))
2135 (home-page "https://www.ctan.org/pkg/psfrag")
2136 (synopsis "Replace strings in encapsulated PostScript figures")
2137 (description
2138 "This package allows LaTeX constructions (equations, picture
2139 environments, etc.) to be precisely superimposed over Encapsulated PostScript
2140 figures, using your own favorite drawing tool to create an EPS figure and
2141 placing simple text \"tags\" where each replacement is to be placed, with
2142 PSfrag automatically removing these tags from the figure and replacing them
2143 with a user specified LaTeX construction, properly aligned, scaled, and/or
2144 rotated.")
2145 (license (license:fsf-free "file://psfrag.dtx"))))
2146
2147 (define-public texlive-latex-pstool
2148 (package
2149 (name "texlive-latex-pstool")
2150 (version (number->string %texlive-revision))
2151 (source (origin
2152 (method svn-fetch)
2153 (uri (texlive-ref "latex" "pstool"))
2154 (file-name (string-append name "-" version "-checkout"))
2155 (sha256
2156 (base32
2157 "1kwlk1x67lad4xb7gpkxqgdlxwpi6nvq1r9wika7m92abmyf18h3"))))
2158 (build-system texlive-build-system)
2159 (arguments
2160 '(#:tex-directory "latex/pstool"
2161 #:tex-format "latex"))
2162 (inputs
2163 `(("texlive-fonts-cm" ,texlive-fonts-cm)
2164 ("texlive-latex-filecontents" ,texlive-latex-filecontents)))
2165 (propagated-inputs
2166 `(("texlive-latex-bigfoot" ,texlive-latex-bigfoot)
2167 ("texlive-latex-filemod" ,texlive-latex-filemod)
2168 ("texlive-latex-graphics" ,texlive-latex-graphics)
2169 ("texlive-latex-ifplatform" ,texlive-latex-ifplatform)
2170 ("texlive-latex-oberdiek" ,texlive-latex-oberdiek)
2171 ("texlive-latex-psfrag" ,texlive-latex-psfrag)
2172 ("texlive-latex-trimspaces" ,texlive-latex-trimspaces)))
2173 (home-page "https://www.ctan.org/pkg/pstool")
2174 (synopsis "Process PostScript graphisc within pdfLaTeX documents")
2175 (description
2176 "This is a package for processing PostScript graphics with @code{psfrag}
2177 labels within pdfLaTeX documents. Every graphic is compiled individually,
2178 drastically speeding up compilation time when only a single figure needs
2179 re-processing.")
2180 (license license:lppl)))
2181
2182 (define-public texlive-latex-seminar
2183 (package
2184 (name "texlive-latex-seminar")
2185 (version (number->string %texlive-revision))
2186 (source (origin
2187 (method svn-fetch)
2188 (uri (svn-reference
2189 (url (string-append "svn://www.tug.org/texlive/tags/"
2190 %texlive-tag "/Master/texmf-dist/"
2191 "/tex/latex/seminar"))
2192 (revision %texlive-revision)))
2193 (file-name (string-append name "-" version "-checkout"))
2194 (sha256
2195 (base32
2196 "0y4i651b75y6006n03x8n86bsqvjsailvvz9bhzy51dzsznqidq0"))))
2197 (build-system texlive-build-system)
2198 (arguments '(#:tex-directory "latex/seminar"))
2199 (home-page "https://www.ctan.org/pkg/seminar")
2200 (synopsis "Make overhead slides")
2201 ;; TODO: This package may need fancybox and xcomment at runtime.
2202 (description
2203 "This package provides a class that produces overhead
2204 slides (transparencies), with many facilities. Seminar is not nowadays
2205 reckoned a good basis for a presentation — users are advised to use more
2206 recent classes such as powerdot or beamer, both of which are tuned to
2207 21st-century presentation styles.")
2208 (license license:lppl1.2+)))
2209
2210 (define-public texlive-latex-trimspaces
2211 (package
2212 (name "texlive-latex-trimspaces")
2213 (version (number->string %texlive-revision))
2214 (source (origin
2215 (method svn-fetch)
2216 (uri (texlive-ref "latex" "trimspaces"))
2217 (file-name (string-append name "-" version "-checkout"))
2218 (sha256
2219 (base32
2220 "0da00lb32am4g63mn96625wg48p3pj3spx79lajrk17d549apwqa"))))
2221 (build-system texlive-build-system)
2222 (arguments
2223 '(#:tex-directory "latex/trimspaces"
2224 #:tex-format "latex"
2225 #:phases
2226 (modify-phases %standard-phases
2227 (add-after 'unpack 'fix-bug
2228 (lambda _
2229 ;; The "ins" file refers to the wrong source file.
2230 (substitute* "trimspaces.ins"
2231 (("pstool.tex") "trimspaces.tex"))
2232 #t)))))
2233 (inputs
2234 `(("texlive-latex-filecontents" ,texlive-latex-filecontents)))
2235 (home-page "https://www.ctan.org/pkg/trimspaces")
2236 (synopsis "Trim spaces around an argument or within a macro")
2237 (description
2238 "This very short package allows you to expandably remove spaces around a
2239 token list (commands are provided to remove spaces before, spaces after, or
2240 both); or to remove surrounding spaces within a macro definition, or to define
2241 space-stripped macros.")
2242 (license license:lppl)))
2243
2244 (define-public texlive-latex-capt-of
2245 (package
2246 (name "texlive-latex-capt-of")
2247 (version (number->string %texlive-revision))
2248 (source (origin
2249 (method svn-fetch)
2250 (uri (svn-reference
2251 (url (string-append "svn://www.tug.org/texlive/tags/"
2252 %texlive-tag "/Master/texmf-dist/"
2253 "/tex/latex/capt-of"))
2254 (revision %texlive-revision)))
2255 (file-name (string-append name "-" version "-checkout"))
2256 (sha256
2257 (base32
2258 "1y2s50f6lz0jx2748lj3iy56hrpcczgnbzmvphxv7aqndyyamd4x"))))
2259 (build-system trivial-build-system)
2260 (arguments
2261 `(#:modules ((guix build utils))
2262 #:builder
2263 (begin
2264 (use-modules (guix build utils))
2265 (let ((target (string-append (assoc-ref %outputs "out")
2266 "/share/texmf-dist/tex/latex/capt-of")))
2267 (mkdir-p target)
2268 (copy-recursively (assoc-ref %build-inputs "source") target)
2269 #t))))
2270 (home-page "https://www.ctan.org/pkg/capt-of")
2271 (synopsis "Captions on more than floats")
2272 (description
2273 "This package defines a command @code{\\captionof} for putting a caption
2274 to something that's not a float.")
2275 (license license:lppl)))
2276
2277 (define-public texlive-latex-doi
2278 (package
2279 (name "texlive-latex-doi")
2280 (version (number->string %texlive-revision))
2281 (source (origin
2282 (method svn-fetch)
2283 (uri (svn-reference
2284 (url (string-append "svn://www.tug.org/texlive/tags/"
2285 %texlive-tag "/Master/texmf-dist/"
2286 "/tex/latex/doi"))
2287 (revision %texlive-revision)))
2288 (file-name (string-append name "-" version "-checkout"))
2289 (sha256
2290 (base32
2291 "0378rdmrgr2lzbfi4qqy4dfpj5im20diyd8z8b9m4mlg05r7wgnb"))))
2292 (build-system trivial-build-system)
2293 (arguments
2294 `(#:modules ((guix build utils))
2295 #:builder
2296 (begin
2297 (use-modules (guix build utils))
2298 (let ((target (string-append (assoc-ref %outputs "out")
2299 "/share/texmf-dist/tex/latex/doi")))
2300 (mkdir-p target)
2301 (copy-recursively (assoc-ref %build-inputs "source") target)
2302 #t))))
2303 (home-page "https://www.ctan.org/pkg/doi")
2304 (synopsis "Create correct hyperlinks for DOI numbers")
2305 (description
2306 "You can hyperlink DOI numbers to doi.org. However, some publishers have
2307 elected to use nasty characters in their DOI numbering scheme (@code{<},
2308 @code{>}, @code{_} and @code{;} have all been spotted). This will either
2309 upset LaTeX, or your PDF reader. This package contains a single user-level
2310 command @code{\\doi{}}, which takes a DOI number, and creates a correct
2311 hyperlink to the target of the DOI.")
2312 ;; Any version of the LPPL.
2313 (license license:lppl1.3+)))
2314
2315 (define-public texlive-latex-etoolbox
2316 (package
2317 (name "texlive-latex-etoolbox")
2318 (version (number->string %texlive-revision))
2319 (source (origin
2320 (method svn-fetch)
2321 (uri (svn-reference
2322 (url (string-append "svn://www.tug.org/texlive/tags/"
2323 %texlive-tag "/Master/texmf-dist/"
2324 "/tex/latex/etoolbox"))
2325 (revision %texlive-revision)))
2326 (file-name (string-append name "-" version "-checkout"))
2327 (sha256
2328 (base32
2329 "0016bscnpima9krrg2569mva78xzwnygzlvg87dznsm6gf8g589v"))))
2330 (build-system trivial-build-system)
2331 (arguments
2332 `(#:modules ((guix build utils))
2333 #:builder
2334 (begin
2335 (use-modules (guix build utils))
2336 (let ((target (string-append (assoc-ref %outputs "out")
2337 "/share/texmf-dist/tex/latex/etoolbox")))
2338 (mkdir-p target)
2339 (copy-recursively (assoc-ref %build-inputs "source") target)
2340 #t))))
2341 (home-page "https://www.ctan.org/pkg/etoolbox")
2342 (synopsis "e-TeX tools for LaTeX")
2343 (description
2344 "This package is a toolbox of programming facilities geared primarily
2345 towards LaTeX class and package authors. It provides LaTeX frontends to some
2346 of the new primitives provided by e-TeX as well as some generic tools which
2347 are not strictly related to e-TeX but match the profile of this package. The
2348 package provides functions that seem to offer alternative ways of implementing
2349 some LaTeX kernel commands; nevertheless, the package will not modify any part
2350 of the LaTeX kernel.")
2351 (license license:lppl1.3+)))
2352
2353 (define-public texlive-latex-fncychap
2354 (package
2355 (name "texlive-latex-fncychap")
2356 (version (number->string %texlive-revision))
2357 (source (origin
2358 (method svn-fetch)
2359 (uri (svn-reference
2360 (url (string-append "svn://www.tug.org/texlive/tags/"
2361 %texlive-tag "/Master/texmf-dist/"
2362 "/tex/latex/fncychap"))
2363 (revision %texlive-revision)))
2364 (file-name (string-append name "-" version "-checkout"))
2365 (sha256
2366 (base32
2367 "0fdk84dbicfjfprkz6vk15x36mvlhaw9isjmgkc56jp2khwjswwq"))))
2368 (build-system trivial-build-system)
2369 (arguments
2370 `(#:modules ((guix build utils))
2371 #:builder
2372 (begin
2373 (use-modules (guix build utils))
2374 (let ((target (string-append (assoc-ref %outputs "out")
2375 "/share/texmf-dist/tex/latex/fncychap")))
2376 (mkdir-p target)
2377 (copy-recursively (assoc-ref %build-inputs "source") target)
2378 #t))))
2379 (home-page "https://www.ctan.org/pkg/fncychap")
2380 (synopsis "Seven predefined chapter heading styles")
2381 (description
2382 "This package provides seven predefined chapter heading styles. Each
2383 style can be modified using a set of simple commands. Optionally one can
2384 modify the formatting routines in order to create additional chapter
2385 headings.")
2386 (license license:lppl1.3+)))
2387
2388 (define-public texlive-latex-framed
2389 (package
2390 (name "texlive-latex-framed")
2391 (version (number->string %texlive-revision))
2392 (source (origin
2393 (method svn-fetch)
2394 (uri (svn-reference
2395 (url (string-append "svn://www.tug.org/texlive/tags/"
2396 %texlive-tag "/Master/texmf-dist/"
2397 "/tex/latex/framed"))
2398 (revision %texlive-revision)))
2399 (file-name (string-append name "-" version "-checkout"))
2400 (sha256
2401 (base32
2402 "14a4ydqsvp3vcfavl21jrv0ybiqypaaqzg2q2cs3rzkandg7w98x"))))
2403 (build-system trivial-build-system)
2404 (arguments
2405 `(#:modules ((guix build utils))
2406 #:builder
2407 (begin
2408 (use-modules (guix build utils))
2409 (let ((target (string-append (assoc-ref %outputs "out")
2410 "/share/texmf-dist/tex/latex/framed")))
2411 (mkdir-p target)
2412 (copy-recursively (assoc-ref %build-inputs "source") target)
2413 #t))))
2414 (home-page "https://www.ctan.org/pkg/framed")
2415 (synopsis "Framed or shaded regions that can break across pages")
2416 (description
2417 "The package creates three environments: @code{framed}, which puts an
2418 ordinary frame box around the region, @code{shaded}, which shades the region,
2419 and @code{leftbar}, which places a line at the left side. The environments
2420 allow a break at their start (the @code{\\FrameCommand} enables creation of a
2421 title that is “attached” to the environment); breaks are also allowed in the
2422 course of the framed/shaded matter. There is also a command
2423 @code{\\MakeFramed} to make your own framed-style environments.")
2424 ;; The header states: "These macros may be freely transmitted, reproduced,
2425 ;; or modified for any purpose provided that this notice is left intact."
2426 (license (license:fsf-free "file://framed.sty"))))
2427
2428 (define-public texlive-latex-g-brief
2429 (package
2430 (name "texlive-latex-g-brief")
2431 (version (number->string %texlive-revision))
2432 (source (origin
2433 (method svn-fetch)
2434 (uri (texlive-ref "latex" "g-brief"))
2435 (file-name (string-append name "-" version "-checkout"))
2436 (sha256
2437 (base32
2438 "0sikazkg0dpkcpzlbqw8qzxr81paf2f443vsrh14jnw7s4gswvc5"))))
2439 (build-system texlive-build-system)
2440 (arguments
2441 '(#:tex-directory "latex/g-brief"
2442 #:phases
2443 (modify-phases %standard-phases
2444 (add-after 'unpack 'remove-generated-file
2445 (lambda _
2446 (delete-file "g-brief.drv")
2447 #t)))))
2448 (home-page "https://www.ctan.org/pkg/g-brief")
2449 (synopsis "Letter document class")
2450 (description
2451 "This package is designed for formatting formless letters in German; it
2452 can also be used for English (by those who can read the documentation). There
2453 are LaTeX 2.09 @code{documentstyle} and LaTeX 2e class files for both an
2454 \"old\" and a \"new\" version of g-brief.")
2455 (license license:lppl)))
2456
2457 (define-public texlive-latex-galois
2458 (package
2459 (name "texlive-latex-galois")
2460 (version (number->string %texlive-revision))
2461 (source (origin
2462 (method svn-fetch)
2463 (uri (texlive-ref "latex" "galois"))
2464 (file-name (string-append name "-" version "-checkout"))
2465 (sha256
2466 (base32
2467 "0d4l0msk8j5pi95xnmm9wygv1vbpkwkv5amx9l0km86cs79jpp1h"))))
2468 (build-system texlive-build-system)
2469 (arguments '(#:tex-directory "latex/galois"))
2470 (home-page "https://www.ctan.org/pkg/galois")
2471 (synopsis "Typeset Galois connections")
2472 (description
2473 "The package deals with connections in two-dimensional style, optionally
2474 in colour.")
2475 (license license:lppl)))
2476
2477 (define-public texlive-latex-gcite
2478 (package
2479 (name "texlive-latex-gcite")
2480 (version (number->string %texlive-revision))
2481 (source (origin
2482 (method svn-fetch)
2483 (uri (texlive-ref "latex" "gcite"))
2484 (file-name (string-append name "-" version "-checkout"))
2485 (sha256
2486 (base32
2487 "03g9by54yrypn599y98r1xh7qw0bbbmpzq0bfwpj6j5q5rkl1mfa"))))
2488 (build-system texlive-build-system)
2489 (arguments '(#:tex-directory "latex/gcite"))
2490 (home-page "https://www.ctan.org/pkg/gcite")
2491 (synopsis "Citations in a reader-friendly style")
2492 (description
2493 "The package allows citations in the German style, which is considered by
2494 many to be particularly reader-friendly. The citation provides a small amount
2495 of bibliographic information in a footnote on the page where each citation is
2496 made. It combines a desire to eliminate unnecessary page-turning with the
2497 look-up efficiency afforded by numeric citations. The package makes use of
2498 BibLaTeX, and is considered experimental.")
2499 (license license:lppl1.3+)))
2500
2501 (define-public texlive-latex-geometry
2502 (package
2503 (name "texlive-latex-geometry")
2504 (version (number->string %texlive-revision))
2505 (source (origin
2506 (method svn-fetch)
2507 (uri (texlive-ref "latex" "geometry"))
2508 (file-name (string-append name "-" version "-checkout"))
2509 (sha256
2510 (base32
2511 "1r2kfcwclg33yk5z8mvlagwxj7nr1mc3w4bdpmhrwv6dn8mrbvw8"))))
2512 (build-system texlive-build-system)
2513 (arguments '(#:tex-directory "latex/geometry"))
2514 (home-page "https://www.ctan.org/pkg/geometry")
2515 (synopsis "Flexible and complete interface to document dimensions")
2516 (description
2517 "This package provides an easy and flexible user interface to customize
2518 page layout, implementing auto-centering and auto-balancing mechanisms so that
2519 the users have only to give the least description for the page layout. The
2520 package knows about all the standard paper sizes, so that the user need not
2521 know what the nominal \"real\" dimensions of the paper are, just its standard
2522 name (such as a4, letter, etc.). An important feature is the package's
2523 ability to communicate the paper size it's set up to the output.")
2524 (license license:lppl)))
2525
2526 (define-public texlive-latex-mdwtools
2527 (package
2528 (name "texlive-latex-mdwtools")
2529 (version (number->string %texlive-revision))
2530 (source (origin
2531 (method svn-fetch)
2532 (uri (texlive-ref "latex" "mdwtools"))
2533 (file-name (string-append name "-" version "-checkout"))
2534 (sha256
2535 (base32
2536 "0caxs74hla28hc67csf5i5ahadx97w8vxh3mdmsprxbpd1mr7ssg"))))
2537 (build-system texlive-build-system)
2538 (arguments '(#:tex-directory "latex/mdwtools"))
2539 (home-page "https://www.ctan.org/pkg/mdwtools")
2540 (synopsis "Miscellaneous tools by Mark Wooding")
2541 (description
2542 "This collection of tools includes: @code{atsupport} for short commands
2543 starting with @code{@@}, macros to sanitize the OT1 encoding of the
2544 @code{cmtt} fonts; a @code{doafter} command; improved @code{footnote} support;
2545 @code{mathenv} for various alignment in maths; list handling; @code{mdwmath}
2546 which adds some minor changes to LaTeX maths; a rewrite of LaTeX's tabular and
2547 array environments; verbatim handling; and syntax diagrams.")
2548 (license license:gpl3+)))
2549
2550 (define-public texlive-latex-polyglossia
2551 (package
2552 (name "texlive-latex-polyglossia")
2553 (version (number->string %texlive-revision))
2554 (source (origin
2555 (method svn-fetch)
2556 (uri (texlive-ref "latex" "polyglossia"))
2557 (file-name (string-append name "-" version "-checkout"))
2558 (sha256
2559 (base32
2560 "09mvszd5qgqg4cfglpj5qxyzjz190ppb9p8gnsnjydwp1akvhayf"))))
2561 (build-system texlive-build-system)
2562 (arguments '(#:tex-directory "latex/polyglossia"))
2563 (home-page "https://www.ctan.org/pkg/polyglossia")
2564 (synopsis "Alternative to babel for XeLaTeX and LuaLaTeX")
2565 (description
2566 "This package provides a complete Babel replacement for users of LuaLaTeX
2567 and XeLaTeX; it relies on the @code{fontspec} package, version 2.0 at least.")
2568 (license license:lppl1.3+)))
2569
2570 (define-public texlive-latex-supertabular
2571 (package
2572 (name "texlive-latex-supertabular")
2573 (version (number->string %texlive-revision))
2574 (source (origin
2575 (method svn-fetch)
2576 (uri (texlive-ref "latex" "supertabular"))
2577 (file-name (string-append name "-" version "-checkout"))
2578 (sha256
2579 (base32
2580 "14b2bc7cqz4ckxxycim9sw6jkrr1pahivm1rdbpz5k6hl967w1s3"))))
2581 (build-system texlive-build-system)
2582 (arguments '(#:tex-directory "latex/supertabular"))
2583 (home-page "https://www.ctan.org/pkg/supertabular")
2584 (synopsis "Multi-page tables package")
2585 (description
2586 "This package was a predecessor of @code{longtable}; the newer
2587 package (designed on quite different principles) is easier to use and more
2588 flexible, in many cases, but supertabular retains its usefulness in a few
2589 situations where longtable has problems.")
2590 (license license:lppl1.3+)))
2591
2592 (define-public texlive-tex-texinfo
2593 (package
2594 (name "texlive-tex-texinfo")
2595 (version (number->string %texlive-revision))
2596 (source (origin
2597 (method svn-fetch)
2598 (uri (svn-reference
2599 (url (string-append "svn://www.tug.org/texlive/tags/"
2600 %texlive-tag "/Master/texmf-dist/"
2601 "/tex/texinfo"))
2602 (revision %texlive-revision)))
2603 (file-name (string-append name "-" version "-checkout"))
2604 (sha256
2605 (base32
2606 "09zj2w3lx0y6i2syfjjgizahf86z301dw8p37ln6syfhqhzqdz46"))))
2607 (build-system trivial-build-system)
2608 (arguments
2609 `(#:modules ((guix build utils))
2610 #:builder
2611 (begin
2612 (use-modules (guix build utils))
2613 (let ((target (string-append (assoc-ref %outputs "out")
2614 "/share/texmf-dist/tex/texinfo")))
2615 (mkdir-p target)
2616 (copy-recursively (assoc-ref %build-inputs "source") target)
2617 #t))))
2618 (home-page "https://www.ctan.org/pkg/texinfo")
2619 (synopsis "TeX macros to handle Texinfo files")
2620 (description
2621 "Texinfo is the preferred format for documentation in the GNU project;
2622 the format may be used to produce online or printed output from a single
2623 source. The Texinfo macros may be used to produce printable output using TeX;
2624 other programs in the distribution offer online interactive use (with
2625 hypertext linkages in some cases).")
2626 (license license:gpl3+)))
2627
2628 (define-public texlive-latex-upquote
2629 (package
2630 (name "texlive-latex-upquote")
2631 (version (number->string %texlive-revision))
2632 (source (origin
2633 (method svn-fetch)
2634 (uri (texlive-ref "latex" "upquote"))
2635 (file-name (string-append name "-" version "-checkout"))
2636 (sha256
2637 (base32
2638 "0d1050i973wnxigy0xpky5l7vn4ff7ldhkjpdqsw5s653gagwixp"))))
2639 (build-system texlive-build-system)
2640 (arguments '(#:tex-directory "latex/upquote"))
2641 (home-page "https://www.ctan.org/pkg/upquote")
2642 (synopsis "Show \"realistic\" quotes in verbatim")
2643 (description
2644 "Typewriter-style fonts are best for program listings, but Computer
2645 Modern Typewriter prints @code{`} and @code{'} as bent opening and closing
2646 single quotes. Other fonts, and most programming languages, print @code{`} as
2647 a grave accent and @code{'} upright; @code{'} is used both to open and to
2648 close quoted strings. The package switches the typewriter font to Computer
2649 Modern Typewriter in OT1 encoding, and modifies the behaviour of
2650 @code{verbatim}, @code{verbatim*}, @code{\\verb}, and @code{\\verb*} to print
2651 in the expected way. It does this regardless of other fonts or encodings in
2652 use, so long as the package is loaded after the other fonts were. The package
2653 does not affect @code{\\tt}, @code{\\texttt}, etc.")
2654 (license license:lppl1.2+)))
2655
2656 (define-public texlive-latex-anysize
2657 (package
2658 (name "texlive-latex-anysize")
2659 (version (number->string %texlive-revision))
2660 (source (origin
2661 (method svn-fetch)
2662 (uri (svn-reference
2663 (url (string-append "svn://www.tug.org/texlive/tags/"
2664 %texlive-tag "/Master/texmf-dist/"
2665 "/tex/latex/anysize"))
2666 (revision %texlive-revision)))
2667 (file-name (string-append name "-" version "-checkout"))
2668 (sha256
2669 (base32
2670 "19khwqjlvznc955sijhww3c4zbb0053rvzwv9nz738qknq7y18vb"))))
2671 (build-system trivial-build-system)
2672 (arguments
2673 `(#:modules ((guix build utils))
2674 #:builder
2675 (begin
2676 (use-modules (guix build utils))
2677 (let ((target (string-append (assoc-ref %outputs "out")
2678 "/share/texmf-dist/tex/latex/anysize")))
2679 (mkdir-p target)
2680 (copy-recursively (assoc-ref %build-inputs "source") target)
2681 #t))))
2682 (home-page "https://www.ctan.org/pkg/anysize")
2683 (synopsis "Simple package to set up document margins")
2684 (description
2685 "This is a simple package to set up document margins. This package is
2686 considered obsolete; alternatives are the @code{typearea} package from the
2687 @code{koma-script} bundle, or the @code{geometry} package.")
2688 (license license:public-domain)))
2689
2690 (define-public texlive-latex-appendix
2691 (package
2692 (name "texlive-latex-appendix")
2693 (version (number->string %texlive-revision))
2694 (source (origin
2695 (method svn-fetch)
2696 (uri (texlive-ref "latex" "appendix"))
2697 (file-name (string-append name "-" version "-checkout"))
2698 (sha256
2699 (base32
2700 "0rxfpr8vq3brwx5rc7qn91ixlp9zva4zrms8a579fqa1g5yva7vg"))))
2701 (build-system texlive-build-system)
2702 (arguments '(#:tex-directory "latex/appendix"))
2703 (home-page "https://www.ctan.org/pkg/appendix")
2704 (synopsis "Extra control of appendices")
2705 (description
2706 "The appendix package provides various ways of formatting the titles of
2707 appendices. Also (sub)appendices environments are provided that can be used,
2708 for example, for per chapter/section appendices. An @code{appendices}
2709 environment is provided which can be used instead of the @code{\\appendix}
2710 command.")
2711 (license license:lppl)))
2712
2713 (define-public texlive-latex-changebar
2714 (package
2715 (name "texlive-latex-changebar")
2716 (version (number->string %texlive-revision))
2717 (source (origin
2718 (method svn-fetch)
2719 (uri (texlive-ref "latex" "changebar"))
2720 (file-name (string-append name "-" version "-checkout"))
2721 (sha256
2722 (base32
2723 "1ik4m8pzfsn1grlda6fniqqfwmgj7rfxwg63jdw0p0qv002vc7ik"))))
2724 (build-system texlive-build-system)
2725 (arguments '(#:tex-directory "latex/changebar"))
2726 (home-page "https://www.ctan.org/pkg/changebar")
2727 (synopsis "Generate changebars in LaTeX documents")
2728 (description
2729 "Identify areas of text to be marked with changebars with the
2730 @code{\\cbstart} and @code{\\cbend} commands; the bars may be coloured. The
2731 package uses 'drivers' to place the bars; the available drivers can work with
2732 @code{dvitoln03}, @code{dvitops}, @code{dvips}, the emTeX and TeXtures DVI
2733 drivers, and VTeX and pdfTeX.")
2734 (license license:lppl)))
2735
2736 (define-public texlive-latex-cmap
2737 (package
2738 (name "texlive-latex-cmap")
2739 (version (number->string %texlive-revision))
2740 (source (origin
2741 (method svn-fetch)
2742 (uri (svn-reference
2743 (url (string-append "svn://www.tug.org/texlive/tags/"
2744 %texlive-tag "/Master/texmf-dist/"
2745 "/tex/latex/cmap"))
2746 (revision %texlive-revision)))
2747 (file-name (string-append name "-" version "-checkout"))
2748 (sha256
2749 (base32
2750 "1s1rv6zgw105w2j6ffhnk914qrix87y1ndzri1q72g2kbr91zlbg"))))
2751 (build-system trivial-build-system)
2752 (arguments
2753 `(#:modules ((guix build utils))
2754 #:builder
2755 (begin
2756 (use-modules (guix build utils))
2757 (let ((target (string-append (assoc-ref %outputs "out")
2758 "/share/texmf-dist/tex/latex/cmap")))
2759 (mkdir-p target)
2760 (copy-recursively (assoc-ref %build-inputs "source") target)
2761 #t))))
2762 (home-page "https://www.tug.org/svn/texlive/tags/texlive-2017.1/\
2763 Master/texmf-dist/tex/latex/cmap/")
2764 (synopsis "CMap support for PDF files")
2765 (description
2766 "This package embeds CMap tables into PDF files to make search and
2767 copy-and-paste functions work properly.")
2768 (license license:lppl)))
2769
2770 (define-public texlive-latex-colortbl
2771 (package
2772 (name "texlive-latex-colortbl")
2773 (version (number->string %texlive-revision))
2774 (source (origin
2775 (method svn-fetch)
2776 (uri (texlive-ref "latex" "colortbl"))
2777 (file-name (string-append name "-" version "-checkout"))
2778 (sha256
2779 (base32
2780 "190pmq8la2rq07xry8bn8z8yywzxv6fqyqaj7yjfj5rgw6x0mas8"))))
2781 (build-system texlive-build-system)
2782 (arguments '(#:tex-directory "latex/colortbl"))
2783 (home-page "https://www.ctan.org/pkg/colortbl")
2784 (synopsis "Add colour to LaTeX tables")
2785 (description
2786 "This package allows rows, columns, and even individual cells in LaTeX
2787 tables to be coloured.")
2788 (license license:lppl)))
2789
2790 (define-public texlive-latex-fancybox
2791 (package
2792 (name "texlive-latex-fancybox")
2793 (version (number->string %texlive-revision))
2794 (source (origin
2795 (method svn-fetch)
2796 (uri (svn-reference
2797 (url (string-append "svn://www.tug.org/texlive/tags/"
2798 %texlive-tag "/Master/texmf-dist/"
2799 "/tex/latex/fancybox"))
2800 (revision %texlive-revision)))
2801 (file-name (string-append name "-" version "-checkout"))
2802 (sha256
2803 (base32
2804 "0smmnaad2q8qwicay1frri990lv65l0k8cwzsvdsyp3jk8kp042w"))))
2805 (build-system trivial-build-system)
2806 (arguments
2807 `(#:modules ((guix build utils))
2808 #:builder
2809 (begin
2810 (use-modules (guix build utils))
2811 (let ((target (string-append (assoc-ref %outputs "out")
2812 "/share/texmf-dist/tex/latex/fancybox")))
2813 (mkdir-p target)
2814 (copy-recursively (assoc-ref %build-inputs "source") target)
2815 #t))))
2816 (home-page "https://www.ctan.org/pkg/fancybox")
2817 (synopsis "Variants of \\fbox and other games with boxes")
2818 (description
2819 "This package provides variants of @code{\\fbox}: @code{\\shadowbox},
2820 @code{\\doublebox}, @code{\\ovalbox}, @code{\\Ovalbox}, with helpful tools for
2821 using box macros and flexible verbatim macros. You can box mathematics,
2822 floats, center, flushleft, and flushright, lists, and pages.")
2823 (license license:lppl1.2+)))
2824
2825 (define-public texlive-latex-fancyhdr
2826 (package
2827 (name "texlive-latex-fancyhdr")
2828 (version (number->string %texlive-revision))
2829 (source (origin
2830 (method svn-fetch)
2831 (uri (svn-reference
2832 (url (string-append "svn://www.tug.org/texlive/tags/"
2833 %texlive-tag "/Master/texmf-dist/"
2834 "/tex/latex/fancyhdr"))
2835 (revision %texlive-revision)))
2836 (file-name (string-append name "-" version "-checkout"))
2837 (sha256
2838 (base32
2839 "04h430agf8aj7ziwyb46xpk95c605rjk1wzhr63m6ylipihidlgw"))))
2840 (build-system trivial-build-system)
2841 (arguments
2842 `(#:modules ((guix build utils))
2843 #:builder
2844 (begin
2845 (use-modules (guix build utils))
2846 (let ((target (string-append (assoc-ref %outputs "out")
2847 "/share/texmf-dist/tex/latex/fancyhdr")))
2848 (mkdir-p target)
2849 (copy-recursively (assoc-ref %build-inputs "source") target)
2850 #t))))
2851 (home-page "https://www.ctan.org/pkg/fancyhdr")
2852 (synopsis "Extensive control of page headers and footers in LaTeX2e")
2853 (description
2854 "The package provides extensive facilities, both for constructing headers
2855 and footers, and for controlling their use (for example, at times when LaTeX
2856 would automatically change the heading style in use).")
2857 (license license:lppl)))
2858
2859 (define-public texlive-latex-float
2860 (package
2861 (name "texlive-latex-float")
2862 (version (number->string %texlive-revision))
2863 (source (origin
2864 (method svn-fetch)
2865 (uri (texlive-ref "latex" "float"))
2866 (file-name (string-append name "-" version "-checkout"))
2867 (sha256
2868 (base32
2869 "0nbl7wylkv22fcdv4p8byhhj575fli6jnqjpkhrkbv8dzwah84nq"))))
2870 (build-system texlive-build-system)
2871 (arguments '(#:tex-directory "latex/float"))
2872 (home-page "https://www.ctan.org/pkg/float")
2873 (synopsis "Improved interface for floating objects")
2874 (description
2875 "This package improves the interface for defining floating objects such
2876 as figures and tables. It introduces the boxed float, the ruled float and the
2877 plaintop float. You can define your own floats and improve the behaviour of
2878 the old ones. The package also provides the @code{H} float modifier option of
2879 the obsolete @code{here} package. You can select this as automatic default
2880 with @code{\\floatplacement{figure}{H}}.")
2881 (license license:lppl)))
2882
2883 (define-public texlive-latex-footmisc
2884 (package
2885 (name "texlive-latex-footmisc")
2886 (version (number->string %texlive-revision))
2887 (source (origin
2888 (method svn-fetch)
2889 (uri (texlive-ref "latex" "footmisc"))
2890 (file-name (string-append name "-" version "-checkout"))
2891 (sha256
2892 (base32
2893 "03x61wwql8nh6zrqiiiq3rb0x7m3pn48c606zapy19y21fybwdxs"))))
2894 (build-system texlive-build-system)
2895 (arguments '(#:tex-directory "latex/footmisc"))
2896 (home-page "https://www.ctan.org/pkg/footmisc")
2897 (synopsis "Range of footnote options")
2898 (description
2899 "This is a collection of ways to change the typesetting of footnotes.
2900 The package provides means of changing the layout of the footnotes themselves,
2901 a way to number footnotes per page, to make footnotes disappear in a
2902 \"moving\" argument, and to deal with multiple references to footnotes from
2903 the same place. The package also has a range of techniques for labelling
2904 footnotes with symbols rather than numbers.")
2905 (license license:lppl1.3+)))
2906
2907 (define-public texlive-latex-listings
2908 (package
2909 (name "texlive-latex-listings")
2910 (version (number->string %texlive-revision))
2911 (source (origin
2912 (method svn-fetch)
2913 (uri (texlive-ref "latex" "listings"))
2914 (file-name (string-append name "-" version "-checkout"))
2915 (sha256
2916 (base32
2917 "1nsn9wp3wl12b36c0sqrim33lf33cr5wky0h4ncnw8lvqgm7h8wf"))))
2918 (build-system texlive-build-system)
2919 (arguments
2920 '(#:tex-directory "latex/listings"
2921 #:build-targets '("listings.ins")))
2922 (home-page "https://www.ctan.org/pkg/listings")
2923 (synopsis "Typeset source code listings using LaTeX")
2924 (description
2925 "The package enables the user to typeset programs (programming code)
2926 within LaTeX; the source code is read directly by TeX---no front-end processor
2927 is needed. Keywords, comments and strings can be typeset using different
2928 styles. Support for @code{hyperref} is provided.")
2929 (license license:lppl1.3+)))
2930
2931 (define-public texlive-latex-jknapltx
2932 (package
2933 (name "texlive-latex-jknapltx")
2934 (version (number->string %texlive-revision))
2935 (source (origin
2936 (method svn-fetch)
2937 (uri (svn-reference
2938 (url (string-append "svn://www.tug.org/texlive/tags/"
2939 %texlive-tag "/Master/texmf-dist/"
2940 "/tex/latex/jknapltx"))
2941 (revision %texlive-revision)))
2942 (file-name (string-append name "-" version "-checkout"))
2943 (sha256
2944 (base32
2945 "0m034x72f2g07icr50gacyxfb9g1lz2rmqh4kqr1qjb421x2kds9"))))
2946 (build-system trivial-build-system)
2947 (arguments
2948 `(#:modules ((guix build utils))
2949 #:builder
2950 (begin
2951 (use-modules (guix build utils))
2952 (let ((target (string-append (assoc-ref %outputs "out")
2953 "/share/texmf-dist/tex/latex/jknapltx")))
2954 (mkdir-p target)
2955 (copy-recursively (assoc-ref %build-inputs "source") target)
2956 #t))))
2957 (home-page "https://www.ctan.org/pkg/jknappen")
2958 (synopsis "Miscellaneous packages by Joerg Knappen")
2959 (description
2960 "This package provides miscellaneous macros by Joerg Knappen, including:
2961 represent counters in greek; Maxwell's non-commutative division;
2962 @code{latin1jk}, @code{latin2jk} and @code{latin3jk}, which are
2963 @code{inputenc} definition files that allow verbatim input in the respective
2964 ISO Latin codes; blackboard bold fonts in maths; use of RSFS fonts in maths;
2965 extra alignments for @code{\\parboxes}; swap Roman and Sans fonts;
2966 transliterate semitic languages; patches to make (La)TeX formulae embeddable
2967 in SGML; use maths minus in text as appropriate; simple Young tableaux.")
2968 (license license:gpl2)))
2969
2970 (define-public texlive-fonts-ec
2971 (package
2972 (name "texlive-fonts-ec")
2973 (version (number->string %texlive-revision))
2974 (source (origin
2975 (method svn-fetch)
2976 (uri (svn-reference
2977 (url (string-append "svn://www.tug.org/texlive/tags/"
2978 %texlive-tag "/Master/texmf-dist/"
2979 "/fonts/source/jknappen/ec/"))
2980 (revision %texlive-revision)))
2981 (file-name (string-append name "-" version "-checkout"))
2982 (sha256
2983 (base32
2984 "12av65fbz9xiashm09c9m1fj1mijxls5xspd7652ry1n5s0nixy4"))))
2985 (build-system gnu-build-system)
2986 (arguments
2987 `(#:modules ((guix build gnu-build-system)
2988 (guix build utils)
2989 (srfi srfi-1)
2990 (srfi srfi-26))
2991 #:tests? #f ; no tests
2992 #:phases
2993 (modify-phases %standard-phases
2994 (delete 'configure)
2995 (replace 'build
2996 (lambda* (#:key inputs #:allow-other-keys)
2997 (let ((mf (assoc-ref inputs "texlive-metafont-base")))
2998 ;; Tell mf where to find mf.base
2999 (setenv "MFBASES" (string-append mf "/share/texmf-dist/web2c"))
3000 ;; Tell mf where to look for source files
3001 (setenv "MFINPUTS"
3002 (string-append (getcwd) ":"
3003 mf "/share/texmf-dist/metafont/base:"
3004 (assoc-ref inputs "texlive-fonts-cm")
3005 "/share/texmf-dist/fonts/source/public/cm")))
3006 (mkdir "build")
3007 (for-each (lambda (font)
3008 (format #t "building font ~a\n" font)
3009 (invoke "mf" "-progname=mf"
3010 "-output-directory=build"
3011 (string-append "\\"
3012 "mode:=ljfour; "
3013 "mag:=1; "
3014 "batchmode; "
3015 "input " (basename font ".mf"))))
3016 (find-files "." "[0-9]+\\.mf$"))
3017 #t))
3018 (replace 'install
3019 (lambda* (#:key outputs #:allow-other-keys)
3020 (let* ((out (assoc-ref outputs "out"))
3021 (tfm (string-append
3022 out "/share/texmf-dist/fonts/tfm/jknappen/ec"))
3023 (mf (string-append
3024 out "/share/texmf-dist/fonts/source/jknappen/ec")))
3025 (for-each (cut install-file <> tfm)
3026 (find-files "build" "\\.*"))
3027 (for-each (cut install-file <> mf)
3028 (find-files "." "\\.mf"))
3029 #t))))))
3030 (native-inputs
3031 `(("texlive-bin" ,texlive-bin)
3032 ("texlive-metafont-base" ,texlive-metafont-base)
3033 ("texlive-fonts-cm" ,texlive-fonts-cm)))
3034 (home-page "https://www.ctan.org/pkg/ec")
3035 (synopsis "Computer modern fonts in T1 and TS1 encodings")
3036 (description
3037 "The EC fonts are European Computer Modern Fonts, supporting the complete
3038 LaTeX T1 encoding defined at the 1990 TUG conference hold at Cork/Ireland.
3039 These fonts are intended to be stable with no changes being made to the tfm
3040 files. The set also contains a Text Companion Symbol font, called @code{tc},
3041 featuring many useful characters needed in text typesetting, for example
3042 oldstyle digits, currency symbols (including the newly created Euro symbol),
3043 the permille sign, copyright, trade mark and servicemark as well as a copyleft
3044 sign, and many others. Recent releases of LaTeX2e support the EC fonts. The
3045 EC fonts supersede the preliminary version released as the DC fonts. The
3046 fonts are available in (traced) Adobe Type 1 format, as part of the
3047 @code{cm-super} bundle. The other Computer Modern-style T1-encoded Type 1
3048 set, Latin Modern, is not actually a direct development of the EC set, and
3049 differs from the EC in a number of particulars.")
3050 (license (license:fsf-free "https://www.tug.org/svn/texlive/tags/\
3051 texlive-2017.1/Master/texmf-dist/doc/fonts/ec/copyrite.txt"))))
3052
3053 (define-public texlive-fonts-rsfs
3054 (package
3055 (name "texlive-fonts-rsfs")
3056 (version (number->string %texlive-revision))
3057 (source (origin
3058 (method svn-fetch)
3059 (uri (svn-reference
3060 (url (string-append "svn://www.tug.org/texlive/tags/"
3061 %texlive-tag "/Master/texmf-dist/"
3062 "/fonts/source/public/rsfs/"))
3063 (revision %texlive-revision)))
3064 (file-name (string-append name "-" version "-checkout"))
3065 (sha256
3066 (base32
3067 "0r12pn02r4a955prcvq0048nifh86ihlcgvw3pppqqvfngv34l5h"))))
3068 (build-system gnu-build-system)
3069 (arguments
3070 `(#:modules ((guix build gnu-build-system)
3071 (guix build utils)
3072 (srfi srfi-1)
3073 (srfi srfi-26))
3074 #:tests? #f ; no tests
3075 #:phases
3076 (modify-phases %standard-phases
3077 (delete 'configure)
3078 (replace 'build
3079 (lambda* (#:key inputs #:allow-other-keys)
3080 (let ((mf (assoc-ref inputs "texlive-metafont-base")))
3081 ;; Tell mf where to find mf.base
3082 (setenv "MFBASES" (string-append mf "/share/texmf-dist/web2c"))
3083 ;; Tell mf where to look for source files
3084 (setenv "MFINPUTS"
3085 (string-append (getcwd) ":"
3086 mf "/share/texmf-dist/metafont/base:"
3087 (assoc-ref inputs "texlive-fonts-cm")
3088 "/share/texmf-dist/fonts/source/public/cm")))
3089 (mkdir "build")
3090 (for-each (lambda (font)
3091 (format #t "building font ~a\n" font)
3092 (invoke "mf" "-progname=mf"
3093 "-output-directory=build"
3094 (string-append "\\"
3095 "mode:=ljfour; "
3096 "mag:=1; "
3097 "batchmode; "
3098 "input " (basename font ".mf"))))
3099 (find-files "." "[0-9]+\\.mf$"))
3100 #t))
3101 (replace 'install
3102 (lambda* (#:key outputs #:allow-other-keys)
3103 (let* ((out (assoc-ref outputs "out"))
3104 (tfm (string-append
3105 out "/share/texmf-dist/fonts/tfm/public/rsfs"))
3106 (mf (string-append
3107 out "/share/texmf-dist/fonts/source/public/rsfs")))
3108 (for-each (cut install-file <> tfm)
3109 (find-files "build" "\\.*"))
3110 (for-each (cut install-file <> mf)
3111 (find-files "." "\\.mf"))
3112 #t))))))
3113 (native-inputs
3114 `(("texlive-bin" ,texlive-bin)
3115 ("texlive-metafont-base" ,texlive-metafont-base)
3116 ("texlive-fonts-cm" ,texlive-fonts-cm)))
3117 (home-page "https://www.ctan.org/pkg/rsfs")
3118 (synopsis "Ralph Smith's Formal Script font")
3119 (description
3120 "The fonts provide uppercase formal script letters for use as symbols in
3121 scientific and mathematical typesetting (in contrast to the informal script
3122 fonts such as that used for the calligraphic symbols in the TeX maths symbol
3123 font). The fonts are provided as Metafont source, and as derived Adobe Type 1
3124 format. LaTeX support, for using these fonts in mathematics, is available via
3125 one of the packages @code{calrsfs} and @code{mathrsfs}.")
3126 (license (license:fsf-free "http://mirrors.ctan.org/fonts/rsfs/README"))))
3127
3128 (define-public texlive-latex-eso-pic
3129 (package
3130 (name "texlive-latex-eso-pic")
3131 (version (number->string %texlive-revision))
3132 (source (origin
3133 (method svn-fetch)
3134 (uri (texlive-ref "latex" "eso-pic"))
3135 (file-name (string-append name "-" version "-checkout"))
3136 (sha256
3137 (base32
3138 "1xvmms28mvvfpks9x7lfya2xhh5k8jy3qnlih1mzcnf156xnb89z"))))
3139 (build-system texlive-build-system)
3140 (arguments '(#:tex-directory "latex/eso-pic"))
3141 (home-page "https://www.ctan.org/pkg/eso-pic")
3142 (synopsis "Add picture commands (or backgrounds) to every page")
3143 (description
3144 "The package adds one or more user commands to LaTeX's @code{shipout}
3145 routine, which may be used to place the output at fixed positions. The
3146 @code{grid} option may be used to find the correct places.")
3147 (license license:lppl1.3+)))
3148
3149 (define-public texlive-latex-eepic
3150 (package
3151 (name "texlive-latex-eepic")
3152 (version (number->string %texlive-revision))
3153 (source (origin
3154 (method svn-fetch)
3155 (uri (svn-reference
3156 (url (string-append "svn://www.tug.org/texlive/tags/"
3157 %texlive-tag "/Master/texmf-dist/"
3158 "/tex/latex/eepic"))
3159 (revision %texlive-revision)))
3160 (file-name (string-append name "-" version "-checkout"))
3161 (sha256
3162 (base32
3163 "1c68gvh021pvybg07apsd2xhq2ljbg80kq94wh71drdga3c2zqjw"))))
3164 (build-system trivial-build-system)
3165 (arguments
3166 `(#:modules ((guix build utils))
3167 #:builder
3168 (begin
3169 (use-modules (guix build utils))
3170 (let ((target (string-append (assoc-ref %outputs "out")
3171 "/share/texmf-dist/tex/latex/eepic")))
3172 (mkdir-p target)
3173 (copy-recursively (assoc-ref %build-inputs "source") target)
3174 #t))))
3175 (home-page "https://www.ctan.org/pkg/eepic")
3176 (synopsis "Extensions to epic and the LaTeX drawing tools")
3177 (description
3178 "Extensions to @code{epic} and the LaTeX picture drawing environment,
3179 include the drawing of lines at any slope, the drawing of circles in any
3180 radii, and the drawing of dotted and dashed lines much faster with much less
3181 TeX memory, and providing several new commands for drawing ellipses, arcs,
3182 splines, and filled circles and ellipses. The package uses @code{tpic}
3183 @code{\\special} commands.")
3184 (license license:public-domain)))
3185
3186 (define-public texlive-latex-enumitem
3187 (package
3188 (name "texlive-latex-enumitem")
3189 (version (number->string %texlive-revision))
3190 (source (origin
3191 (method svn-fetch)
3192 (uri (svn-reference
3193 (url (string-append "svn://www.tug.org/texlive/tags/"
3194 %texlive-tag "/Master/texmf-dist/"
3195 "/tex/latex/enumitem"))
3196 (revision %texlive-revision)))
3197 (file-name (string-append name "-" version "-checkout"))
3198 (sha256
3199 (base32
3200 "0q24b1bkdi9l6bw787bpggww83jh2vj8955aw2m5yccqbx4vgr5r"))))
3201 (build-system trivial-build-system)
3202 (arguments
3203 `(#:modules ((guix build utils))
3204 #:builder
3205 (begin
3206 (use-modules (guix build utils))
3207 (let ((target (string-append (assoc-ref %outputs "out")
3208 "/share/texmf-dist/tex/latex/enumitem")))
3209 (mkdir-p target)
3210 (copy-recursively (assoc-ref %build-inputs "source") target)
3211 #t))))
3212 (home-page "https://www.ctan.org/pkg/enumitem")
3213 (synopsis "Customize basic list environments")
3214 (description
3215 "This package is intended to ease customizing the three basic list
3216 environments: @code{enumerate}, @code{itemize} and @code{description}. It
3217 extends their syntax to allow an optional argument where a set of parameters
3218 in the form @code{key=value} are available, for example:
3219 @code{\\begin{itemize}[itemsep=1ex,leftmargin=1cm]}.")
3220 (license license:lppl1.3+)))
3221
3222 (define-public texlive-latex-multirow
3223 (package
3224 (name "texlive-latex-multirow")
3225 (version (number->string %texlive-revision))
3226 (source (origin
3227 (method svn-fetch)
3228 (uri (texlive-ref "latex" "multirow"))
3229 (file-name (string-append name "-" version "-checkout"))
3230 (sha256
3231 (base32
3232 "0qlxy47f1f8plgch3jqfsnrdgpyz20sz46yp33i2jwvf9hvfczf0"))))
3233 (build-system texlive-build-system)
3234 (arguments '(#:tex-directory "latex/multirow"))
3235 (home-page "https://www.ctan.org/pkg/multirow")
3236 (synopsis "Create tabular cells spanning multiple rows")
3237 (description
3238 "The package provides tools for creating tabular cells spanning multiple
3239 rows. It has a lot of flexibility, including an option for specifying an
3240 entry at the \"natural\" width of its text.")
3241 (license license:lppl1.3+)))
3242
3243 (define-public texlive-latex-overpic
3244 (package
3245 (name "texlive-latex-overpic")
3246 (version (number->string %texlive-revision))
3247 (source (origin
3248 (method svn-fetch)
3249 (uri (svn-reference
3250 (url (string-append "svn://www.tug.org/texlive/tags/"
3251 %texlive-tag "/Master/texmf-dist/"
3252 "/tex/latex/overpic"))
3253 (revision %texlive-revision)))
3254 (file-name (string-append name "-" version "-checkout"))
3255 (sha256
3256 (base32
3257 "0m29q9qdb00558b7g2i7iw6w62n5s46yx81j8m99qkv77magk4fm"))))
3258 (build-system trivial-build-system)
3259 (arguments
3260 `(#:modules ((guix build utils))
3261 #:builder
3262 (begin
3263 (use-modules (guix build utils))
3264 (let ((target (string-append (assoc-ref %outputs "out")
3265 "/share/texmf-dist/tex/latex/overpic")))
3266 (mkdir-p target)
3267 (copy-recursively (assoc-ref %build-inputs "source") target)
3268 #t))))
3269 (home-page "https://www.ctan.org/pkg/overpic")
3270 (synopsis "Combine LaTeX commands over included graphics")
3271 (description
3272 "The @code{overpic} environment is a cross between the LaTeX
3273 @code{picture} environment and the @code{\\includegraphics} command of
3274 @code{graphicx}. The resulting picture environment has the same dimensions as
3275 the included graphic. LaTeX commands can be placed on the graphic at defined
3276 positions; a grid for orientation is available.")
3277 (license license:lppl1.0+)))
3278
3279 (define-public texlive-latex-parskip
3280 (package
3281 (name "texlive-latex-parskip")
3282 (version (number->string %texlive-revision))
3283 (source (origin
3284 (method svn-fetch)
3285 (uri (svn-reference
3286 (url (string-append "svn://www.tug.org/texlive/tags/"
3287 %texlive-tag "/Master/texmf-dist/"
3288 "/tex/latex/parskip"))
3289 (revision %texlive-revision)))
3290 (file-name (string-append name "-" version "-checkout"))
3291 (sha256
3292 (base32
3293 "14r6h9hqb0qgccxj5l1208694fx8sb8avmgzps36lsbbpszl7i7m"))))
3294 (build-system trivial-build-system)
3295 (arguments
3296 `(#:modules ((guix build utils))
3297 #:builder
3298 (begin
3299 (use-modules (guix build utils))
3300 (let ((target (string-append (assoc-ref %outputs "out")
3301 "/share/texmf-dist/tex/latex/parskip")))
3302 (mkdir-p target)
3303 (copy-recursively (assoc-ref %build-inputs "source") target)
3304 #t))))
3305 (home-page "https://www.ctan.org/pkg/parskip")
3306 (synopsis "Layout with zero \\parindent, non-zero \\parskip")
3307 (description
3308 "Simply changing @code{\\parskip} and @code{\\parindent} leaves a layout
3309 that is untidy; this package (though it is no substitute for a properly
3310 designed class) helps alleviate this untidiness.")
3311 (license license:lppl)))
3312
3313 (define-public texlive-latex-pdfpages
3314 (package
3315 (name "texlive-latex-pdfpages")
3316 (version (number->string %texlive-revision))
3317 (source (origin
3318 (method svn-fetch)
3319 (uri (texlive-ref "latex" "pdfpages"))
3320 (file-name (string-append name "-" version "-checkout"))
3321 (sha256
3322 (base32
3323 "06p5smfq66559ppdnmkl3hp8534x84ywbscimsiir4gllpya3i9h"))))
3324 (build-system texlive-build-system)
3325 (arguments '(#:tex-directory "latex/pdfpages"))
3326 (home-page "https://www.ctan.org/pkg/pdfpages")
3327 (synopsis "Include PDF documents in LaTeX")
3328 (description
3329 "This package simplifies the inclusion of external multi-page PDF
3330 documents in LaTeX documents. Pages may be freely selected and it is possible
3331 to put several logical pages onto each sheet of paper. Furthermore a lot of
3332 hypertext features like hyperlinks and article threads are provided. The
3333 package supports pdfTeX (pdfLaTeX) and VTeX. With VTeX it is even possible to
3334 use this package to insert PostScript files, in addition to PDF files.")
3335 (license license:lppl1.3+)))
3336
3337 (define-public texlive-fonts-stmaryrd
3338 (package
3339 (name "texlive-fonts-stmaryrd")
3340 (version (number->string %texlive-revision))
3341 (source (origin
3342 (method svn-fetch)
3343 (uri (texlive-ref "fonts" "stmaryrd"))
3344 (file-name (string-append name "-" version "-checkout"))
3345 (sha256
3346 (base32
3347 "08pn4ca3vl6qm9l3wm5h5iyjsrg411kkm1yana329xwg2j14s9n6"))))
3348 (build-system texlive-build-system)
3349 (arguments
3350 '(#:tex-directory "latex/stmaryrd"
3351 #:phases
3352 (modify-phases %standard-phases
3353 (add-after 'configure 'patch-ins
3354 (lambda _
3355 (substitute* "stmaryrd.ins"
3356 (("^%% LaTeX2e.*") "\\input docstrip\n")
3357 (("fontdef\\}\\}" line)
3358 (string-append line "\n\\endbatchfile")))
3359 #t)))))
3360 (home-page "https://www.ctan.org/pkg/stmaryrd")
3361 (synopsis "St Mary Road symbols for theoretical computer science")
3362 (description
3363 "The fonts were originally distributed as Metafont sources only, but
3364 Adobe Type 1 versions are also now available. Macro support is provided for
3365 use under LaTeX; the package supports the @code{only} option (provided by the
3366 @code{somedefs} package) to restrict what is loaded, for those who don't need
3367 the whole font.")
3368 (license license:lppl)))
3369
3370 (define-public texlive-latex-subfigure
3371 (package
3372 (name "texlive-latex-subfigure")
3373 (version (number->string %texlive-revision))
3374 (source (origin
3375 (method svn-fetch)
3376 (uri (texlive-ref "latex" "subfigure"))
3377 (file-name (string-append name "-" version "-checkout"))
3378 (sha256
3379 (base32
3380 "15spcl5wb7w269qd6y596vp4yi8sa5ppcx8w4z2i9kyp02r3a0yb"))))
3381 (build-system texlive-build-system)
3382 (arguments '(#:tex-directory "latex/subfigure"))
3383 (home-page "https://www.ctan.org/pkg/subfigure")
3384 (synopsis "Figures divided into subfigures")
3385 (description
3386 "This (deprecated) package provides support for the manipulation and
3387 reference of small or \"sub\" figures and tables within a single figure or
3388 table environment. It is convenient to use this package when your subfigures
3389 are to be separately captioned, referenced, or are to be included in the
3390 List-of-Figures. A new @code{\\subfigure} command is introduced which can be
3391 used inside a figure environment for each subfigure. An optional first
3392 argument is used as the caption for that subfigure. The package is now
3393 considered obsolete: it was superseded by @code{subfig}, but users may find
3394 the more recent @code{subcaption} package more satisfactory.")
3395 (license license:lppl)))
3396
3397 (define-public texlive-latex-tabulary
3398 (package
3399 (name "texlive-latex-tabulary")
3400 (version (number->string %texlive-revision))
3401 (source (origin
3402 (method svn-fetch)
3403 (uri (texlive-ref "latex" "tabulary"))
3404 (file-name (string-append name "-" version "-checkout"))
3405 (sha256
3406 (base32
3407 "1adkdx2zkk42g82nqf57lv1nc1z7kwl13jmy8vpcsizsa0xdnx9n"))))
3408 (build-system texlive-build-system)
3409 (arguments '(#:tex-directory "latex/tabulary"))
3410 (home-page "https://www.ctan.org/pkg/tabulary")
3411 (synopsis "Tabular with variable width columns balanced")
3412 (description
3413 "The package defines a @code{tabular*}-like environment, @code{tabulary},
3414 taking a \"total width\" argument as well as the column specifications. The
3415 environment uses column types @code{L}, @code{C}, @code{R} and @code{J} for
3416 variable width columns (@code{\\raggedright}, @code{\\centering},
3417 @code{\\raggedleft}, and normally justified). In contrast to
3418 @code{tabularx}'s @code{X} columns, the width of each column is weighted
3419 according to the natural width of the widest cell in the column.")
3420 (license license:lppl)))
3421
3422 (define-public texlive-latex-threeparttable
3423 (package
3424 (name "texlive-latex-threeparttable")
3425 (version (number->string %texlive-revision))
3426 (source (origin
3427 (method svn-fetch)
3428 (uri (svn-reference
3429 (url (string-append "svn://www.tug.org/texlive/tags/"
3430 %texlive-tag "/Master/texmf-dist/"
3431 "/tex/latex/threeparttable"))
3432 (revision %texlive-revision)))
3433 (file-name (string-append name "-" version "-checkout"))
3434 (sha256
3435 (base32
3436 "10vy9k150w2lviw8h22s2mcykff38xci653m5823s2vv44pwbmzq"))))
3437 (build-system trivial-build-system)
3438 (arguments
3439 `(#:modules ((guix build utils))
3440 #:builder
3441 (begin
3442 (use-modules (guix build utils))
3443 (let ((target (string-append (assoc-ref %outputs "out")
3444 "/share/texmf-dist/tex/latex/threeparttable")))
3445 (mkdir-p target)
3446 (copy-recursively (assoc-ref %build-inputs "source") target)
3447 #t))))
3448 (home-page "https://www.ctan.org/pkg/threeparttable")
3449 (synopsis "Tables with captions and notes all the same width")
3450 (description
3451 "This package facilitates tables with titles (captions) and notes. The
3452 title and notes are given a width equal to the body of the table (a
3453 @code{tabular} environment). By itself, a @code{threeparttable} does not
3454 float, but you can put it in a @code{table} or a @code{table*} or some other
3455 environment.")
3456 (license (license:fsf-free "file://threeparttable.sty"))))
3457
3458 (define-public texlive-fonts-txfonts
3459 (package
3460 (name "texlive-fonts-txfonts")
3461 (version (number->string %texlive-revision))
3462 (source (origin
3463 (method svn-fetch)
3464 (uri (svn-reference
3465 (url (string-append "svn://www.tug.org/texlive/tags/"
3466 %texlive-tag "/Master/texmf-dist/"
3467 "/tex/latex/txfonts"))
3468 (revision %texlive-revision)))
3469 (file-name (string-append name "-" version "-checkout"))
3470 (sha256
3471 (base32
3472 "0jl921qdphg8i7bkfprackn3xd4gmvxckc526nmzqsmahqkavgg2"))))
3473 (build-system trivial-build-system)
3474 (arguments
3475 `(#:modules ((guix build utils)
3476 (ice-9 match))
3477 #:builder
3478 (begin
3479 (use-modules (guix build utils)
3480 (ice-9 match))
3481 (let ((root (string-append (assoc-ref %outputs "out")
3482 "/share/texmf-dist/"))
3483 (pkgs '(("source" . "tex/latex/txfonts")
3484 ("txfonts-vf" . "fonts/tfm/public/txfonts")
3485 ("txfonts-afm" . "fonts/afm/public/txfonts")
3486 ("txfonts-tfm" . "fonts/tfm/public/txfonts")
3487 ("txfonts-type1" . "fonts/type1/public/txfonts")
3488 ("txfonts-enc" . "fonts/enc/dvips/txfonts")
3489 ("txfonts-map" . "fonts/map/dvips/txfonts"))))
3490 (for-each (match-lambda
3491 ((pkg . dir)
3492 (let ((target (string-append root dir)))
3493 (mkdir-p target)
3494 (copy-recursively (assoc-ref %build-inputs pkg)
3495 target))))
3496 pkgs)
3497 #t))))
3498 (native-inputs
3499 `(("txfonts-tfm"
3500 ,(origin
3501 (method svn-fetch)
3502 (uri (svn-reference
3503 (url (string-append "svn://www.tug.org/texlive/tags/"
3504 %texlive-tag "/Master/texmf-dist/"
3505 "/fonts/tfm/public/txfonts"))
3506 (revision %texlive-revision)))
3507 (file-name (string-append name "-tfm-" version "-checkout"))
3508 (sha256
3509 (base32
3510 "12ffmbrp48ap35qa3b4mi6ckif9q2vf7972jxh5dc1yzykhla2xv"))))
3511 ("txfonts-vf"
3512 ,(origin
3513 (method svn-fetch)
3514 (uri (svn-reference
3515 (url (string-append "svn://www.tug.org/texlive/tags/"
3516 %texlive-tag "/Master/texmf-dist/"
3517 "/fonts/vf/public/txfonts"))
3518 (revision %texlive-revision)))
3519 (file-name (string-append name "-vf-" version "-checkout"))
3520 (sha256
3521 (base32
3522 "04acyfdwvxpfx4l2xh2bpzdmpvwdf2pzbs7a236b0xckz2jvc1ci"))))
3523 ("txfonts-afm"
3524 ,(origin
3525 (method svn-fetch)
3526 (uri (svn-reference
3527 (url (string-append "svn://www.tug.org/texlive/tags/"
3528 %texlive-tag "/Master/texmf-dist/"
3529 "/fonts/afm/public/txfonts"))
3530 (revision %texlive-revision)))
3531 (file-name (string-append name "-afm-" version "-checkout"))
3532 (sha256
3533 (base32
3534 "1705klz51pnqzcs89s3521b84b6c89wlczflsh0vci66nl155yis"))))
3535 ("txfonts-type1"
3536 ,(origin
3537 (method svn-fetch)
3538 (uri (svn-reference
3539 (url (string-append "svn://www.tug.org/texlive/tags/"
3540 %texlive-tag "/Master/texmf-dist/"
3541 "/fonts/type1/public/txfonts"))
3542 (revision %texlive-revision)))
3543 (file-name (string-append name "-type1-" version "-checkout"))
3544 (sha256
3545 (base32
3546 "0ajwr7zb6ch3gxd0g8p2i4llhy2wr9a9saz6jq6hm6fxf4pgl5h3"))))
3547 ("txfonts-map"
3548 ,(origin
3549 (method svn-fetch)
3550 (uri (svn-reference
3551 (url (string-append "svn://www.tug.org/texlive/tags/"
3552 %texlive-tag "/Master/texmf-dist/"
3553 "/fonts/map/dvips/txfonts"))
3554 (revision %texlive-revision)))
3555 (file-name (string-append name "-map-" version "-checkout"))
3556 (sha256
3557 (base32
3558 "0kamr8a9x24jakas3v09dgv7kkpybj3i7qv4vz1iyypqr6kk1raj"))))
3559 ("txfonts-enc"
3560 ,(origin
3561 (method svn-fetch)
3562 (uri (svn-reference
3563 (url (string-append "svn://www.tug.org/texlive/tags/"
3564 %texlive-tag "/Master/texmf-dist/"
3565 "/fonts/enc/dvips/txfonts"))
3566 (revision %texlive-revision)))
3567 (file-name (string-append name "-enc-" version "-checkout"))
3568 (sha256
3569 (base32
3570 "1bal5fhw0xlhl37ayv8vlnqnsn1y82kadzfjhbgr223blspp4zsj"))))))
3571 (home-page "https://www.ctan.org/pkg/threeparttable")
3572 (synopsis "Times-like fonts in support of mathematics")
3573 (description
3574 "Txfonts supplies virtual text roman fonts using Adobe Times (or URW
3575 NimbusRomNo9L) with some modified and additional text symbols in the OT1, T1,
3576 and TS1 encodings; maths alphabets using Times/URW Nimbus; maths fonts
3577 providing all the symbols of the Computer Modern and AMS fonts, including all
3578 the Greek capital letters from CMR; and additional maths fonts of various
3579 other symbols.
3580
3581 The set is complemented by a sans-serif set of text fonts, based on
3582 Helvetica/NimbusSanL, and a monospace set.
3583
3584 All the fonts are in Type 1 format (AFM and PFB files), and are supported by
3585 TeX metrics (VF and TFM files) and macros for use with LaTeX.")
3586 ;; Any version of the GPL with font exception.
3587 (license license:gpl3+)))
3588
3589 (define-public texlive-fonts-iwona
3590 (package
3591 (name "texlive-fonts-iwona")
3592 (version "0.995b")
3593 (source (origin
3594 (method url-fetch)
3595 (uri (string-append "http://jmn.pl/pliki/Iwona-tex-"
3596 (string-map (lambda (c)
3597 (if (char=? c #\.)
3598 #\_ c))
3599 version)
3600 ".zip"))
3601 (sha256
3602 (base32
3603 "13684iqx5granpc5rfvqnmyvdpgpbr1x9y7i7y7bcaq0qxv7ph1x"))))
3604 (build-system trivial-build-system)
3605 (arguments
3606 `(#:modules ((guix build utils))
3607 #:builder
3608 (begin
3609 (use-modules (guix build utils))
3610 (let ((target (string-append (assoc-ref %outputs "out")
3611 "/share/texmf-dist/"))
3612 (unzip (string-append (assoc-ref %build-inputs "unzip")
3613 "/bin/unzip")))
3614 (invoke unzip (assoc-ref %build-inputs "source"))
3615 (mkdir-p target)
3616 (copy-recursively "iwona" target)
3617 #t))))
3618 (native-inputs
3619 `(("unzip" ,unzip)))
3620 (home-page "http://jmn.pl/en/kurier-i-iwona/")
3621 (synopsis "Sans-serif typeface for TeX")
3622 (description "Iwona is a two-element sans-serif typeface. It was created
3623 as an alternative version of the Kurier typeface, which was designed in 1975
3624 for a diploma in typeface design at the Warsaw Academy of Fine Arts under the
3625 supervision of Roman Tomaszewski. Kurier was designed for linotype
3626 typesetting of newspapers and similar periodicals. The Iwona fonts are an
3627 alternative version of the Kurier fonts. The difference lies in the absence
3628 of ink traps which typify the Kurier font.")
3629 (license license:gfl1.0)))
3630
3631 (define-public texlive-latex-titlesec
3632 (package
3633 (name "texlive-latex-titlesec")
3634 (version (number->string %texlive-revision))
3635 (source (origin
3636 (method svn-fetch)
3637 (uri (svn-reference
3638 (url (string-append "svn://www.tug.org/texlive/tags/"
3639 %texlive-tag "/Master/texmf-dist/"
3640 "/tex/latex/titlesec"))
3641 (revision %texlive-revision)))
3642 (file-name (string-append name "-" version "-checkout"))
3643 (sha256
3644 (base32
3645 "04nmkhqx6jxcxx9a30zbcd5smxi5fd0cbp132bki7fnvhspnhg21"))))
3646 (build-system trivial-build-system)
3647 (arguments
3648 `(#:modules ((guix build utils))
3649 #:builder
3650 (begin
3651 (use-modules (guix build utils))
3652 (let ((target (string-append (assoc-ref %outputs "out")
3653 "/share/texmf-dist/tex/latex/titlesec")))
3654 (mkdir-p target)
3655 (copy-recursively (assoc-ref %build-inputs "source") target)
3656 #t))))
3657 (home-page "https://www.ctan.org/pkg/titlesec")
3658 (synopsis "Select alternative section titles")
3659 (description
3660 "This package provides an interface to sectioning commands for selection
3661 from various title styles, e.g. for marginal titles and to change the font of
3662 all headings with a single command, also providing simple one-step page
3663 styles. It also includes a package to change the page styles when there are
3664 floats in a page. You may assign headers/footers to individual floats, too.")
3665 (license license:lppl)))
3666
3667 (define-public texlive-latex-type1cm
3668 (package
3669 (name "texlive-latex-type1cm")
3670 (version (number->string %texlive-revision))
3671 (source (origin
3672 (method svn-fetch)
3673 (uri (texlive-ref "latex" "type1cm"))
3674 (file-name (string-append name "-" version "-checkout"))
3675 (sha256
3676 (base32
3677 "1lvxrqfwcwa4p31zyfm80gr05v8c28xybv5ri79zi2ngz6834z12"))))
3678 (build-system texlive-build-system)
3679 (arguments '(#:tex-directory "latex/type1cm"))
3680 (home-page "https://www.ctan.org/pkg/type1cm")
3681 (synopsis "Arbitrary size font selection in LaTeX")
3682 (description
3683 "LaTeX, by default, restricts the sizes at which you can use its default
3684 computer modern fonts, to a fixed set of discrete sizes (effectively, a set
3685 specified by Knuth). The @code{type1cm} package removes this restriction;
3686 this is particularly useful when using scalable versions of the CM
3687 fonts (Bakoma, or the versions from BSR/Y&Y, or True Type versions from Kinch,
3688 PCTeX, etc.). In fact, since modern distributions will automatically generate
3689 any bitmap font you might need, @code{type1cm} has wider application than just
3690 those using scalable versions of the fonts. Note that the LaTeX distribution
3691 now contains a package @code{fix-cm},f which performs the task of
3692 @code{type1cm}, as well as doing the same job for T1- and TS1-encoded
3693 @code{ec} fonts.")
3694 (license license:lppl)))
3695
3696 (define-public texlive-latex-lh
3697 (package
3698 (name "texlive-latex-lh")
3699 (version (number->string %texlive-revision))
3700 (source (origin
3701 (method svn-fetch)
3702 (uri (texlive-ref "latex" "lh"))
3703 (file-name (string-append name "-" version "-checkout"))
3704 (sha256
3705 (base32
3706 "00gdiwh3sfhh1iimjhpja7lm7k4vzqzql2irgwnpz94qvh25zwi5"))))
3707 (build-system texlive-build-system)
3708 (arguments '(#:tex-directory "latex/lh"))
3709 (home-page "https://www.ctan.org/pkg/lh")
3710 (synopsis "Cyrillic fonts that support LaTeX standard encodings")
3711 (description
3712 "The LH fonts address the problem of the wide variety of alphabets that
3713 are written with Cyrillic-style characters. The fonts are the original basis
3714 of the set of T2* and X2 encodings that are now used when LaTeX users need to
3715 write in Cyrillic languages. Macro support in standard LaTeX encodings is
3716 offered through the latex-cyrillic and t2 bundles, and the package itself
3717 offers support for other (more traditional) encodings. The fonts, in the
3718 standard T2* and X2 encodings are available in Adobe Type 1 format, in the
3719 CM-Super family of fonts. The package also offers its own LaTeX support for
3720 OT2 encoded fonts, CM bright shaped fonts and Concrete shaped fonts.")
3721 (license license:lppl)))
3722
3723 (define-public texlive-metapost
3724 (package
3725 (name "texlive-metapost")
3726 (version (number->string %texlive-revision))
3727 (source (origin
3728 (method svn-fetch)
3729 (uri (svn-reference
3730 (url (string-append "svn://www.tug.org/texlive/tags/"
3731 %texlive-tag "/Master/texmf-dist/"
3732 "/metapost"))
3733 (revision %texlive-revision)))
3734 (file-name (string-append name "-" version "-checkout"))
3735 (sha256
3736 (base32
3737 "03nvjddffiz796wll6axzmgfvynyciy2mqamv20qx252w71vwkwd"))))
3738 (build-system trivial-build-system)
3739 (arguments
3740 `(#:modules ((guix build utils))
3741 #:builder
3742 (begin
3743 (use-modules (guix build utils))
3744 (let ((target (string-append (assoc-ref %outputs "out")
3745 "/share/texmf-dist/metapost")))
3746 (mkdir-p target)
3747 (copy-recursively (assoc-ref %build-inputs "source") target)
3748 #t))))
3749 (home-page "https://www.ctan.org/pkg/metapost")
3750 (synopsis "Create scalable illustrations")
3751 (description
3752 "MetaPost uses a language based on that of Metafont to produce precise
3753 technical illustrations. Its output is scalable PostScript or SVG, rather
3754 than the bitmaps Metafont creates.")
3755 (license license:lppl)))
3756
3757 (define-public texlive-latex-acmart
3758 (package
3759 (name "texlive-latex-acmart")
3760 (version "1.45")
3761 (source (origin
3762 (method svn-fetch)
3763 (uri (texlive-ref "latex" "acmart"))
3764 (sha256
3765 (base32
3766 "10zs8ga88ksypv1v4p6mynmfa7749q2hgxlr4shnwfjd9wrb421q"))
3767 (file-name (string-append name "-" version "-checkout"))))
3768 (build-system texlive-build-system)
3769 (arguments '(#:tex-directory "latex/acmart"))
3770 (home-page "https://www.ctan.org/pkg/acmart")
3771 (synopsis "Class for typesetting publications of ACM")
3772 (description
3773 "This package provides a class for typesetting publications of the
3774 Association for Computing Machinery (ACM).")
3775 (license license:lppl1.3+)))
3776
3777 (define-public texlive-latex-varwidth
3778 (package
3779 (name "texlive-latex-varwidth")
3780 (version (number->string %texlive-revision))
3781 (source (origin
3782 (method svn-fetch)
3783 (uri (svn-reference
3784 (url (string-append "svn://www.tug.org/texlive/tags/"
3785 %texlive-tag "/Master/texmf-dist/"
3786 "/tex/latex/varwidth"))
3787 (revision %texlive-revision)))
3788 (file-name (string-append name "-" version "-checkout"))
3789 (sha256
3790 (base32
3791 "1bmz9ap0ffyg7qry2xi7lki06qx4809w028xvk88cl66h7p46g52"))))
3792 (build-system trivial-build-system)
3793 (arguments
3794 `(#:modules ((guix build utils))
3795 #:builder
3796 (begin
3797 (use-modules (guix build utils))
3798 (let ((target (string-append (assoc-ref %outputs "out")
3799 "/share/texmf-dist/tex/latex/varwidth")))
3800 (mkdir-p target)
3801 (copy-recursively (assoc-ref %build-inputs "source") target)
3802 #t))))
3803 (home-page "https://www.ctan.org/pkg/varwidth")
3804 (synopsis "Variable-width minipage")
3805 (description
3806 "The @code{varwidth} environment is superficially similar to
3807 @code{minipage}, but the specified width is just a maximum value — the box may
3808 get a narrower “natural” width.")
3809 (license license:lppl)))
3810
3811 (define-public texlive-latex-wasysym
3812 (package
3813 (name "texlive-latex-wasysym")
3814 (version (number->string %texlive-revision))
3815 (source (origin
3816 (method svn-fetch)
3817 (uri (texlive-ref "latex" "wasysym"))
3818 (file-name (string-append name "-" version "-checkout"))
3819 (sha256
3820 (base32
3821 "1sgwbfwjjf70g54hh93gsd9jp9nm67w6n74x9d72a56n07jbk5hv"))))
3822 (build-system texlive-build-system)
3823 (arguments '(#:tex-directory "latex/wasysym"))
3824 (home-page "https://www.ctan.org/pkg/wasysym")
3825 (synopsis "LaTeX support file to use the WASY2 fonts")
3826 (description
3827 "The wasy2WASY2 (Waldi Symbol) font by Roland Waldi provides many glyphs
3828 like male and female symbols and astronomical symbols, as well as the complete
3829 lasy font set and other odds and ends. The wasysym package implements an easy
3830 to use interface for these symbols.")
3831 (license license:lppl)))
3832
3833 (define-public texlive-latex-wrapfig
3834 (package
3835 (name "texlive-latex-wrapfig")
3836 (version (number->string %texlive-revision))
3837 (source (origin
3838 (method svn-fetch)
3839 (uri (svn-reference
3840 (url (string-append "svn://www.tug.org/texlive/tags/"
3841 %texlive-tag "/Master/texmf-dist/"
3842 "/tex/latex/wrapfig"))
3843 (revision %texlive-revision)))
3844 (file-name (string-append name "-" version "-checkout"))
3845 (sha256
3846 (base32
3847 "16xpyl0csmmwndz1xhzqfg9l0zcsnqxslsixsqkwd4zsvfj30sv4"))))
3848 (build-system trivial-build-system)
3849 (arguments
3850 `(#:modules ((guix build utils))
3851 #:builder
3852 (begin
3853 (use-modules (guix build utils))
3854 (let ((target (string-append (assoc-ref %outputs "out")
3855 "/share/texmf-dist/tex/latex/wrapfig")))
3856 (mkdir-p target)
3857 (copy-recursively (assoc-ref %build-inputs "source") target)
3858 #t))))
3859 (home-page "https://www.ctan.org/pkg/wrapfig")
3860 (synopsis "Produces figures which text can flow around")
3861 (description
3862 "This package allows figures or tables to have text wrapped around them.
3863 It does not work in combination with list environments, but can be used in a
3864 @code{parbox} or @code{minipage}, and in two-column format.")
3865 (license license:lppl)))
3866
3867 (define-public texlive-latex-ucs
3868 (package
3869 (name "texlive-latex-ucs")
3870 (version (number->string %texlive-revision))
3871 (source (origin
3872 (method svn-fetch)
3873 (uri (svn-reference
3874 (url (string-append "svn://www.tug.org/texlive/tags/"
3875 %texlive-tag "/Master/texmf-dist/"
3876 "/tex/latex/ucs"))
3877 (revision %texlive-revision)))
3878 (file-name (string-append name "-" version "-checkout"))
3879 (sha256
3880 (base32
3881 "0rrxwi60wmz5dfjifl4fwk66plf7wix85qnhfv4ylvmj6qi6hw37"))))
3882 (build-system trivial-build-system)
3883 (arguments
3884 `(#:modules ((guix build utils))
3885 #:builder
3886 (begin
3887 (use-modules (guix build utils))
3888 (let ((target (string-append (assoc-ref %outputs "out")
3889 "/share/texmf-dist/tex/latex/ucs")))
3890 (mkdir-p target)
3891 (copy-recursively (assoc-ref %build-inputs "source") target)
3892 #t))))
3893 (home-page "https://www.ctan.org/pkg/ucs")
3894 (synopsis "Extended UTF-8 input encoding support for LaTeX")
3895 (description
3896 "The bundle provides the @code{ucs} package, and @code{utf8x.def},
3897 together with a large number of support files. The @code{utf8x.def}
3898 definition file for use with @code{inputenc} covers a wider range of Unicode
3899 characters than does @code{utf8.def} in the LaTeX distribution. The package
3900 provides facilities for efficient use of its large sets of Unicode characters.
3901 Glyph production may be controlled by various options, which permits use of
3902 non-ASCII characters when coding mathematical formulae. Note that the bundle
3903 previously had an alias “unicode”; that alias has now been withdrawn, and no
3904 package of that name now exists.")
3905 (license license:lppl1.3+)))
3906
3907 (define-public texlive-latex-preview
3908 (package
3909 (name "texlive-latex-preview")
3910 (version (number->string %texlive-revision))
3911 (source (origin
3912 (method svn-fetch)
3913 (uri (texlive-ref "latex" "preview"))
3914 (file-name (string-append name "-" version "-checkout"))
3915 (sha256
3916 (base32
3917 "0j6fff6q0ca96nwfdgay2jm55792z4q9aa0rczmiw2qccyg5n2dv"))))
3918 (build-system texlive-build-system)
3919 (arguments
3920 '(#:tex-directory "latex/preview"
3921 #:phases
3922 (modify-phases %standard-phases
3923 (add-after 'unpack 'remove-generated-file
3924 (lambda _
3925 (delete-file "preview.drv")
3926 #t)))))
3927 (home-page "https://www.ctan.org/pkg/preview")
3928 (synopsis "Extract bits of a LaTeX source for output")
3929 (description
3930 "The main purpose of the preview package is the extraction of selected
3931 elements from a LaTeX source, like formulas or graphics, into separate
3932 pages of a DVI file. A flexible and convenient interface allows it to
3933 specify what commands and constructs should be extracted. This works
3934 with DVI files postprocessed by either Dvips and Ghostscript or
3935 dvipng, but it also works when you are using PDFTeX for generating PDF
3936 files.")
3937 (license license:gpl3+)))
3938
3939 (define-public texlive-latex-acronym
3940 (package
3941 (name "texlive-latex-acronym")
3942 (version (number->string %texlive-revision))
3943 (source (origin
3944 (method svn-fetch)
3945 (uri (texlive-ref "latex" "acronym"))
3946 (file-name (string-append name "-" version "-checkout"))
3947 (sha256
3948 (base32
3949 "0jmasg40bk53zdd2jc8nc18jvdai3p2wmamy7hwli8gls4nf25qp"))))
3950 (build-system texlive-build-system)
3951 (arguments '(#:tex-directory "latex/acronym"))
3952 (home-page "https://www.ctan.org/pkg/acronym")
3953 (synopsis "Expand acronyms at least once")
3954 (description
3955 "This package ensures that all acronyms used in the text are spelled out
3956 in full at least once. It also provides an environment to build a list of
3957 acronyms used. The package is compatible with PDF bookmarks. The package
3958 requires the suffix package, which in turn requires that it runs under
3959 e-TeX.")
3960 (license license:lppl1.3+)))
3961
3962 (define-public texlive-generic-pdftex
3963 (package
3964 (name "texlive-generic-pdftex")
3965 (version (number->string %texlive-revision))
3966 (source (origin
3967 (method svn-fetch)
3968 (uri (svn-reference
3969 (url (string-append "svn://www.tug.org/texlive/tags/"
3970 %texlive-tag "/Master/texmf-dist/"
3971 "/tex/generic/pdftex"))
3972 (revision %texlive-revision)))
3973 (file-name (string-append name "-" version "-checkout"))
3974 (sha256
3975 (base32
3976 "0k68zmqzs4qvrqxdwsrawbjb14hxqjfamq649azvai0jjxdpkljd"))))
3977 (build-system trivial-build-system)
3978 (arguments
3979 `(#:modules ((guix build utils))
3980 #:builder
3981 (begin
3982 (use-modules (guix build utils))
3983 (let ((target (string-append (assoc-ref %outputs "out")
3984 "/share/texmf-dist/tex/generic/pdftex")))
3985 (mkdir-p target)
3986 (copy-recursively (assoc-ref %build-inputs "source") target)
3987 #t))))
3988 (home-page "https://www.ctan.org/pkg/pdftex")
3989 (synopsis "TeX extension for direct creation of PDF")
3990 (description
3991 "This package provides an extension of TeX which can be configured to
3992 directly generate PDF documents instead of DVI.")
3993 (license license:gpl2+)))
3994
3995 (define texlive-texmf
3996 (package
3997 (name "texlive-texmf")
3998 (version "2017")
3999 (source texlive-texmf-src)
4000 (build-system gnu-build-system)
4001 (inputs
4002 `(("texlive-bin" ,texlive-bin)
4003 ("lua" ,lua)
4004 ("perl" ,perl)
4005 ("python" ,python-2) ; incompatible with Python 3 (print syntax)
4006 ("ruby" ,ruby)
4007 ("tcsh" ,tcsh)))
4008 (arguments
4009 `(#:modules ((guix build gnu-build-system)
4010 (guix build utils)
4011 (srfi srfi-26))
4012
4013 ;; This package takes 4 GiB, which we can't afford to distribute from
4014 ;; our servers.
4015 #:substitutable? #f
4016
4017 #:phases
4018 (modify-phases (map (cut assq <> %standard-phases)
4019 '(set-paths unpack patch-source-shebangs))
4020 (add-after 'patch-source-shebangs 'install
4021 (lambda* (#:key outputs #:allow-other-keys)
4022 (let ((share (string-append (assoc-ref outputs "out") "/share")))
4023 (mkdir-p share)
4024 (invoke "mv" "texmf-dist" share))))
4025 (add-after 'install 'texmf-config
4026 (lambda* (#:key inputs outputs #:allow-other-keys)
4027 (let* ((out (assoc-ref outputs "out"))
4028 (share (string-append out "/share"))
4029 (texmfroot (string-append share "/texmf-dist/web2c"))
4030 (texmfcnf (string-append texmfroot "/texmf.cnf"))
4031 (texlive-bin (assoc-ref inputs "texlive-bin"))
4032 (texbin (string-append texlive-bin "/bin"))
4033 (tlpkg (string-append texlive-bin "/share/tlpkg")))
4034 ;; Register SHARE as TEXMFROOT in texmf.cnf.
4035 (substitute* texmfcnf
4036 (("TEXMFROOT = \\$SELFAUTOPARENT")
4037 (string-append "TEXMFROOT = " share))
4038 (("TEXMFLOCAL = \\$SELFAUTOGRANDPARENT/texmf-local")
4039 "TEXMFLOCAL = $SELFAUTODIR/share/texmf-local")
4040 (("!!\\$TEXMFLOCAL") "$TEXMFLOCAL"))
4041 ;; Register paths in texmfcnf.lua, needed for context.
4042 (substitute* (string-append texmfroot "/texmfcnf.lua")
4043 (("selfautodir:") out)
4044 (("selfautoparent:") (string-append share "/")))
4045 ;; Set path to TeXLive Perl modules
4046 (setenv "PERL5LIB"
4047 (string-append (getenv "PERL5LIB") ":" tlpkg))
4048 ;; Configure the texmf-dist tree; inspired from
4049 ;; http://slackbuilds.org/repository/13.37/office/texlive/
4050 (setenv "PATH" (string-append (getenv "PATH") ":" texbin))
4051 (setenv "TEXMFCNF" texmfroot)
4052 (invoke "updmap-sys" "--nohash" "--syncwithtrees")
4053 (invoke "mktexlsr")
4054 (invoke "fmtutil-sys" "--all")))))))
4055 (properties `((max-silent-time . 9600))) ; don't time out while grafting
4056 (synopsis "TeX Live, a package of the TeX typesetting system")
4057 (description
4058 "TeX Live provides a comprehensive TeX document production system.
4059 It includes all the major TeX-related programs, macro packages, and fonts
4060 that are free software, including support for many languages around the
4061 world.
4062
4063 This package contains the complete tree of texmf-dist data.")
4064 (license (license:fsf-free "https://www.tug.org/texlive/copying.html"))
4065 (home-page "https://www.tug.org/texlive/")))
4066
4067 (define-public texlive
4068 (package
4069 (name "texlive")
4070 (version "2017")
4071 (source #f)
4072 (build-system trivial-build-system)
4073 (inputs `(("bash" ,bash) ; for wrap-program
4074 ("texlive-bin" ,texlive-bin)
4075 ("texlive-texmf" ,texlive-texmf)))
4076 (native-search-paths
4077 (list (search-path-specification
4078 (variable "TEXMFLOCAL")
4079 (files '("share/texmf-local")))))
4080 (arguments
4081 `(#:modules ((guix build utils))
4082 #:builder
4083 ;; Build the union of texlive-bin and texlive-texmf, but take the
4084 ;; conflicting subdirectory share/texmf-dist from texlive-texmf.
4085 (begin
4086 (use-modules (guix build utils))
4087 (let ((out (assoc-ref %outputs "out"))
4088 (bin (assoc-ref %build-inputs "texlive-bin"))
4089 (texmf (assoc-ref %build-inputs "texlive-texmf"))
4090 (bash (assoc-ref %build-inputs "bash")))
4091 (mkdir out)
4092 (with-directory-excursion out
4093 (for-each
4094 (lambda (name)
4095 (symlink (string-append bin "/" name) name))
4096 '("include" "lib"))
4097 (mkdir "bin")
4098 (with-directory-excursion "bin"
4099 (setenv "PATH" (string-append bash "/bin"))
4100 (for-each
4101 (lambda (name)
4102 (symlink name (basename name))
4103 (wrap-program
4104 (basename name)
4105 `("TEXMFCNF" =
4106 (,(string-append texmf "/share/texmf-dist/web2c")))))
4107 (find-files (string-append bin "/bin/") "")))
4108 (mkdir "share")
4109 (with-directory-excursion "share"
4110 (for-each
4111 (lambda (name)
4112 (symlink (string-append bin "/share/" name) name))
4113 '("info" "man" "tlpkg"))
4114 (for-each
4115 (lambda (name)
4116 (symlink (string-append texmf "/share/" name) name))
4117 '("texmf-dist" "texmf-var"))))
4118 #t))))
4119 (synopsis "TeX Live, a package of the TeX typesetting system")
4120 (description
4121 "TeX Live provides a comprehensive TeX document production system.
4122 It includes all the major TeX-related programs, macro packages, and fonts
4123 that are free software, including support for many languages around the
4124 world.
4125
4126 This package contains the complete TeX Live distribution.")
4127 (license (license:fsf-free "https://www.tug.org/texlive/copying.html"))
4128 (home-page "https://www.tug.org/texlive/")))
4129
4130 (define-public perl-text-bibtex
4131 (package
4132 (name "perl-text-bibtex")
4133 (version "0.85")
4134 (source
4135 (origin
4136 (method url-fetch)
4137 (uri (string-append "mirror://cpan/authors/id/A/AM/AMBS/Text-BibTeX-"
4138 version ".tar.gz"))
4139 (sha256
4140 (base32
4141 "036kxgbn1jf70pfm2lmjlzjwnhbkd888fp5lyvmkjpdd15gla18h"))))
4142 (build-system perl-build-system)
4143 (arguments
4144 `(#:phases
4145 (modify-phases %standard-phases
4146 (add-after 'unpack 'add-output-directory-to-rpath
4147 (lambda* (#:key outputs #:allow-other-keys)
4148 (substitute* "inc/MyBuilder.pm"
4149 (("-Lbtparse" line)
4150 (string-append "-Wl,-rpath="
4151 (assoc-ref outputs "out") "/lib " line)))
4152 #t))
4153 (add-after 'unpack 'install-libraries-to-/lib
4154 (lambda* (#:key outputs #:allow-other-keys)
4155 (substitute* "Build.PL"
4156 (("lib64") "lib"))
4157 #t)))))
4158 (native-inputs
4159 `(("perl-capture-tiny" ,perl-capture-tiny)
4160 ("perl-config-autoconf" ,perl-config-autoconf)
4161 ("perl-extutils-libbuilder" ,perl-extutils-libbuilder)
4162 ("perl-module-build" ,perl-module-build)))
4163 (home-page "https://metacpan.org/release/Text-BibTeX")
4164 (synopsis "Interface to read and parse BibTeX files")
4165 (description "@code{Text::BibTeX} is a Perl library for reading, parsing,
4166 and processing BibTeX files. @code{Text::BibTeX} gives you access to the data
4167 at many different levels: you may work with BibTeX entries as simple field to
4168 string mappings, or get at the original form of the data as a list of simple
4169 values (strings, macros, or numbers) pasted together.")
4170 (license license:perl-license)))
4171
4172 (define-public biber
4173 (package
4174 (name "biber")
4175 (version "2.7")
4176 (source (origin
4177 (method url-fetch)
4178 (uri (string-append "https://github.com/plk/biber/archive/v"
4179 version ".tar.gz"))
4180 (file-name (string-append name "-" version ".tar.gz"))
4181 (sha256
4182 (base32
4183 "17wd80jg98qyddhvz4cin8779ycvppaf2va77r1lyvymjz6w9bx0"))))
4184 (build-system perl-build-system)
4185 (arguments
4186 `(#:phases
4187 (modify-phases %standard-phases
4188 (add-after 'install 'wrap-programs
4189 (lambda* (#:key outputs #:allow-other-keys)
4190 (let* ((out (assoc-ref outputs "out"))
4191 (perl5lib (getenv "PERL5LIB")))
4192 (wrap-program (string-append out "/bin/biber")
4193 `("PERL5LIB" ":" prefix
4194 (,(string-append perl5lib ":" out
4195 "/lib/perl5/site_perl")))))
4196 #t)))))
4197 (inputs
4198 `(("perl-autovivification" ,perl-autovivification)
4199 ("perl-class-accessor" ,perl-class-accessor)
4200 ("perl-data-dump" ,perl-data-dump)
4201 ("perl-data-compare" ,perl-data-compare)
4202 ("perl-data-uniqid" ,perl-data-uniqid)
4203 ("perl-datetime-format-builder" ,perl-datetime-format-builder)
4204 ("perl-datetime-calendar-julian" ,perl-datetime-calendar-julian)
4205 ("perl-file-slurp" ,perl-file-slurp)
4206 ("perl-ipc-cmd" ,perl-ipc-cmd)
4207 ("perl-ipc-run3" ,perl-ipc-run3)
4208 ("perl-list-allutils" ,perl-list-allutils)
4209 ("perl-list-moreutils" ,perl-list-moreutils)
4210 ("perl-mozilla-ca" ,perl-mozilla-ca)
4211 ("perl-regexp-common" ,perl-regexp-common)
4212 ("perl-log-log4perl" ,perl-log-log4perl)
4213 ;; We cannot use perl-unicode-collate here, because otherwise the
4214 ;; hardcoded hashes in the tests would differ. See
4215 ;; https://mail-archive.com/debian-bugs-dist@lists.debian.org/msg1469249.html
4216 ;;("perl-unicode-collate" ,perl-unicode-collate)
4217 ("perl-unicode-normalize" ,perl-unicode-normalize)
4218 ("perl-unicode-linebreak" ,perl-unicode-linebreak)
4219 ("perl-encode-eucjpascii" ,perl-encode-eucjpascii)
4220 ("perl-encode-jis2k" ,perl-encode-jis2k)
4221 ("perl-encode-hanextra" ,perl-encode-hanextra)
4222 ("perl-xml-libxml" ,perl-xml-libxml)
4223 ("perl-xml-libxml-simple" ,perl-xml-libxml-simple)
4224 ("perl-xml-libxslt" ,perl-xml-libxslt)
4225 ("perl-xml-writer" ,perl-xml-writer)
4226 ("perl-sort-key" ,perl-sort-key)
4227 ("perl-text-csv" ,perl-text-csv)
4228 ("perl-text-csv-xs" ,perl-text-csv-xs)
4229 ("perl-text-roman" ,perl-text-roman)
4230 ("perl-uri" ,perl-uri)
4231 ("perl-text-bibtex" ,perl-text-bibtex)
4232 ("perl-libwww" ,perl-libwww)
4233 ("perl-lwp-protocol-https" ,perl-lwp-protocol-https)
4234 ("perl-business-isbn" ,perl-business-isbn)
4235 ("perl-business-issn" ,perl-business-issn)
4236 ("perl-business-ismn" ,perl-business-ismn)
4237 ("perl-lingua-translit" ,perl-lingua-translit)))
4238 (native-inputs
4239 `(("perl-config-autoconf" ,perl-config-autoconf)
4240 ("perl-extutils-libbuilder" ,perl-extutils-libbuilder)
4241 ("perl-module-build" ,perl-module-build)
4242 ;; for tests
4243 ("perl-file-which" ,perl-file-which)
4244 ("perl-test-more" ,perl-test-most) ; FIXME: "more" would be sufficient
4245 ("perl-test-differences" ,perl-test-differences)))
4246 (home-page "http://biblatex-biber.sourceforge.net/")
4247 (synopsis "Backend for the BibLaTeX citation management tool")
4248 (description "Biber is a BibTeX replacement for users of biblatex. Among
4249 other things it comes with full Unicode support.")
4250 (license license:artistic2.0)))
4251
4252 (define-public rubber
4253 (package
4254 (name "rubber")
4255 (version "1.1")
4256 (source (origin
4257 (method url-fetch)
4258 (uri (list (string-append "https://launchpad.net/rubber/trunk/"
4259 version "/+download/rubber-"
4260 version ".tar.gz")
4261 (string-append "http://ebeffara.free.fr/pub/rubber-"
4262 version ".tar.gz")))
4263 (sha256
4264 (base32
4265 "1xbkv8ll889933gyi2a5hj7hhh216k04gn8fwz5lfv5iz8s34gbq"))))
4266 (build-system gnu-build-system)
4267 (arguments '(#:tests? #f)) ; no `check' target
4268 (inputs `(("texinfo" ,texinfo)
4269 ("python" ,python-2) ; incompatible with Python 3 (print syntax)
4270 ("which" ,which)))
4271 (home-page "https://launchpad.net/rubber")
4272 (synopsis "Wrapper for LaTeX and friends")
4273 (description
4274 "Rubber is a program whose purpose is to handle all tasks related to the
4275 compilation of LaTeX documents. This includes compiling the document itself,
4276 of course, enough times so that all references are defined, and running BibTeX
4277 to manage bibliographic references. Automatic execution of dvips to produce
4278 PostScript documents is also included, as well as usage of pdfLaTeX to produce
4279 PDF documents.")
4280 (license license:gpl2+)))
4281
4282 (define-public texmaker
4283 (package
4284 (name "texmaker")
4285 (version "5.0.2")
4286 (source (origin
4287 (method url-fetch)
4288 (uri (string-append "http://www.xm1math.net/texmaker/texmaker-"
4289 version ".tar.bz2"))
4290 (sha256
4291 (base32
4292 "0y81mjm89b99pr9svcwpaf4iz2q9pc9hjas5kiwd1pbgl5vqskm9"))))
4293 (build-system gnu-build-system)
4294 (arguments
4295 `(#:phases
4296 (modify-phases %standard-phases
4297 ;; Qt has its own configuration utility.
4298 (replace 'configure
4299 (lambda* (#:key outputs #:allow-other-keys)
4300 (let ((out (assoc-ref outputs "out")))
4301 (invoke "qmake"
4302 (string-append "PREFIX=" out)
4303 (string-append "DESKTOPDIR=" out "/share/applications")
4304 (string-append "ICONDIR=" out "/share/pixmaps")
4305 (string-append "METAINFODIR=" out "/share/metainfo")
4306 "texmaker.pro")))))))
4307 (inputs
4308 `(("poppler-qt5" ,poppler-qt5)
4309 ("qtbase" ,qtbase)
4310 ("qtscript" ,qtscript)
4311 ("qtwebkit" ,qtwebkit)
4312 ("zlib" ,zlib)))
4313 (native-inputs
4314 `(("pkg-config" ,pkg-config)))
4315 (home-page "http://www.xm1math.net/texmaker/")
4316 (synopsis "LaTeX editor")
4317 (description "Texmaker is a program that integrates many tools needed to
4318 develop documents with LaTeX, in a single application.")
4319 (license license:gpl2+)))
4320
4321
4322 (define-public teximpatient
4323 (package
4324 (name "teximpatient")
4325 (version "2.4")
4326 (source (origin
4327 (method url-fetch)
4328 (uri (string-append "mirror://gnu/" name "/" name "-"
4329 version ".tar.gz"))
4330 (sha256
4331 (base32
4332 "0h56w22d99dh4fgld4ssik8ggnmhmrrbnrn1lnxi1zr0miphn1sd"))))
4333 (build-system gnu-build-system)
4334 (arguments
4335 `(#:phases
4336 (modify-phases %standard-phases
4337 (delete 'check)
4338 ;; Unfortunately some mistakes have been made in packaging.
4339 ;; Work around them here ...
4340 (replace 'unpack
4341 (lambda* (#:key inputs outputs #:allow-other-keys)
4342 (let ((srcdir "teximpatient-2.4"))
4343 (system* "tar" "-xzf" (assoc-ref inputs "source")
4344 (string-append "--one-top-level=" srcdir))
4345 (delete-file (string-append srcdir "/book.pdf"))
4346 (install-file (car
4347 (find-files
4348 (assoc-ref inputs "automake")
4349 "^install-sh$"))
4350 srcdir)
4351 (chdir srcdir)))))))
4352 (native-inputs
4353 `(("texlive" ,texlive)
4354 ("automake" ,automake)))
4355 (home-page "https://www.gnu.org/software/teximpatient/")
4356 (synopsis "Book on TeX, plain TeX and Eplain")
4357 (description "@i{TeX for the Impatient} is a ~350 page book on TeX,
4358 plain TeX, and Eplain, originally written by Paul Abrahams, Kathryn Hargreaves,
4359 and Karl Berry.")
4360 (license license:fdl1.3+)))
4361
4362 (define-public lyx
4363 (package
4364 (name "lyx")
4365 (version "2.2.3")
4366 (source (origin
4367 (method url-fetch)
4368 (uri (string-append "http://ftp.lyx.org/pub/lyx/stable/2.2.x/"
4369 name "-" version ".tar.gz"))
4370 (sha256
4371 (base32
4372 "0xvaz0i371nn2ndinc0d3ywj76ivb62649a4sdgwbivisiahd2fj"))
4373 (patches (search-patches "lyx-2.2.3-fix-test.patch"))
4374 (modules '((guix build utils)))
4375 (snippet
4376 '(begin
4377 (delete-file-recursively "3rdparty")
4378 #t))))
4379 (build-system cmake-build-system)
4380 (arguments
4381 `(#:configure-flags `("-DLYX_USE_QT=QT5"
4382 "-DLYX_EXTERNAL_BOOST=1"
4383 "-DLYX_INSTALL=1"
4384 "-DLYX_RELEASE=1"
4385 ,(string-append "-DLYX_INSTALL_PREFIX="
4386 (assoc-ref %outputs "out")
4387 ;; Exact name and level is necessary.
4388 "/lyx2.2"))
4389 #:phases
4390 (modify-phases %standard-phases
4391 (add-after 'unpack 'patch-python
4392 (lambda* (#:key inputs #:allow-other-keys)
4393 (substitute* '("src/support/os.cpp")
4394 (("\"python ")
4395 (string-append "\""
4396 (assoc-ref inputs "python-2")
4397 "/bin/python ")))
4398 #t))
4399 (add-after 'patch-python 'patch-installer
4400 (lambda* (#:key outputs #:allow-other-keys)
4401 (substitute* "CMakeLists.txt"
4402 (("/usr/local/man/man1")
4403 (string-append (assoc-ref outputs "out")
4404 "/share/man/man1")))
4405 #t))
4406 (add-after 'patch-python 'patch-desktop-file
4407 (lambda* (#:key outputs #:allow-other-keys)
4408 (substitute* "lib/lyx.desktop.in"
4409 (("Exec=")
4410 (string-append "Exec="
4411 (assoc-ref outputs "out")
4412 "/")))
4413 #t))
4414 (add-before 'check 'setenv-check
4415 (lambda _
4416 (setenv "LYX_DIR_22x" (string-append (getcwd) "/../lyx-"
4417 ,version "/lib"))
4418 #t))
4419 (add-after 'install 'install-symlinks
4420 (lambda* (#:key outputs #:allow-other-keys)
4421 (let ((out (assoc-ref outputs "out")))
4422 (mkdir-p (string-append out "/bin"))
4423 (symlink "../lyx2.2/bin/lyx2.2"
4424 (string-append out "/bin/lyx2.2"))
4425 #t))))))
4426 (inputs
4427 `(("boost" ,boost)
4428 ("hunspell" ,hunspell) ; Note: Could also use aspell instead.
4429 ("libx11" ,libx11)
4430 ("python-2" ,python-2)
4431 ("qtbase" ,qtbase)
4432 ("qtsvg" ,qtsvg)
4433 ("zlib" ,zlib)))
4434 (propagated-inputs
4435 `(("texlive" ,texlive))) ; article.cls is in texmf-dist.
4436 (native-inputs
4437 `(("python-2" ,python-2)
4438 ("pkg-config" ,pkg-config)
4439 ("bc" ,bc)))
4440 (home-page "https://www.lyx.org/")
4441 (synopsis "Document preparation system with GUI")
4442 (description "LyX is a document preparation system. It excels at letting
4443 you create complex technical and scientific articles with mathematics,
4444 cross-references, bibliographies, indexes, etc. It is very good for working
4445 with documents of any length in which the usual processing abilities are
4446 required: automatic sectioning and pagination, spell checking and so forth.")
4447 (license license:gpl2+)))
4448
4449 (define-public texlive-latex-media9
4450 (package
4451 (name "texlive-latex-media9")
4452 (version (number->string %texlive-revision))
4453 (source (origin
4454 (method svn-fetch)
4455 (uri (svn-reference
4456 (url (string-append "svn://www.tug.org/texlive/tags/"
4457 %texlive-tag "/Master/texmf-dist/"
4458 "/tex/latex/media9"))
4459 (revision %texlive-revision)))
4460 (file-name (string-append name "-" version "-checkout"))
4461 (sha256
4462 (base32
4463 "01ysky8h8s6q12dxfahkzwhbkc9j5wl50xzcczy0cbjx9f6aj9kv"))))
4464 (build-system trivial-build-system)
4465 (arguments
4466 `(#:modules ((guix build utils))
4467 #:builder
4468 (begin
4469 (use-modules (guix build utils))
4470 (let ((target (string-append (assoc-ref %outputs "out")
4471 "/share/texmf-dist/tex/latex/media9")))
4472 (mkdir-p target)
4473 (copy-recursively (assoc-ref %build-inputs "source") target)
4474 #t))))
4475 (home-page "https://www.ctan.org/pkg/media9")
4476 (synopsis "Multimedia inclusion package with Adobe Reader-9/X compatibility")
4477 (description
4478 "The package provides an interface to embed interactive Flash (SWF) and 3D
4479 objects (Adobe U3D & PRC), as well as video and sound files or streams in the
4480 popular MP4, FLV and MP3 formats into PDF documents with Acrobat-9/X
4481 compatibility. Playback of multimedia files uses the built-in Flash Player of
4482 Adobe Reader and does, therefore, not depend on external plug-ins. Flash Player
4483 supports the efficient H.264 codec for video compression.
4484
4485 The package is based on the RichMedia Annotation, an Adobe addition to the PDF
4486 specification. It replaces the now obsolete @code{movie15} package.")
4487 (license license:lppl)))
4488
4489 (define-public texlive-latex-ocgx2
4490 (package
4491 (name "texlive-latex-ocgx2")
4492 (version (number->string %texlive-revision))
4493 (source (origin
4494 (method svn-fetch)
4495 (uri (svn-reference
4496 (url (string-append "svn://www.tug.org/texlive/tags/"
4497 %texlive-tag "/Master/texmf-dist/"
4498 "/tex/latex/ocgx2"))
4499 (revision %texlive-revision)))
4500 (file-name (string-append name "-" version "-checkout"))
4501 (sha256
4502 (base32
4503 "12kkl7n534j0p4frwyrlw22dc3ik50kxv97cxp4xpmji13m0hxpf"))))
4504 (build-system trivial-build-system)
4505 (arguments
4506 `(#:modules ((guix build utils))
4507 #:builder
4508 (begin
4509 (use-modules (guix build utils))
4510 (let ((target (string-append (assoc-ref %outputs "out")
4511 "/share/texmf-dist/tex/latex/ogcx2")))
4512 (mkdir-p target)
4513 (copy-recursively (assoc-ref %build-inputs "source") target)
4514 #t))))
4515 (home-page "https://www.ctan.org/pkg/ocgx2")
4516 (synopsis "Provide OCG (Optional Content Groups) support within a PDF document")
4517 (description
4518 "This package provides OCG (Optional Content Groups) support within a PDF
4519 document.
4520
4521 It re-implements the functionality of the @code{ocg}, @code{ocgx}, and
4522 @code{ocg-p} packages and adds support for all known engines and back-ends
4523 including:
4524
4525 @itemize
4526 @item LaTeX → dvips → @code{ps2pdf}/Distiller
4527 @item (Xe)LaTeX(x) → @code{dvipdfmx}
4528 @item pdfLaTeX and LuaLaTeX .
4529 @end itemize
4530
4531 It also ensures compatibility with the @code{media9} and @code{animate} packages.")
4532 (license license:lppl)))
4533
4534 (define-public texlive-latex-ms
4535 (package
4536 (name "texlive-latex-ms")
4537 (version (number->string %texlive-revision))
4538 (source (origin
4539 (method svn-fetch)
4540 (uri (texlive-ref "latex" "ms"))
4541 (file-name (string-append name "-" version "-checkout"))
4542 (sha256
4543 (base32
4544 "0m4wx3yjb5al1qsv995z8fii8xxy96mcfihbnlx43lpgayiwz35s"))))
4545 (build-system texlive-build-system)
4546 (arguments
4547 '(#:tex-directory "latex/ms"
4548 #:tex-format "latex"))
4549 (home-page "https://ctan.org/pkg/ms")
4550 (synopsis "Various LATEX packages by Martin Schröder")
4551 (description
4552 "A bundle of LATEX packages by Martin Schröder; the collection comprises:
4553
4554 @itemize
4555 @item @command{count1to}, make use of fixed TEX counters;
4556 @item @command{everysel}, set commands to execute every time a font is selected;
4557 @item @command{everyshi}, set commands to execute whenever a page is shipped out;
4558 @item @command{multitoc}, typeset the table of contents in multiple columns;
4559 @item @command{prelim2e}, mark typeset pages as preliminary; and
4560 @item @command{ragged2e}, typeset ragged text and allow hyphenation.
4561 @end itemize\n")
4562 (license license:lppl1.3c+)))
4563
4564 (define-public texlive-latex-needspace
4565 (package
4566 (name "texlive-latex-needspace")
4567 (version (number->string %texlive-revision))
4568 (source (origin
4569 (method svn-fetch)
4570 (uri (texlive-ref "latex" "needspace"))
4571 (file-name (string-append name "-" version "-checkout"))
4572 (sha256
4573 (base32
4574 "0kw80f5jh4gdpa2ka815abza3gr5z8b929w0745vrlc59pl0017y"))))
4575 (build-system texlive-build-system)
4576 (arguments
4577 '(#:tex-directory "latex/needspace"
4578 #:tex-format "latex"))
4579 (inputs
4580 `(("texlive-latex-filecontents" ,texlive-latex-filecontents)))
4581 (home-page "https://www.ctan.org/pkg/needspace")
4582 (synopsis "Insert pagebreak if not enough space")
4583 (description
4584 "Provides commands to disable pagebreaking within a given vertical
4585 space. If there is not enough space between the command and the bottom of the
4586 page, a new page will be started.")
4587 (license license:lppl)))
4588
4589 (define-public texlive-latex-eukdate
4590 (package
4591 (name "texlive-latex-eukdate")
4592 (version (number->string %texlive-revision))
4593 (source
4594 (origin
4595 (method svn-fetch)
4596 (uri (svn-reference
4597 (url (string-append "svn://www.tug.org/texlive/tags/"
4598 %texlive-tag "/Master/texmf-dist/"
4599 "/tex/latex/eukdate"))
4600 (revision %texlive-revision)))
4601 (file-name (string-append name "-" version "-checkout"))
4602 (sha256
4603 (base32
4604 "18xan116l8w47v560bkw6nbhkrml7g04xrlzk3jrpc7qsyf3n5fz"))))
4605 (build-system trivial-build-system)
4606 (arguments
4607 `(#:modules ((guix build utils))
4608 #:builder
4609 (begin
4610 (use-modules (guix build utils))
4611 (let ((target (string-append (assoc-ref %outputs "out")
4612 "/share/texmf-dist/tex/latex/eukdate")))
4613 (mkdir-p target)
4614 (copy-recursively (assoc-ref %build-inputs "source") target)
4615 #t))))
4616 (home-page "https://www.ctan.org/pkg/eukdate")
4617 (synopsis "UK format dates, with weekday")
4618 (description
4619 "The package is used to change the format of @code{\\today}’s date,
4620 including the weekday, e.g., \"Saturday, 26 June 2008\", the 'UK format', which
4621 is preferred in many parts of the world, as distinct from that which is used in
4622 @code{\\maketitle} of the article class, \"June 26, 2008\", the 'US format'.")
4623 (license license:lppl)))
4624
4625 (define-public texlive-generic-ulem
4626 (package
4627 (name "texlive-generic-ulem")
4628 (version (number->string %texlive-revision))
4629 (source
4630 (origin
4631 (method svn-fetch)
4632 (uri (svn-reference
4633 (url (string-append "svn://www.tug.org/texlive/tags/"
4634 %texlive-tag "/Master/texmf-dist/"
4635 "/tex/generic/ulem"))
4636 (revision %texlive-revision)))
4637 (file-name (string-append name "-" version "-checkout"))
4638 (sha256
4639 (base32
4640 "1rzdniqq9zk39w8ch8ylx3ywh2mj87s4ivchrsk2b8nx06jyn797"))))
4641 (build-system trivial-build-system)
4642 (arguments
4643 `(#:modules ((guix build utils))
4644 #:builder
4645 (begin
4646 (use-modules (guix build utils))
4647 (let ((target (string-append (assoc-ref %outputs "out")
4648 "/share/texmf-dist/tex/generic/ulem")))
4649 (mkdir-p target)
4650 (copy-recursively (assoc-ref %build-inputs "source") target)
4651 #t))))
4652 (home-page "https://www.ctan.org/pkg/ulem")
4653 (synopsis "Underline text in TeX")
4654 (description
4655 "The package provides an @code{\\ul} (underline) command which will break
4656 over line ends; this technique may be used to replace @code{\\em} (both in that
4657 form and as the @code{\\emph} command), so as to make output look as if it comes
4658 from a typewriter. The package also offers double and wavy underlining, and
4659 striking out (line through words) and crossing out (/// over words).")
4660 (license license:lppl1.3c+)))
4661
4662 (define-public texlive-latex-pgf
4663 (package
4664 (name "texlive-latex-pgf")
4665 (version (number->string %texlive-revision))
4666 (source
4667 (origin
4668 (method svn-fetch)
4669 (uri (svn-reference
4670 (url (string-append "svn://www.tug.org/texlive/tags/"
4671 %texlive-tag "/Master/texmf-dist/"
4672 "/tex/latex/pgf"))
4673 (revision %texlive-revision)))
4674 (file-name (string-append name "-" version "-checkout"))
4675 (sha256
4676 (base32
4677 "1dq8p10pz8wn0vx412m7d7d5gj1syxly3yqdqvf7lv2xl8zndn5h"))))
4678 (build-system trivial-build-system)
4679 (native-inputs
4680 `(("texlive-latex-pgf-generic"
4681 ,(origin
4682 (method svn-fetch)
4683 (uri (svn-reference
4684 (url (string-append "svn://www.tug.org/texlive/tags/"
4685 %texlive-tag "/Master/texmf-dist/"
4686 "/tex/generic/pgf"))
4687 (revision %texlive-revision)))
4688 (file-name (string-append "texlive-latex-pgf-generic" version "-checkout"))
4689 (sha256
4690 (base32
4691 "0xkxw26sjzr5npjpzpr28yygwdbhzpdd0hsk80gjpidhcxmz393i"))))))
4692 (arguments
4693 `(#:modules ((guix build utils))
4694 #:builder
4695 (begin
4696 (use-modules (guix build utils))
4697 (let ((target-generic (string-append (assoc-ref %outputs "out")
4698 "/share/texmf-dist/tex/generic/pgf"))
4699 (target-latex (string-append (assoc-ref %outputs "out")
4700 "/share/texmf-dist/tex/latex/pgf")))
4701 (mkdir-p target-generic)
4702 (mkdir-p target-latex)
4703 (copy-recursively (assoc-ref %build-inputs "texlive-latex-pgf-generic") target-generic)
4704 (copy-recursively (assoc-ref %build-inputs "source") target-latex)
4705 #t))))
4706 (home-page "https://www.ctan.org/pkg/tikz")
4707 (synopsis "Create PostScript and PDF graphics in TeX")
4708 (description
4709 "PGF is a macro package for creating graphics. It is platform- and
4710 format-independent and works together with the most important TeX backend
4711 drivers, including pdfTeX and dvips. It comes with a user-friendly syntax layer
4712 called TikZ.
4713
4714 Its usage is similar to pstricks and the standard picture environment. PGF
4715 works with plain (pdf-)TeX, (pdf-)LaTeX, and ConTeXt. Unlike pstricks, it can
4716 produce either PostScript or PDF output.")
4717 (license license:lppl1.3c+)))
4718
4719 (define-public texlive-latex-koma-script
4720 (package
4721 (name "texlive-latex-koma-script")
4722 (version (number->string %texlive-revision))
4723 (source (origin
4724 (method svn-fetch)
4725 (uri (svn-reference
4726 (url (string-append "svn://www.tug.org/texlive/tags/"
4727 %texlive-tag "/Master/texmf-dist/"
4728 "/tex/latex/koma-script"))
4729 (revision %texlive-revision)))
4730 (file-name (string-append name "-" version "-checkout"))
4731 (sha256
4732 (base32
4733 "1g8qg796hc6s092islnybaxs115ldsqwp2vxkk3gpy6vh7wc9r50"))))
4734 (build-system trivial-build-system)
4735 (arguments
4736 `(#:modules ((guix build utils)
4737 (ice-9 match))
4738 #:builder
4739 (begin
4740 (use-modules (guix build utils)
4741 (ice-9 match))
4742 (let ((root (string-append (assoc-ref %outputs "out")
4743 "/share/texmf-dist/"))
4744 (pkgs '(("source" . "tex/latex/koma-script"))))
4745 (for-each (match-lambda
4746 ((pkg . dir)
4747 (let ((target (string-append root dir)))
4748 (mkdir-p target)
4749 (copy-recursively (assoc-ref %build-inputs pkg)
4750 target))))
4751 pkgs)
4752 #t))))
4753 (home-page "https://www.ctan.org/pkg/koma-script")
4754 (synopsis "Bundle of versatile classes and packages")
4755 (description
4756 "The KOMA-Script bundle provides replacements for the article, report, and
4757 book classes with emphasis on typography and versatility. There is also a
4758 letter class.
4759
4760 The bundle also offers:
4761
4762 @itemize
4763 @item a package for calculating type areas in the way laid down by the
4764 typographer Jan Tschichold,
4765 @item packages for easily changing and defining page styles,
4766 @item a package scrdate for getting not only the current date but also the name
4767 of the day, and
4768 @item a package scrtime for getting the current time.
4769 @end itemize
4770
4771 All these packages may be used not only with KOMA-Script classes but also with
4772 the standard classes.
4773
4774 Since every package has its own version number, the version number quoted only
4775 refers to the version of scrbook, scrreprt, scrartcl, scrlttr2 and
4776 typearea (which are the main parts of the bundle).")
4777 (license license:lppl1.3+)))
4778
4779 (define-public texlive-generic-listofitems
4780 (package
4781 (name "texlive-generic-listofitems")
4782 (version (number->string %texlive-revision))
4783 (source (origin
4784 (method svn-fetch)
4785 (uri (svn-reference
4786 (url (string-append "svn://www.tug.org/texlive/tags/"
4787 %texlive-tag "/Master/texmf-dist/"
4788 "/tex/generic/listofitems"))
4789 (revision %texlive-revision)))
4790 (file-name (string-append name "-" version "-checkout"))
4791 (sha256
4792 (base32
4793 "1k50z6ixgwwzy84mi0dr5vcjah5p7wvgq66y45bilm91a4m8sgla"))))
4794 (build-system trivial-build-system)
4795 (arguments
4796 `(#:modules ((guix build utils))
4797 #:builder
4798 (begin
4799 (use-modules (guix build utils))
4800 (let ((target (string-append (assoc-ref %outputs "out")
4801 "/share/texmf-dist/tex/generic/listofitems")))
4802 (mkdir-p target)
4803 (copy-recursively (assoc-ref %build-inputs "source") target)
4804 #t))))
4805 (home-page "https://www.ctan.org/pkg/listofitems")
4806 (synopsis "Grab items in lists using user-specified seperation character")
4807 (description
4808 "This package allows one to capture all the items of a list, for which
4809 the parsing character has been selected by the user, and to access any of
4810 these items with a simple syntax.")
4811 (license license:lppl1.3c+)))
4812
4813 (define-public texlive-latex-readarray
4814 (package
4815 (name "texlive-latex-readarray")
4816 (version (number->string %texlive-revision))
4817 (source (origin
4818 (method svn-fetch)
4819 (uri (svn-reference
4820 (url (string-append "svn://www.tug.org/texlive/tags/"
4821 %texlive-tag "/Master/texmf-dist/"
4822 "/tex/latex/readarray"))
4823 (revision %texlive-revision)))
4824 (file-name (string-append name "-" version "-checkout"))
4825 (sha256
4826 (base32
4827 "0c53k180ivn1n7fz3ngvd2w1i5dw3kxml0n64vhki88xsylz7lxp"))))
4828 (build-system trivial-build-system)
4829 (arguments
4830 `(#:modules ((guix build utils))
4831 #:builder
4832 (begin
4833 (use-modules (guix build utils))
4834 (let ((target (string-append (assoc-ref %outputs "out")
4835 "/share/texmf-dist/tex/latex/readarray")))
4836 (mkdir-p target)
4837 (copy-recursively (assoc-ref %build-inputs "source") target)
4838 #t))))
4839 (propagated-inputs
4840 `(("texlive-generic-listofitems" ,texlive-generic-listofitems)))
4841 (home-page "https://www.ctan.org/pkg/readarray")
4842 (synopsis "Read, store and recall array-formatted data")
4843 (description
4844 "This package allows the user to input formatted data into elements of a
4845 2-D or 3-D array and to recall that data at will by individual cell number.
4846 The data can be but need not be numerical in nature. It can be, for example,
4847 formatted text.")
4848 (license license:lppl1.3)))
4849
4850 (define-public texlive-latex-verbatimbox
4851 (package
4852 (name "texlive-latex-verbatimbox")
4853 (version (number->string %texlive-revision))
4854 (source (origin
4855 (method svn-fetch)
4856 (uri (svn-reference
4857 (url (string-append "svn://www.tug.org/texlive/tags/"
4858 %texlive-tag "/Master/texmf-dist/"
4859 "/tex/latex/verbatimbox"))
4860 (revision %texlive-revision)))
4861 (file-name (string-append name "-" version "-checkout"))
4862 (sha256
4863 (base32
4864 "0qh1cgvfs463zsi2pjg490gj0mkjfdpfc381j10cbb5la304psna"))))
4865 (build-system trivial-build-system)
4866 (arguments
4867 `(#:modules ((guix build utils))
4868 #:builder
4869 (begin
4870 (use-modules (guix build utils))
4871 (let ((target (string-append (assoc-ref %outputs "out")
4872 "/share/texmf-dist/tex/latex/verbatimbox")))
4873 (mkdir-p target)
4874 (copy-recursively (assoc-ref %build-inputs "source") target)
4875 #t))))
4876 (propagated-inputs
4877 `(("texlive-latex-readarray" ,texlive-latex-readarray)))
4878 (home-page "https://www.ctan.org/pkg/verbatimbox")
4879 (synopsis "Deposit verbatim text in a box")
4880 (description
4881 "The package provides a @code{verbbox} environment to place its contents
4882 into a globally available box, or into a box specified by the user. The
4883 global box may then be used in a variety of situations (for example, providing
4884 a replica of the @code{boxedverbatim} environment itself). A valuable use is
4885 in places where the standard @code{verbatim} environment (which is based on a
4886 @code{trivlist}) may not appear.")
4887 (license license:lppl1.3+)))