me
/
guix
Archived
1
0
Fork 0
Code

gnu: texlive-xcolor: Fix build failure. 

This is a reland of 5e796bfc22 which was
partially reverted in 8c3e9da13a.

* gnu/packages/tex.scm (texlive-xcolor)[arguments]: Make sure package provides
all the expected files.
master
Marius Bakke 2022-08-09 10:52:25 +02:00
parent 126648f578
commit 121f6e0b0c
No known key found for this signature in database
GPG Key ID: A2A06DF2A33A54FA
1 changed files with 16 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
gnu/packages/tex.scm
View File

@ -3390,15 +3390,22 @@ used by @code{hyperref} and @code{bookmark}.")
((#: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)))))))
(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"))))))))))
;; TODO: Propagate texlive-hyperref and many others in the next rebuild
;; cycle. Grep for '\usepackage' to see what packages it requires.
;; (propagated-inputs (list texlive-hyperref ...))