From 3d03f4c4ca6ffa510651559ac9c88b0e82cf0d7c Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Thu, 21 Oct 2021 18:02:04 +0000 Subject: gnu: texlive-lh: Install more files. * gnu/packages/tex.scm (texlive-lh)[outputs]: Add a "doc" output. [arguments]: Override the 'copy-files phase to install many more files in the correct locations. --- gnu/packages/tex.scm | 18 +++++++++++++++++- 1 file changed, 17 insertions(+), 1 deletion(-) diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm index d553192576..60f199a857 100644 --- a/gnu/packages/tex.scm +++ b/gnu/packages/tex.scm @@ -6419,6 +6419,7 @@ (define-public texlive-lh "0vw75i52asi5sssp8k9r8dy4ihvqbvmbsl3dini3ls8cky15lz37")))) (package (inherit template) + (outputs '("out" "doc")) (arguments (substitute-keyword-arguments (package-arguments template) ((#:tex-directory _ #t) @@ -6428,7 +6429,22 @@ (define-public texlive-lh ((#:phases phases) `(modify-phases ,phases (add-after 'unpack 'chdir - (lambda _ (chdir "source/latex/lh") #t)))))) + (lambda _ (chdir "source/latex/lh"))) + (replace 'copy-files + (lambda* (#:key inputs outputs #:allow-other-keys) + (let* ((source (assoc-ref inputs "source")) + (doc (string-append (assoc-ref outputs "doc") + "/share/texmf-dist/doc")) + (target (string-append (assoc-ref outputs "out") + "/share/texmf-dist")) + (tex (string-append target "/tex/latex/lh/"))) + (copy-recursively "build/" tex) + (copy-recursively (string-append source "/fonts/source/lh") + (string-append target "/fonts/source/lh")) + (copy-recursively (string-append source "/tex/plain/lh") + (string-append target "/tex/plain/lh")) + (copy-recursively (string-append source "/doc") + doc)))))))) (home-page "https://www.ctan.org/pkg/lh") (synopsis "Cyrillic fonts that support LaTeX standard encodings") (description -- cgit v1.2.3