From d0e7910165b98ae800bd282ed320e36745a8fd8b Mon Sep 17 00:00:00 2001
From: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Date: Sun, 4 Jun 2023 00:29:00 +0200
Subject: [PATCH] gnu: Add texlive-latex.

* gnu/packages/tex.scm (texlive-latex): New variable.
---
 gnu/packages/tex.scm | 38 ++++++++++++++++++++++++++++++++++++++
 1 file changed, 38 insertions(+)

diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index 972ae10135..81668aa686 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -740,6 +740,44 @@ (define-public texlive-tex
 it should not be processed without Knuth's direct permission.")
     (license license:knuth)))
 
+(define-public texlive-latex
+  (package
+    (name "texlive-latex")
+    (version (number->string %texlive-revision))
+    (source (texlive-origin
+             name version
+             (list "doc/latex/base/" "makeindex/latex/"
+                   "source/latex/base/" "tex/latex/base/")
+             (base32
+              "0k2b6qi281cl4zml6l537iyps1zwaq7pip81qq8vlkhb9h5ggpnw")))
+    (outputs '("out" "doc"))
+    (build-system texlive-build-system)
+    (arguments
+     (list
+      #:texlive-latex-base #f
+      #:tex-engine "tex"
+      #:tex-format #f
+      #:build-targets #~(list "unpack.ins")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'fix-lua-build
+            ;; The literal tab in the dtx file is translated to the string
+            ;; "^^I" in the generated Lua file, which causes a syntax error.
+            (lambda _
+              (substitute* "source/latex/base/ltluatex.dtx"
+                (("\t") "  ")))))))
+    (propagated-inputs
+     (list texlive-latex-fonts
+           texlive-latexconfig
+           texlive-luatex
+           texlive-pdftex))
+    (home-page "https://ctan.org/pkg/latex")
+    (synopsis "TeX macro package that defines LaTeX")
+    (description
+     "LaTeX is a widely-used macro package for TeX, providing many basic
+document formating commands extended by a wide range of packages.")
+    (license license:lppl1.3c)))
+
 (define-public texlive-bidi
   (package
     (name "texlive-bidi")