me/guix
Archived
1
0
Fork 0
Code Activity

gnu: Add texlive-capt-of.

Browse source 
* gnu/packages/tex.scm (texlive-capt-of): New variable.
(texlive-latex-capt-of): Deprecate variabe.
This commit is contained in:
Nicolas Goaziou 2022-01-28 13:58:04 +01:00
parent ff37d7564b
commit 32e3e924cf
No known key found for this signature in database
GPG key ID: DA00B4F048E92F2D
1 changed files with 38 additions and 31 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

69
gnu/packages/tex.scm
View file

@ -5015,38 +5015,45 @@ both); or to remove surrounding spaces within a macro definition, or to define
space-stripped macros.") space-stripped macros.")
(license license:lppl))) (license license:lppl)))
(define-public texlive-latex-capt-of (define-public texlive-capt-of
(package (let ((template
(name "texlive-latex-capt-of") (simple-texlive-package
(version (number->string %texlive-revision)) "texlive-capt-of"
(source (origin (list "doc/latex/capt-of/"
(method svn-fetch) "source/latex/capt-of/"
(uri (svn-reference "tex/latex/capt-of/")
(url (string-append "svn://www.tug.org/texlive/tags/" (base32 "0bf0cdd9ca3kkqxqqkq6jalh5ybs60l80l5gfkl2whk2v4bnzfvz"))))
%texlive-tag "/Master/texmf-dist/" (package
"/tex/latex/capt-of")) (inherit template)
(revision %texlive-revision))) (outputs '("out" "doc"))
(file-name (string-append name "-" version "-checkout")) (arguments
(sha256 (substitute-keyword-arguments (package-arguments template)
(base32 ((#:tex-directory _ '())
"1y2s50f6lz0jx2748lj3iy56hrpcczgnbzmvphxv7aqndyyamd4x")))) "latex/capt-of")
(build-system trivial-build-system) ((#:build-targets _ '())
(arguments '(list "capt-of.ins"))
`(#:modules ((guix build utils)) ((#:phases phases)
#:builder `(modify-phases ,phases
(begin (add-after 'unpack 'chdir
(use-modules (guix build utils)) (lambda _
(let ((target (string-append (assoc-ref %outputs "out") (chdir "source/latex/capt-of")))
"/share/texmf-dist/tex/latex/capt-of"))) (replace 'copy-files
(mkdir-p target) (lambda* (#:key inputs outputs #:allow-other-keys)
(copy-recursively (assoc-ref %build-inputs "source") target) (let ((origin (assoc-ref inputs "source"))
#t)))) (source (string-append (assoc-ref outputs "out")
(home-page "https://www.ctan.org/pkg/capt-of") "/share/texmf-dist/source"))
(synopsis "Captions on more than floats") (doc (string-append (assoc-ref outputs "doc")
(description "/share/texmf-dist/doc")))
"This package defines a command @code{\\captionof} for putting a caption (copy-recursively (string-append origin "/source") source)
(copy-recursively (string-append origin "/doc") doc))))))))
(home-page "https://www.ctan.org/pkg/capt-of")
(synopsis "Captions on more than floats")
(description
"This package defines a command @code{\\captionof} for putting a caption
to something that's not a float.") to something that's not a float.")
(license license:lppl))) (license license:lppl))))
(define-deprecated-package texlive-latex-capt-of texlive-capt-of)
(define-public texlive-doi (define-public texlive-doi
(package (package