me/guix
Archived
1
0
Fork 0
Code Activity

gnu: texlive-xcolor: Provide missing files.

Browse source 
* gnu/packages/tex.scm (texlive-xcolor): Make sure package provides all the
expected files.
This commit is contained in:
Nicolas Goaziou 2022-02-13 23:43:43 +01:00
parent 69f284a35f
commit 5e796bfc22
No known key found for this signature in database
GPG key ID: DA00B4F048E92F2D
1 changed files with 27 additions and 15 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

42
gnu/packages/tex.scm
View file

@ -3260,28 +3260,40 @@ used by @code{hyperref} and @code{bookmark}.")
(define-public texlive-xcolor
(let ((template (simple-texlive-package
"texlive-xcolor"
(list "/doc/latex/xcolor/"
"/source/latex/xcolor/")
(list "doc/latex/xcolor/"
"dvips/xcolor/"
"source/latex/xcolor/"
"tex/latex/xcolor/")
(base32
"12q6spmpxg30alhvarjmxzigmz7lazapbrb0mc4vhbn6n1sdz7pp"))))
"1d7108b67fcaf1sgyk43ph18l0z5m35iqg3aahqs1ymzwdfnd3f7"))))
(package
(inherit template)
(outputs '("out" "doc"))
(arguments
(substitute-keyword-arguments (package-arguments template)
((#:tex-directory _ #t)
((#:tex-directory _ '())
"latex/xcolor")
((#:build-targets _ '())
#~(list "xcolor.ins"))
((#:phases phases)
`(modify-phases ,phases
(add-after 'unpack 'chdir
(lambda _ (chdir "source/latex/xcolor") #t))
(add-after 'install 'move-files
(lambda* (#:key outputs #:allow-other-keys)
(let ((share (string-append (assoc-ref outputs "out")
"/share/texmf-dist")))
(mkdir-p (string-append share "/dvips/xcolor"))
(rename-file (string-append share "/tex/latex/xcolor/xcolor.pro")
(string-append share "/dvips/xcolor/xcolor.pro"))
#t)))))))
#~(modify-phases #$phases
(add-after 'unpack 'chdir
(lambda _ (chdir "source/latex/xcolor")))
(replace 'copy-files
(lambda* (#:key inputs outputs #:allow-other-keys)
(let ((origin (assoc-ref inputs "source"))
(source (string-append #$output
"/share/texmf-dist/source"))
(doc (string-append #$output:doc
"/share/texmf-dist/doc")))
(copy-recursively (string-append origin "/source") source)
(copy-recursively (string-append origin "/doc") doc)
(let ((share (string-append #$output
"/share/texmf-dist")))
(mkdir-p (string-append share "/dvips/xcolor"))
(rename-file
(string-append share "/tex/latex/xcolor/xcolor.pro")
(string-append share "/dvips/xcolor/xcolor.pro"))))))))))
(home-page "https://www.ctan.org/pkg/xcolor")
(synopsis "Driver-independent color extensions for LaTeX and pdfLaTeX")
(description