guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

232/418: gnu: texlive-babel: Refresh package definition.


From: guix-commits
Subject: 232/418: gnu: texlive-babel: Refresh package definition.
Date: Mon, 29 May 2023 17:39:20 -0400 (EDT)

ngz pushed a commit to branch tex-team-next
in repository guix.

commit 9796693461a7edf745afbfd00a08844bb25bbaba
Author: Nicolas Goaziou <mail@nicolasgoaziou.fr>
AuthorDate: Mon May 15 22:39:43 2023 +0200

    gnu: texlive-babel: Refresh package definition.
    
    * gnu/packages/tex.scm (texlive-babel): Remove SIMPLE-TEXLIVE-PACKAGE
    call.
---
 gnu/packages/tex.scm | 72 ++++++++++++++++++++++++++--------------------------
 1 file changed, 36 insertions(+), 36 deletions(-)

diff --git a/gnu/packages/tex.scm b/gnu/packages/tex.scm
index ea71e9ec78..779f580d6e 100644
--- a/gnu/packages/tex.scm
+++ b/gnu/packages/tex.scm
@@ -4627,48 +4627,48 @@ distribution.")
 (define-deprecated-package texlive-latex-amscls texlive-amscls)
 
 (define-public texlive-babel
-  (let ((template (simple-texlive-package
-                   "texlive-babel"
-                   (list "/doc/latex/babel/"
-                         "/source/latex/babel/"
-                         "/makeindex/babel/")
-                   (base32
-                    "0qr5vjp79g1c1l6k173qhfdfabgbky73wymzhm56pazx4a8r08wz"))))
-    (package
-      (inherit template)
-      (arguments
-       (substitute-keyword-arguments (package-arguments template)
-         ((#:tex-directory _ #t)
-          "generic/babel")
-         ((#:phases phases)
-          `(modify-phases ,phases
-             ;; This package tries to produce babel.aux twice but refuses to
-             ;; overwrite the first one.
-             (add-before 'build 'fix-ins
-               (lambda _
-                 (substitute* "source/latex/babel/babel.ins"
-                   (("askonceonly") "askforoverwritefalse"))))
-             (add-after 'install 'install-locales
-               (lambda* (#:key outputs #:allow-other-keys)
-                 (let ((locale-directory
-                        (string-append (assoc-ref outputs "out")
-                                       
"/share/texmf-dist/tex/generic/babel/locale/")))
-                   (mkdir-p locale-directory)
-                   (invoke "unzip" "locale.zip" "-d"
-                           locale-directory))))))))
-      (native-inputs
-       (list unzip))
-      (home-page "https://www.ctan.org/pkg/babel";)
-      (synopsis "Multilingual support for Plain TeX or LaTeX")
-      (description
-       "The package manages culturally-determined typographical (and other)
+  (package
+    (name "texlive-babel")
+    (version (number->string %texlive-revision))
+    (source (texlive-origin
+             name version
+             (list "doc/latex/babel/"
+                   "makeindex/babel/"
+                   "source/latex/babel/"
+                   "tex/generic/babel/")
+             (base32
+              "00gl0b55hg912bmrqkpzn5rfyds7hcbsfwdlsmqishq5gjp6pnr0")))
+    (outputs '("out" "doc"))
+    (build-system texlive-build-system)
+    (arguments
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          ;; This package tries to produce babel.aux twice but refuses to
+          ;; overwrite the first one.
+          (add-before 'build 'fix-ins
+            (lambda _
+              (substitute* "source/latex/babel/babel.ins"
+                (("askonceonly") "askforoverwritefalse"))))
+          (add-before 'build 'generate-locales
+            (lambda _
+              (let ((locale-directory (string-append (getcwd) 
"/build/locale")))
+                (mkdir-p locale-directory)
+                (with-directory-excursion "source/latex/babel/"
+                  (invoke "unzip" "locale.zip" "-d" locale-directory))))))))
+    (native-inputs
+     (list unzip))
+    (home-page "https://www.ctan.org/pkg/babel";)
+    (synopsis "Multilingual support for Plain TeX or LaTeX")
+    (description
+     "The package manages culturally-determined typographical (and other)
 rules, and hyphenation patterns for a wide range of languages.  A document may
 select a single language to be supported, or it may select several, in which
 case the document may switch from one language to another in a variety of
 ways.  Babel uses contributed configuration files that provide the detail of
 what has to be done for each language.  Users of XeTeX are advised to use the
 polyglossia package rather than Babel.")
-      (license license:lppl1.3+))))
+    (license license:lppl1.3+)))
 
 (define-deprecated-package texlive-latex-babel texlive-babel)
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]