02/02: gnu: texlive: Update to 20230313.

[guix-commits]

andreas pushed a commit to branch wip-texlive-mono
in repository guix.

commit c28fc52958983ca268d9dbe24a91e806940b65c8
Author: Andreas Enge <andreas@enge.fr>
AuthorDate: Mon Aug 7 15:20:06 2023 +0200

    gnu: texlive: Update to 20230313.
    
    Use full date for version again, since numerically 2023 is smaller than
    20210325, so the update would be considered a downgrade.
    
    * gnu/packages/texlive.scm (%texlive-date): Update to 20230313.
    (%texlive-version): Rename to...
    (%texlive-year): ...this.
    (texlive-extra-src, texlive-texmf-src, texlivebin): Update source hashes.
    (texlivebin, texlivetexmf, texlive): Use %texlive-date for version.
---
 gnu/packages/texlive.scm | 20 ++++++++++----------
 1 file changed, 10 insertions(+), 10 deletions(-)

diff --git a/gnu/packages/texlive.scm b/gnu/packages/texlive.scm
index c11b4b7e08..2fcdf1493f 100644
--- a/gnu/packages/texlive.scm
+++ b/gnu/packages/texlive.scm
@@ -72,39 +72,39 @@
   #:use-module (gnu packages xorg))
 
 (define %texlive-date "20230313")
-(define %texlive-version (string-take %texlive-date 4))
+(define %texlive-year (string-take %texlive-date 4))
 
 (define texlive-extra-src
   (origin
     (method url-fetch)
     (uri (string-append "ftp://tug.org/historic/systems/texlive/";
-                        %texlive-version "/texlive-"
+                        %texlive-year "/texlive-"
                         %texlive-date "-extra.tar.xz"))
     (sha256 (base32
-             "15ljdlxvv051q3fq5rn1ncfk0z9a8cbchqfdpv3qrgj7i4vcz102"))))
+             "1hiqvdg679yadygf23f37b3dz5ick258k1qcam9nhkhprkx7d9l0"))))
 
 (define texlive-texmf-src
   (origin
     (method url-fetch)
     (uri (string-append "ftp://tug.org/historic/systems/texlive/";
-                        %texlive-version "/texlive-"
+                        %texlive-year "/texlive-"
                         %texlive-date "-texmf.tar.xz"))
     (sha256 (base32
-             "05iz38v2j0aih3zc20qdlajk8b72ark7zz3cfq9dvlgpn43jnarp"))))
+             "0lqjm11pr9vasvivaci3k9xcmdyd08ldnh31zf8avjjs09xcfkac"))))
 
 (define-public texlivebin
   (package
     (name "texlivebin")
-    (version %texlive-version)
+    (version %texlive-date)
     (source
      (origin
        (method url-fetch)
        (uri (string-append "ftp://tug.org/historic/systems/texlive/";
-                           %texlive-version "/texlive-"
+                           %texlive-year "/texlive-"
                            %texlive-date "-source.tar.xz"))
        (sha256
         (base32
-         "0mlv2zb4zkabvf97sdakkv5xfywxkg30yicn0i4w9chywn2k9yjz"))
+         "1fbrkv7g9j6ipmwjx27l8l9l974rmply8bhf7c2iqc6h3q7aly1q"))
        (modules '((guix build utils)
                   (ice-9 ftw)))
        (snippet
@@ -325,7 +325,7 @@ This package contains the binaries.")
 (define-public texlivetexmf
   (package
    (name "texlivetexmf")
-   (version %texlive-version)
+   (version %texlive-date)
    (source texlive-texmf-src)
    (build-system gnu-build-system)
    (inputs
@@ -407,7 +407,7 @@ This package contains the complete tree of texmf-dist 
data.")
 (define-public texlive
   (package
    (name "texlive")
-   (version %texlive-version)
+   (version %texlive-date)
    (source #f)
    (build-system trivial-build-system)
    (inputs `(("bash" ,bash-minimal)     ;for wrap-program