11/23: gnu: texlive-latex-base: Fix compilation on powerpc64le*.

[guix-commits]

marusich pushed a commit to branch wip-ppc64le
in repository guix.

commit 3403218bfb1fefc3a4c31a65601a924996580fe6
Author: Leo Le Bouter <lle-bout@zaclys.net>
AuthorDate: Mon Feb 8 04:47:03 2021 +0100

    gnu: texlive-latex-base: Fix compilation on powerpc64le*.
    
    * gnu/packages/tex.scm (texlive-latex-base)[arguments]: LuaJIT is not 
ported to
    powerpc64le* yet. Update replacement 'build phase to add "luajittex" within 
the
    "disabled-formats" list on powerpc64le*.
    
    Signed-off-by: Chris Marusich <cmmarusich@gmail.com>
---
 gnu/packages/tex.scm | 29 ++++++++++++++++++-----------
 1 file changed, 18 insertions(+), 11 deletions(-)

diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index c854648..cf26c95 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -2643,17 +2643,24 @@ formats.")
                  ;; takes long and TeX Live isn't designed to be modular like
                  ;; that.  Everything operates on a shared directory, which we
                  ;; would only have at profile generation time.
-                 (let ((disabled-formats
-                        '("aleph aleph" "lamed aleph" "uptex uptex" "euptex 
euptex"
-                          "eptex eptex" "ptex ptex" "pdfxmltex pdftex" "platex 
eptex"
-                          "csplain pdftex" "mf mf-nowin" "mex pdftex" "pdfmex 
pdftex"
-                          "luacsplain luatex"
-                          "cont-en xetex" "cont-en pdftex" "pdfcsplain xetex"
-                          "pdfcsplain pdftex" "pdfcsplain luatex" "cslatex 
pdftex"
-                          "mptopdf pdftex" "uplatex euptex" "jadetex pdftex"
-                          "amstex pdftex" "pdfcslatex pdftex" "lollipop tex"
-                          "xmltex pdftex" "pdfjadetex pdftex" "eplain pdftex"
-                          "texsis pdftex" "mltex pdftex" "utf8mex pdftex")))
+                 (let* ((powerpc64le?
+                         ,(string-prefix? "powerpc64le"
+                                          (or (%current-target-system)
+                                              (%current-system))))
+                        (disabled-formats
+                         `("aleph aleph" "lamed aleph" "uptex uptex"
+                           "euptex euptex" "eptex eptex" "ptex ptex"
+                           "pdfxmltex pdftex" "platex eptex" "csplain pdftex"
+                           "mf mf-nowin" "mex pdftex" "pdfmex pdftex"
+                           "luacsplain luatex"
+                           ,@(if powerpc64le? '("luajittex") '())
+                           "cont-en xetex" "cont-en pdftex" "pdfcsplain xetex"
+                           "pdfcsplain pdftex" "pdfcsplain luatex"
+                           "cslatex pdftex" "mptopdf pdftex" "uplatex euptex"
+                           "jadetex pdftex" "amstex pdftex"
+                           "pdfcslatex pdftex" "lollipop tex" "xmltex pdftex"
+                           "pdfjadetex pdftex" "eplain pdftex" "texsis pdftex"
+                           "mltex pdftex" "utf8mex pdftex")))
                    (mkdir "web2c")
                    (install-file (string-append
                                   (assoc-ref inputs "texlive-kpathsea")