summary refs log tree commit diff
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2017-07-09 12:05:05 +0200
committerRicardo Wurmus <rekado@elephly.net>2017-07-09 17:07:38 +0200
commit9cc823f5675ef3f91f39964f55a92da0b06dd38e (patch)
treeb73d5c6e73c0a8970485f20f1e873fec85ca7f8a
parente5942cbfa488486ed846dd526e5867556442fbb3 (diff)
downloadguix-9cc823f5675ef3f91f39964f55a92da0b06dd38e.tar.gz
gnu: lilypond: Use texlive-union.
* gnu/packages/music.scm (lilypond)[arguments]: Add phase "use-texlive-union".
[native-inputs]: Replace "texlive" with a texlive-union.
-rw-r--r--gnu/packages/music.scm14
1 files changed, 13 insertions, 1 deletions
diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm
index 904f781c5d..d0631de274 100644
--- a/gnu/packages/music.scm
+++ b/gnu/packages/music.scm
@@ -652,6 +652,15 @@ Sega Master System/Mark III, Sega Genesis/Mega Drive, BBC Micro
                             "/share/fonts/opentype/"))
        #:phases
        (modify-phases %standard-phases
+         (add-after 'unpack 'use-texlive-union
+           (lambda _
+             ;; FIXME: fonts are not found and have to be generated in HOME.
+             (setenv "HOME" "/tmp")
+             ;; The test for the "lh" package fails, even though it is among
+             ;; the inputs.
+             (substitute* "configure"
+               (("TEX_FIKPARM=.*") "TEX_FIKPARM=found\n"))
+             #t))
          (add-after 'unpack 'fix-path-references
           (lambda _
             (substitute* "scm/backend-library.scm"
@@ -693,7 +702,10 @@ Sega Master System/Mark III, Sega Genesis/Mega Drive, BBC Micro
        ("gettext" ,gettext-minimal)
        ("imagemagick" ,imagemagick)
        ("netpbm" ,netpbm) ;for pngtopnm
-       ("texlive" ,texlive) ;metafont and metapost
+       ("texlive" ,(texlive-union (list texlive-metapost
+                                        texlive-generic-epsf
+                                        texlive-latex-lh
+                                        texlive-latex-cyrillic)))
        ("texinfo" ,texinfo)
        ("texi2html" ,texi2html)
        ("rsync" ,rsync)