gnu: texlive build system: Install info files and man pages.

Fixes: bug#54422

* guix/build/texlive-build-system.scm (install): Install info files and man
pages at their expected location.

Change-Id: Id4b6bc4d0f7b20b8cb0c98b24d8e66835aac5fb0
This commit is contained in:
Nicolas Goaziou 2026-01-02 15:39:05 +01:00 committed by Andreas Enge
parent 8cf44901b6
commit 5dc0d3be31
No known key found for this signature in database
GPG key ID: F7D5C9BF765C61E3

View file

@ -279,9 +279,16 @@ generation also needs to be wrapped within a `faketime' call in the
(unless doc
(format (current-error-port)
"warning: missing 'doc' output for package documentation~%"))
(let ((doc-dir (string-append (or doc out) "/share/texmf-dist/doc")))
(mkdir-p doc-dir)
(copy-recursively "doc" doc-dir)))
(let* ((share (string-append (or doc out) "/share"))
(texmf-doc (string-append share "/texmf-dist/doc")))
(mkdir-p texmf-doc)
(copy-recursively "doc" texmf-doc)
;; Move Info files and man pages into their expected locations.
(for-each (lambda (dir)
(let ((target (string-append texmf-doc "/" dir)))
(when (directory-exists? target)
(rename-file target (string-append share "/" dir)))))
'("info" "man"))))
;; Install runfiles. The package may not contain any, though. Create
;; #$output anyway to handle this situation gracefully.
(mkdir-p out)