guix_mirror_bot pushed a commit to branch add-compress-debug-symbols-phase
in repository guix.

commit 8366ae27c57e50bb72a79ab188f1f11b09270658
Author: Maxim Cournoyer <[email protected]>
AuthorDate: Tue Nov 4 14:56:04 2025 +0900

    gnu: libpng-apng: Update to 1.6.50, absorbing libpng-apng-next.
    
    * gnu/packages/image.scm (libpng-apng): Update to 1.6.50.
    [arguments]: Use gexps.
    [inputs]: Update libpng-apng hash.
    (libpng-apng-next): Delete variable.
    * gnu/packages/gnuzilla.scm (icecat-minimal): Replace libpng-apng-next
    with libpng-apng.
    * gnu/packages/librewolf.scm (librewolf) [inputs]: Likewise.
    
    Change-Id: I464188e4c08e9d076ce9deff8811f7ca0b753433
---
 gnu/packages/gnuzilla.scm  |  2 +-
 gnu/packages/image.scm     | 86 +++++++++++++++-------------------------------
 gnu/packages/librewolf.scm |  2 +-
 3 files changed, 29 insertions(+), 61 deletions(-)

diff --git a/gnu/packages/gnuzilla.scm b/gnu/packages/gnuzilla.scm
index 10a5eb7670..3f1b22404e 100644
--- a/gnu/packages/gnuzilla.scm
+++ b/gnu/packages/gnuzilla.scm
@@ -791,7 +791,7 @@ preferences/advanced-scripts.dtd"
            libcanberra
            libgnome
            libjpeg-turbo
-           libpng-apng-next
+           libpng-apng
            ;; UNBUNDLE-ME! libogg
            ;; UNBUNDLE-ME! libtheora ; wants theora-1.2, not yet released
            ;; UNBUNDLE-ME! libvorbis
diff --git a/gnu/packages/image.scm b/gnu/packages/image.scm
index 639b0d66ad..e56347cd3b 100644
--- a/gnu/packages/image.scm
+++ b/gnu/packages/image.scm
@@ -25,7 +25,7 @@
 ;;; Copyright © 2018 Rutger Helling <[email protected]>
 ;;; Copyright © 2020 Giacomo Leidi <[email protected]>
 ;;; Copyright © 2020 R Veera Kumar <[email protected]>
-;;; Copyright © 2020, 2023 Maxim Cournoyer <[email protected]>
+;;; Copyright © 2020, 2023, 2025 Maxim Cournoyer <[email protected]>
 ;;; Copyright © 2020, 2025 Janneke Nieuwenhuizen <[email protected]>
 ;;; Copyright © 2020 Zhu Zihao <[email protected]>
 ;;; Copyright © 2020, 2021, 2022, 2023, 2024 Vinicius Monego 
<[email protected]>
@@ -292,7 +292,7 @@ library.  It supports almost all PNG features and is 
extensible.")
   ;; The APNG patch is maintained separately and may lag behind upstream 
libpng.
   (package
     (name "libpng-apng")
-    (version "1.6.39")
+    (version "1.6.50")
     (source
      (origin
        (method url-fetch)
@@ -305,30 +305,32 @@ library.  It supports almost all PNG features and is 
extensible.")
                    "ftp://ftp.simplesystems.org/pub/libpng/png/src/history";
                    "/libpng16/libpng-" version ".tar.xz")))
        (sha256
-        (base32 "0dv90dxvmqpk7mbywyjbz8lh08cv4b0ksqp1y62mzvmlf379cihz"))))
+        (base32
+         "01r34c31gq136jwshdfira44wbl6nb8qfgj4a4vam9r0hr8rdwsd"))))
     (build-system gnu-build-system)
     (arguments
-     `(#:modules ((guix build gnu-build-system)
+     (list
+      #:modules '((guix build gnu-build-system)
                   (guix build utils)
                   (srfi srfi-1))
-       #:phases
-       (modify-phases %standard-phases
-         (add-after 'unpack 'patch-apng
-           (lambda* (#:key inputs #:allow-other-keys)
-             (define (apply-patch file)
-               (invoke "patch" "-p1" "--force"
-                       "--input" file))
-             (let ((apng.gz (assoc-ref inputs "apng")))
-               (format #t "Applying APNG patch '~a'...~%"
-                       apng.gz)
-               (invoke "sh" "-c"
-                       (string-append "gunzip < " apng.gz " > the-patch"))
-               (apply-patch "the-patch"))))
-         (add-before 'configure 'no-checks
-           (lambda _
-             (substitute* "Makefile.in"
-               (("^scripts/symbols.chk") "")
-               (("check: scripts/symbols.chk") "")))))))
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'patch-apng
+            (lambda* (#:key inputs #:allow-other-keys)
+              (define (apply-patch file)
+                (invoke "patch" "-p1" "--force"
+                        "--input" file))
+              (let ((apng.gz (assoc-ref inputs "apng")))
+                (format #t "Applying APNG patch '~a'...~%"
+                        apng.gz)
+                (invoke "sh" "-c"
+                        (string-append "gunzip < " apng.gz " > the-patch"))
+                (apply-patch "the-patch"))))
+          (add-before 'configure 'no-checks
+            (lambda _
+              (substitute* "Makefile.in"
+                (("^scripts/symbols.chk") "")
+                (("check: scripts/symbols.chk") "")))))))
     (inputs
      `(("apng" ,(origin
                   (method url-fetch)
@@ -337,12 +339,10 @@ library.  It supports almost all PNG features and is 
extensible.")
                                   version "/libpng-" version "-apng.patch.gz"))
                   (sha256
                    (base32
-                    
"1z8cx011a2c7vagwgi92rbmky1wi8awmrdldqh9f5k80pbmbdi2a"))))))
-    (native-inputs
-     (list libtool))
+                    
"0r811izi40qzy69jmhz0xlkpqlsjj89bang1b3ma6a5igh6dqzb8"))))))
+    (native-inputs (list libtool))
     ;; libpng.la says "-lz", so propagate it.
-    (propagated-inputs
-     (list zlib))
+    (propagated-inputs (list zlib))
     (synopsis "APNG patch for libpng")
     (description
      "APNG (Animated Portable Network Graphics) is an unofficial
@@ -351,38 +351,6 @@ APNG patch provides APNG support to libpng.")
     (home-page "https://sourceforge.net/projects/libpng-apng/";)
     (license license:zlib)))
 
-;; Temporary, until 76798 merges into core-packages-team, and that merges into
-;; master.
-(define-public libpng-apng-next
-  (package
-    (inherit libpng-apng)
-    (version "1.6.50")
-    (source
-     (origin
-       (method url-fetch)
-       (uri (list (string-append "mirror://sourceforge/libpng/libpng16/"
-                                 version "/libpng-" version ".tar.xz")
-                  (string-append
-                   "ftp://ftp.simplesystems.org/pub/libpng/png/src";
-                   "/libpng16/libpng-" version ".tar.xz")
-                  (string-append
-                   "ftp://ftp.simplesystems.org/pub/libpng/png/src/history";
-                   "/libpng16/libpng-" version ".tar.xz")))
-       (sha256
-        (base32
-         "01r34c31gq136jwshdfira44wbl6nb8qfgj4a4vam9r0hr8rdwsd"))))
-    (inputs
-     (modify-inputs (package-inputs libpng-apng)
-       (replace "apng"
-         (origin
-           (method url-fetch)
-           (uri
-            (string-append "mirror://sourceforge/libpng-apng/libpng16/"
-                           version "/libpng-" version "-apng.patch.gz"))
-           (sha256
-            (base32
-             "0r811izi40qzy69jmhz0xlkpqlsjj89bang1b3ma6a5igh6dqzb8"))))))))
-
 (define-public pngcrush
   (package
    (name "pngcrush")
diff --git a/gnu/packages/librewolf.scm b/gnu/packages/librewolf.scm
index 68cef6e0aa..3e1cd9af3b 100644
--- a/gnu/packages/librewolf.scm
+++ b/gnu/packages/librewolf.scm
@@ -637,7 +637,7 @@
                   libjpeg-turbo
                   libnotify
                   libpciaccess
-                  libpng-apng-next
+                  libpng-apng
                   libva
                   libvpx
                   libwebp

Reply via email to