16/37: gnu: texlive-amsfonts: Only create tfm files for Euler fonts.

[guix-commits]

rekado pushed a commit to branch core-updates
in repository guix.

commit d9f733ad8b8e782bae68869e742664458e0d68e6
Author: Jelle Licht <jlicht@fsfe.org>
AuthorDate: Mon Oct 26 22:26:46 2020 +0100

    gnu: texlive-amsfonts: Only create tfm files for Euler fonts.
    
    * gnu/packages/tex.scm (texlive-amsfonts)[arguments]<#:phases>[build-fonts]:
    Invoke `afm2tfm' for only the Euler fonts.
---
 gnu/packages/tex.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index 092b1af..1e6a800 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -1116,7 +1116,7 @@ Taco Hoekwater.")
                  ;; convert the afm files instead.
                  (let ((build (string-append (getcwd) "/build-fonts/euler")))
                    (mkdir build)
-                   (with-directory-excursion "fonts/afm/public/amsfonts/"
+                   (with-directory-excursion "fonts/afm/public/amsfonts/euler"
                      (for-each (lambda (font)
                                  (format #t "converting afm font ~a\n" 
(basename font ".afm"))
                                  (invoke "afm2tfm" font