[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/02: gnu: texlive-metafont-base: Install missing files.
From: |
guix-commits |
Subject: |
01/02: gnu: texlive-metafont-base: Install missing files. |
Date: |
Mon, 26 Oct 2020 15:52:41 -0400 (EDT) |
rekado pushed a commit to branch wip-texlive
in repository guix.
commit 22d2a886fe2afd13962d73f92132f6b44b818a64
Author: Ricardo Wurmus <rekado@elephly.net>
AuthorDate: Mon Oct 26 20:49:18 2020 +0100
gnu: texlive-metafont-base: Install missing files.
* gnu/packages/tex.scm (texlive-metafont-base)[arguments]: Also install
"misc"
and "config" directories.
---
gnu/packages/tex.scm | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index 69e6b96..438607a 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -588,11 +588,13 @@ to adapt the plain e-TeX source file to work with XeTeX
and LuaTeX.")
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(base (string-append out "/share/texmf-dist/web2c"))
- (mf (string-append out
"/share/texmf-dist/metafont/base")))
+ (mf (string-append out "/share/texmf-dist/metafont/")))
(mkdir-p base)
(mkdir-p mf)
(install-file "build/mf.base" base)
- (copy-recursively "base" mf)
+ (for-each (lambda (where)
+ (copy-recursively where (string-append mf where)))
+ (list "base" "misc" "config"))
#t))))))
(native-inputs
`(("texlive-bin" ,texlive-bin)))