Add Graal

Change-Id: I0350197af84ac351031e70a63fd0d483d022bad9
gnu: LLVM, Clang, libomp, lld: Update to 21.1.8.
2026-01-01 18:33:49 +01:00 · 2026-01-01 02:04:57 +01:00 · 2026-01-01 01:10:36 +01:00 · 2026-01-01 01:06:14 +01:00 · 2026-01-01 01:06:06 +01:00 · 2025-12-31 17:33:28 +00:00
156 changed files with 11948 additions and 4078 deletions
@@ -129,7 +129,7 @@ guix/build/gnu-build-system\.scm                   @guix/core-packages
 guix/build/utils\.scm                              @guix/core-packages
 guix/build-system/gnu\.scm                         @guix/core-packages

-gnu/packages/crypto\.scm                           @guix/crypto
+gnu/packages/(.*-|)crypto\.scm$                    @guix/crypto
 gnu/packages/gnupg\.scm                            @guix/crypto
 gnu/packages/nettle\.scm                           @guix/crypto
 gnu/packages/password-utils\.scm                   @guix/crypto
@@ -134,7 +134,11 @@ C++11 standard.
@section Building from Git

 If you want to hack Guix itself, it is recommended to use the latest
-version from the Git repository:
+version from the Git repository@footnote{
+Guix uses @code{master} as the default branch name. A proposal in 2025 to
+change the default branch name to @code{main} did not reach consensus.
+See @uref{https://codeberg.org/guix/guix-consensus-documents/src/branch/main/003-rename-default-branch.md,
+Guix Consensus Document 003}.}:

@example
 git clone https://git.guix.gnu.org/guix.git
@@ -18941,8 +18941,8 @@ given location at the time of the unlock attempt.
 ;; Following definition would be equivalent to running:
 ;;   cryptsetup open --key-file /crypto.key /dev/sdb1 data
 (mapped-device
- (source "/dev/sdb1)
- (target "data)
+ (source "/dev/sdb1")
+ (target "data")
 (type luks-device-mapping)
 (arguments '(#:key-file "/crypto.key")))
@end lisp
@@ -977,14 +977,13 @@ release."
        #:name "Crypto team"
        #:description
        "Secrets, passwords, cryptography and security related packages."
-        #:scope (list
-                 "gnu/packages/crypto.scm"
-                 "gnu/packages/gnupg.scm"
-                 "gnu/packages/nettle.scm"
-                 "gnu/packages/password-utils.scm"
-                 "gnu/packages/security-token.scm"
-                 "gnu/packages/ssh.scm"
-                 "gnu/packages/tls.scm")))
+        #:scope (list (make-regexp* "^gnu/packages/(.*-|)crypto\\.scm$")
+                      "gnu/packages/gnupg.scm"
+                      "gnu/packages/nettle.scm"
+                      "gnu/packages/password-utils.scm"
+                      "gnu/packages/security-token.scm"
+                      "gnu/packages/ssh.scm"
+                      "gnu/packages/tls.scm")))

 (define-team science
  (team 'science
@@ -91,7 +91,7 @@ each retry."
              ((sleep*) delay)            ;else wait and retry
              (loop (+ 1 attempts)))
            (error "maximum number of retry attempts reached"
-                   (quote body ...) args))))))
+                   (quote (begin body ...)) args))))))


 ;;;
@@ -35,7 +35,7 @@
 # Copyright © 2020 Ryan Prior <rprior@protonmail.com>
 # Copyright © 2020 Jan Wielkiewicz <tona_kosmicznego_smiecia@interia.pl>
 # Copyright © 2020, 2021 Brice Waegeneire <brice@waegenei.re>
-# Copyright © 2020, 2023 Tanguy Le Carrour <tanguy@bioneland.org>
+# Copyright © 2020, 2023, 2025 Tanguy Le Carrour <tanguy@bioneland.org>
 # Copyright © 2020 Martin Becze <mjbecze@riseup.net>
 # Copyright © 2020 Malte Frank Gerdes <mate.f.gerdes@gmail.com>
 # Copyright © 2020, 2023 Vinicius Monego <monego@posteo.net>
@@ -343,6 +343,7 @@ GNU_SYSTEM_MODULES =				\
  %D%/packages/gperf.scm			\
  %D%/packages/gpodder.scm			\
  %D%/packages/gps.scm				\
+  %D%/packages/graal.scm			\
  %D%/packages/graph.scm			\
  %D%/packages/graphics.scm			\
  %D%/packages/graphviz.scm			\
@@ -803,6 +804,7 @@ GNU_SYSTEM_MODULES =				\
  %D%/system/uuid.scm				\
  %D%/system/vm.scm				\
 						\
+  %D%/system/images/a20-olinuxino-lime2.scm			\
  %D%/system/images/hurd.scm			\
  %D%/system/images/novena.scm			\
  %D%/system/images/orangepi-r1-plus-lts-rk3328.scm	\
@@ -1087,8 +1089,7 @@ dist_patch_DATA =						\
  %D%/packages/patches/cdparanoia-fpic.patch			\
  %D%/packages/patches/cdrkit-libre-cross-compile.patch	\
  %D%/packages/patches/cdrtools-3.01-mkisofs-isoinfo.patch 	\
-  %D%/packages/patches/ceph-disable-cpu-optimizations.patch	\
-  %D%/packages/patches/ceph-fix-for-newer-boost.patch		\
+  %D%/packages/patches/ceph-fix-cmake.patch                     \
  %D%/packages/patches/cf-tool-add-languages.patch		\
  %D%/packages/patches/chmlib-inttypes.patch			\
  %D%/packages/patches/cl-asdf-config-directories.patch		\
@@ -1523,6 +1524,7 @@ dist_patch_DATA =						\
  %D%/packages/patches/gpaste-fix-paths.patch			\
  %D%/packages/patches/gpm-glibc-2.26.patch			\
  %D%/packages/patches/gpodder-disable-updater.patch		\
+  %D%/packages/patches/graalvm-mx-check-failed-after-join.patch	\
  %D%/packages/patches/grantlee-fix-i586-precision.patch	\
  %D%/packages/patches/grantlee-register-metaenumvariable.patch	\
  %D%/packages/patches/grep-timing-sensitive-test.patch		\
@@ -1880,8 +1882,6 @@ dist_patch_DATA =						\
  %D%/packages/patches/mpc123-initialize-ao.patch		\
  %D%/packages/patches/mpg321-CVE-2019-14247.patch		\
  %D%/packages/patches/mpg321-gcc-10.patch			\
-  %D%/packages/patches/mpv-0.40.0-fix-ffmpeg-8.0.patch		\
-  %D%/packages/patches/mpv-0.40.0-fix-wayland-cpu-usage.patch	\
  %D%/packages/patches/modglue-fix-build.patch		\
  %D%/packages/patches/modem-manager-fix-test-wrapper.patch	\
  %D%/packages/patches/module-init-tools-moduledir.patch	\
@@ -2483,7 +2483,6 @@ dist_patch_DATA =						\
  %D%/packages/patches/wmctrl-64-fix.patch			\
  %D%/packages/patches/wmfire-dont-inline-draw-fire.patch	\
  %D%/packages/patches/wmfire-update-for-new-gdk-versions.patch	\
-  %D%/packages/patches/woof-doom-unbundle-spng-miniz.patch	\
  %D%/packages/patches/wordnet-CVE-2008-2149.patch			\
  %D%/packages/patches/wordnet-CVE-2008-3908-pt1.patch			\
  %D%/packages/patches/wordnet-CVE-2008-3908-pt2.patch			\
@@ -30,10 +30,13 @@
  #:use-module (gnu packages check)
  #:use-module (gnu packages gettext)
  #:use-module (gnu packages perl)
+  #:use-module (gnu packages python-build)
  #:use-module (guix packages)
  #:use-module (guix download)
+  #:use-module (guix gexp)
  #:use-module (gnu packages)
  #:use-module (guix build-system gnu)
+  #:use-module (guix build-system pyproject)
  #:use-module (guix build-system python)
  #:use-module (guix utils))

@@ -95,33 +98,28 @@
 (define-public python-pylibacl
  (package
    (name "python-pylibacl")
-    (version "0.6.0")
+    (version "0.7.3")
    (source
-      (origin
-        (method url-fetch)
-        (uri (pypi-uri "pylibacl" version))
-        (sha256
-          (base32
-            "1zyrk2m20p5b6bdwxhrwib273i6i71zyr5hzssbxfqis5qra9848"))))
-    (build-system python-build-system)
+     (origin
+       (method url-fetch)
+       (uri (pypi-uri "pylibacl" version))
+       (sha256
+        (base32 "08pr5cbipij3j591bihh72r5h14lyrspy24qwmfjsn0c1rcgp7wx"))))
+    (build-system pyproject-build-system)
    (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (add-after 'unpack 'disable-tests
-           (lambda* (#:key outputs inputs #:allow-other-keys)
-             ;; These tests operate on real files, but our tmpfs does not support
-             ;; ACLs.
-             (substitute* "tests/test_acls.py"
-               (("( *)def test_applyto(_extended(_mixed)?)?" match indent)
-                (string-append indent "@pytest.mark.skip(reason=\"guix\")\n"
-                               match)))))
-         (replace 'check
-           (lambda* (#:key inputs outputs tests? #:allow-other-keys)
-             (when tests?
-               (add-installed-pythonpath inputs outputs)
-               (invoke "pytest" "tests")))))))
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'disable-tests
+            (lambda* (#:key outputs inputs #:allow-other-keys)
+              ;; These tests operate on real files, but our tmpfs does not support
+              ;; ACLs.
+              (substitute* "tests/test_acls.py"
+                (("( *)def test_applyto(_extended(_mixed)?)?" match indent)
+                 (string-append indent "@pytest.mark.skip(reason=\"guix\")\n"
+                                match))))))))
    (inputs (list acl))
-    (native-inputs (list python-pytest))
+    (native-inputs (list python-pytest python-setuptools))
    (home-page "https://pylibacl.k1024.org/")
    (synopsis "POSIX.1e @acronym{ACLs, access control lists} for Python")
    (description
@@ -78,6 +78,7 @@
 ;;; Copyright © 2024 nik gaffney <nik@fo.am>
 ;;; Copyright © 2025 Simon Streit <simon@netpanic.org>
 ;;; Copyright © 2025 Luca Kredel <luca.kredel@web.de>
+;;; Copyright © 2025 ROCKTAKEY <rocktakey@gmail.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -6950,6 +6951,41 @@ with which other processes.  It provides more usable versions of @command{ps},
 network, which causes enabled computers to power on.")
    (license license:gpl2+)))

+(define-public witr
+  (package
+    (name "witr")
+    (version "0.1.1")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://github.com/pranshuparmar/witr")
+              (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "016yiwn0b00ynllka6h2w6gk2yjzj5nx2xf26shb0cz4crdwww0d"))))
+    (build-system go-build-system)
+    (arguments
+     (list
+      #:install-source? #f
+      #:import-path "github.com/pranshuparmar/witr/cmd/witr"
+      #:unpack-path "github.com/pranshuparmar/witr"
+      #:build-flags #~(list "-ldflags"
+                            (string-append "-X main.version=" #$version))))
+    (home-page "https://github.com/pranshuparmar/witr")
+    (synopsis "Utility to show why the process is running")
+    (description
+     "The @dfn{witr} (why-is-this-running), is a utility to show:
+@enumerate
+@item What is running?
+@item How did it start?
+@item What is keeping it running?
+@item What context does it belong to?
+@end enumerate
+It shows which process uses the port, and its information like process tree,
+working directory, user, pid, command, and so on.")
+    (license license:asl2.0)))
+
 (define-public xfel
  (package
    (name "xfel")
@@ -300,6 +300,38 @@ barcodes of the modern ECC200 variety.  libdmtx is a shared library, allowing
 C/C++ programs to use its capabilities without restrictions or overhead.")
    (license license:bsd-3)))

+(define-public dmtx-utils
+  (package
+    (name "dmtx-utils")
+    (version "0.7.6")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/dmtx/dmtx-utils/")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        "06m3qncqdlcnmw83n95yrx2alaq6bld320ax26z4ndnla41yk0p4")))
+    (build-system gnu-build-system)
+    (native-inputs (list autoconf automake libtool pkg-config))
+    (inputs (list libdmtx imagemagick libjpeg-turbo))
+    (home-page "https://github.com/dmtx/dmtx-utils/")
+    (synopsis "Utilities for working with Data Matrix barcodes")
+    (description
+     "libdmtx is a software library that enables programs to read and write Data
+Matrix barcodes of the modern ECC200 variety.  This package, dmtx-utils,
+provides command line utilities that allow scripts and command line users to
+use libdmtx functionality.
+
+This package includes the following programs:
+@enumerate
+@item @code{dmtxquery}: Extract information from dmtxread output.
+@item @code{dmtxread}: Scan Data Matrix barcodes.
+@item @code{dmtxwrite}: Create Data Matrix barcodes.
+@end enumerate")
+    (license (list license:lgpl2.1 license:gpl2))))
+
 ;; XXX: qt variant utils are broken: zbarcam-qt fails with segmentation fault.
 (define-public zbar
  (package
@@ -4654,21 +4654,21 @@ tempo and pitch of an audio recording independently of one another.")
 (define-public rtmidi
  (package
    (name "rtmidi")
-    (version "5.0.0")
+    (version "6.0.0")
    (source (origin
              (method url-fetch)
-              (uri (string-append "https://www.music.mcgill.ca/~gary/rtmidi"
+              (uri (string-append "https://caml.music.mcgill.ca/~gary/rtmidi"
                                  "/release/rtmidi-" version ".tar.gz"))
              (file-name (string-append "rtmidi-" version ".tar.gz"))
              (sha256
               (base32
-                "1ff2yfq3k4l209fr71v3w98fpjjv1chs09vkbmxj03lcikahxns8"))))
+                "0nyvck6qlncbfpplgxspjk77fmi05w78ik0cf8039hj29gvcqq2r"))))
    (build-system gnu-build-system)
    (inputs
     (list alsa-lib jack-2))
    (native-inputs
     (list autoconf automake libtool pkg-config))
-    (home-page "https://www.music.mcgill.ca/~gary/rtmidi")
+    (home-page "https://caml.music.mcgill.ca/~gary/rtmidi")
    (synopsis "Cross-platform MIDI library for C++")
    (description
     "RtMidi is a set of C++ classes (RtMidiIn, RtMidiOut, and API specific
@@ -6194,6 +6194,41 @@ the following features:
 ")
    (license license:lgpl3+)))

+(define-public normalize
+  (package
+    (name "normalize")
+    (version "0.7.7")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append
+             "http://download.savannah.gnu.org/releases/normalize/normalize-"
+             version ".tar.gz"))
+       (sha256
+        (base32 "1n5khss10vjjp6w69q9qcl4kqfkd0pr555lgqghrchn6rjms4mb0"))))
+    (build-system gnu-build-system)
+    (arguments
+     (list
+      #:make-flags
+      #~(list "CFLAGS=-g -O2 -Wno-error=implicit-function-declaration")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'patch-shell-path
+            (lambda* (#:key inputs #:allow-other-keys)
+              (substitute* "test/Makefile.in"
+                (("/bin/sh")
+                 (search-input-file inputs "/bin/sh"))))))))
+    (inputs (list libmad))
+    (home-page "https://normalize.nongnu.org/")
+    (synopsis "Audio track volume normalizer")
+    (description
+     "@code{normalize} is an audio track normalizer.
+For a collection of tracks with varying volumes, it is able to
+make the loudness consistent between them.  This is helpful
+when making mixtapes, for example.
+It can work with WAV and MP3 files.")
+    (license license:gpl2)))
+
 (define-public lv2-speech-denoiser
  (let ((commit "04cfba929630404f8d4f4ca5bac8d9b09a99152f")
        (revision "1"))
@@ -574,13 +574,13 @@ rsnapshot uses hard links to deduplicate identical files.")
 (define-public borg
  (package
    (name "borg")
-    (version "1.4.1")
+    (version "1.4.3")
    (source
     (origin
       (method url-fetch)
       (uri (pypi-uri "borgbackup" version))
       (sha256
-        (base32 "0f9qj05i02aj17lhk97fqyknb1jx3h9xr8d569mhp44xq7qziyxq"))
+        (base32 "07s4jqcv03s98hi6lvqpvmnnhl532qnvv11mjy2xc08rbmsgmfvr"))
       (snippet
        #~(begin
            ;; Delete files generated by Cython.  We used to have a regex that
@@ -1209,39 +1209,42 @@ compression parameters used by Gzip.")
 (define-public borgmatic
  (package
    (name "borgmatic")
-    (version "2.0.7")
+    (version "2.0.13")
    (source
     (origin
-       (method url-fetch)
-       (uri (pypi-uri "borgmatic" version))
+       ;; PyPI archive does not contain NEWS file needed for one test.
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://projects.torsion.org/borgmatic-collective/borgmatic")
+              (commit version)))
+       (file-name (git-file-name name version))
       (sha256
-        (base32 "01l44ny2zyn7x1hhbvhhhwr12jipcjxl3j1cz13kf6c3bdfwms8y"))))
+        (base32
+         "05w3j4knhsg4w0a0yrz8c7lvz3vp3nf95ddmql9i8mqknjqddm1v"))))
    (build-system pyproject-build-system)
    (arguments
     (list
-      ;; XXX: all tests fail with error: AttributeError: module
-      ;; '_pytest.runner' has no attribute 'call_runtest_hook'.
-      #:tests? #f
-      #:phases #~(modify-phases %standard-phases
-                   (add-after 'unpack 'configure
-                     (lambda* (#:key inputs #:allow-other-keys)
-                       ;; Set absolute store path to borg.
-                       (substitute* "borgmatic/commands/borgmatic.py"
-                         (("\\.get\\('local_path', 'borg'\\)")
-                          (string-append ".get('local_path', '"
-                                         (search-input-file inputs "bin/borg")
-                                         "')")))
-                       (substitute* "tests/unit/commands/test_borgmatic.py"
-                         (("(module.get_local_path.+ == )'borg'" all start)
-                          (string-append start "'"
-                                         (search-input-file inputs "bin/borg")
-                                         "'")))))
-                   (add-before 'check 'set-path
-                     (lambda _
-                         ;; Tests require the installed executable.
-                         (setenv "PATH"
-                                 (string-append #$output "/bin" ":"
-                                                (getenv "PATH"))))))))
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'configure
+            (lambda* (#:key inputs #:allow-other-keys)
+              ;; Set absolute store path to borg.
+              (substitute* "borgmatic/commands/borgmatic.py"
+                (("\\.get\\('local_path', 'borg'\\)")
+                 (string-append ".get('local_path', '"
+                                (search-input-file inputs "bin/borg")
+                                "')")))
+              (substitute* "tests/unit/commands/test_borgmatic.py"
+                (("(module.get_local_path.+ == )'borg'" all start)
+                 (string-append start "'"
+                                (search-input-file inputs "bin/borg")
+                                "'")))))
+          (add-before 'check 'set-path
+            (lambda _
+              ;; Tests require the installed executable.
+              (setenv "PATH"
+                      (string-append #$output "/bin" ":"
+                                     (getenv "PATH"))))))))
    (native-inputs
     (list python-flexmock
           python-pytest
@@ -1266,7 +1269,7 @@ borgmatic is powered by borg.")
 (define-public vorta
  (package
    (name "vorta")
-    (version "0.10.3")
+    (version "0.11.1")
    ;; The test folder is not included in the PyPI archive.
    (source (origin
              (method git-fetch)
@@ -1276,7 +1279,7 @@ borgmatic is powered by borg.")
              (file-name (git-file-name name version))
              (sha256
               (base32
-                "0b4042a0lpbmwlmbh5559b2x9vr2055w6jjrs7088n45d7rkn4sn"))))
+                "16r9ch80i6nfngah634id16fqnmn62ayh60j62zxn5cfivcn3wsq"))))
    (build-system pyproject-build-system)
    (arguments
     (list
@@ -16242,9 +16242,11 @@ applications for tackling some common problems in a user-friendly way.")
                (sha256
                 (base32
                  "07q0alxah6xl1hibaj1kj7pdzq3pg6csyapsihbwlbmqyfmllbgz"))))
-      (build-system python-build-system)
+      (build-system pyproject-build-system)
      (arguments
       (list
+        #:test-backend #~'custom
+        #:test-flags #~(list "test/test_all.py")
        #:phases
        #~(modify-phases %standard-phases
            ;; Scipy 1.12 no longer has binom_test or polyfit
@@ -16273,15 +16275,12 @@ applications for tackling some common problems in a user-friendly way.")
                   (string-append "(\"" #$output
                                  "/etc/bash_completion.d\""))
                  (("extras/\\.bash_completion")
-                   "extras/tadbit"))))
-            (replace 'check
-              (lambda* (#:key tests? #:allow-other-keys)
-                (when tests?
-                  (invoke "python3" "test/test_all.py")))))))
+                   "extras/tadbit")))))))
      (native-inputs
       (list `(,glib "bin") ;for gtester
             glib
-             pkg-config))
+             pkg-config
+             python-setuptools))
      (inputs
       ;; TODO: add Chimera for visualization
       (list imp
@@ -21061,15 +21060,24 @@ polymorphisms) and indels with respect to a reference genome and more.")
     (origin
       (method git-fetch)
       (uri (git-reference
-             (url "https://github.com/etal/cnvkit")
-             (commit (string-append "v" version))))
+              (url "https://github.com/etal/cnvkit")
+              (commit (string-append "v" version))))
       (file-name (git-file-name name version))
       (sha256
        (base32 "090yh17symcahddx399kcx0mcw4gdrcc2jil3p8lb92r8c8kglb5"))))
    (build-system pyproject-build-system)
+    (arguments
+     (list
+      ;; tests: 70 passed, 1 warning
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'fix-pytest-config
+            (lambda _
+              (substitute* "pyproject.toml"
+                (("filterwarnings =.*")
+                 "")))))))
    (propagated-inputs
     (list python-biopython
-           python-future
           python-matplotlib
           python-numpy
           python-pandas
@@ -226,7 +226,7 @@ of the Transmission BitTorrent client, using its HTTP RPC protocol.")
 (define-public stig
  (package
    (name "stig")
-    (version "0.14.0a0")
+    (version "0.14.1a0")
    (source
     (origin
       (method git-fetch)
@@ -235,7 +235,18 @@ of the Transmission BitTorrent client, using its HTTP RPC protocol.")
              (commit (string-append "v" version))))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "1jfcgncva94pyzjifar1l6wlmb7aylg0l4fxljc83rkbj1a2aan0"))))
+        (base32 "0196brcasdyn0mx3h2cqlgrx8x9fyv2n7bmx13nj58vnf3y4c1hg"))))
+    (build-system pyproject-build-system)
+    (arguments
+     (list
+      #:tests? #f ;tests require network access
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'loosen-version-restrictions
+            (lambda _
+              (substitute* "setup.py"
+                (("urwidtrees==1.0.3")
+                 "urwidtrees>=1.0.3")))))))
    (propagated-inputs
     (list python-urwid
           python-urwidtrees
@@ -246,20 +257,12 @@ of the Transmission BitTorrent client, using its HTTP RPC protocol.")
           python-natsort
           python-async-timeout
           python-setproctitle))
-    (arguments
-     (list
-      #:tests? #f ;tests require network access
-      #:phases #~(modify-phases %standard-phases
-                   (add-after 'unpack 'loosen-version-restrictions
-                     (lambda _
-                       (substitute* "setup.py"
-                         (("urwidtrees==1.0.3") "urwidtrees>=1.0.3")))))))
    (inputs (list python))
-    (build-system python-build-system)
+    (native-inputs (list python-setuptools))
    (synopsis "TUI and CLI for the BitTorrent client Transmission")
    (description
-     "Stig is a @acronym{TUI, Text User Interface} and @acronym{CLI, Command Line
-Interface} client for the BitTorrent client Transmission.")
+     "Stig is a @acronym{TUI, Text User Interface} and @acronym{CLI, Command
+Line Interface} client for the BitTorrent client Transmission.")
    (home-page "https://github.com/rndusr/stig")
    (license l:gpl3)))

@@ -537,20 +540,6 @@ focusing on efficiency and scalability.  It runs on embedded devices as well as
 desktops.")
    (license l:bsd-2)))

-(define-public libtorrent-rasterbar-1.2
-  (package
-    (inherit libtorrent-rasterbar)
-    (version "1.2.20")
-    (source
-     (origin
-       (method url-fetch)
-       (uri
-        (string-append "https://github.com/arvidn/libtorrent/"
-                       "releases/download/v" version "/"
-                       "libtorrent-rasterbar-" version ".tar.gz"))
-       (sha256
-        (base32 "1z5rdynzxcm6wb7v48ssfbwjairbjacb8rjix5fn70fw4668xgyc"))))))
-
 (define-public qbittorrent
  (package
    (name "qbittorrent")
@@ -159,9 +159,6 @@ core computer science concepts such as abstraction in programming,
 metalinguistic abstraction, recursion, interpreters, and modular programming.")
      (license license:cc-by-sa4.0))))

-;; It may be removed after 2025-12-19.
-(define-deprecated/public-alias sicp book-sicp)
-
 (define-public book-sparc
  (package
    (name "book-sparc")
@@ -338,7 +335,7 @@ parallel study, and original language study.")
 (define-public book-emacs-lisp-elements
  (package
    (name "book-emacs-lisp-elements")
-    (version "2.0.0")
+    (version "2.0.1")
    (source
     (origin
       (method git-fetch)
@@ -347,7 +344,7 @@ parallel study, and original language study.")
             (commit version)))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "0w3jxgkynq37rn7c17pnricykqf3gmq4crsvkz2j2g3hc0ydf6qp"))))
+        (base32 "0774zycgx3zspn6f8pszap1751xgrlv2h3x66kksnj589nfnwzil"))))
    (build-system emacs-build-system)
    (arguments
     (list
@@ -8,7 +8,7 @@
 ;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
 ;;; Copyright © 2018 Arun Isaac <arunisaac@systemreboot.net>
 ;;; Copyright © 2018, 2019, 2021 Ricardo Wurmus <rekado@elephly.net>
-;;; Copyright © 2018, 2020, 2023 Maxim Cournoyer <maxim@guixotic.coop>
+;;; Copyright © 2018, 2020, 2023, 2025 Maxim Cournoyer <maxim@guixotic.coop>
 ;;; Copyright © 2018, 2020 Efraim Flashner <efraim@flashner.co.il>
 ;;; Copyright © 2019 Mathieu Othacehe <m.othacehe@gmail.com>
 ;;; Copyright © 2019, 2020 Giacomo Leidi <therewasa@fishinthecalculator.me>
@@ -239,6 +239,21 @@ across a broad spectrum of applications.")
    (license (license:x11-style "https://www.boost.org/LICENSE_1_0.txt"
                                "Some components have other similar licences."))))

+(define-public boost-1.88
+  (package
+    (inherit boost)
+    (name "boost")
+    (version "1.88.0")
+    (source (origin
+              (inherit (package-source boost))
+              (uri (string-append
+                    "https://archives.boost.io/release/"
+                    version "/source/boost_"
+                    (version-with-underscores version) ".tar.bz2"))
+              (sha256
+               (base32
+                "0yrgn6syk260ckq9ld44vjv1bl6bamhy3jbp10kikcipcv0d5na6"))))))
+
 (define-public boost-1.83
  (hidden-package (package (inherit boost)
    (name "boost")
@@ -2,6 +2,7 @@
 ;;; Copyright © 2022 Christopher Rodriguez <yewscion@gmail.com>
 ;;; Copyright © 2022 Liliana Marie Prikler <liliana.prikler@gmail.com>
 ;;; Copyright © 2025 Lee Thompson <lee.p.thomp@gmail.com>
+;;; © 2025 case_lambda <case_lambda@disroot.org>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -36,77 +37,71 @@
  #:use-module (gnu packages compression))

 (define-public dbqn
-  (let ((commit "88f2b43966a75cc2c382421218eb30003bb16f4a")
-        (revision "1"))
-    (package
-      (name "dbqn")
-      (version (git-version "0.2.1" revision commit))
-      (source (origin
-                (method git-fetch)
-                (uri (git-reference
-                      (url "https://github.com/dzaima/BQN")
-                      (commit commit)))
-                (file-name (git-file-name name version))
-                (sha256
-                 (base32
-                  "06mzvv7kmandhgwb6jwz3rivsj4ic549sy8afnb5zr6mfn5isyg5"))))
-      (build-system gnu-build-system)
-      (arguments
-       (list
-        #:imported-modules `(,@%default-gnu-imported-modules
-                             (guix build ant-build-system))
-        #:modules `((guix build gnu-build-system)
-                    ((guix build ant-build-system)
-                     #:prefix ant:)
-                    (guix build utils))
-        #:phases #~(modify-phases %standard-phases
-                     (delete 'configure)
-                     (replace 'build
-                       (lambda* _
-                         (invoke "./build")
-                         (chmod "./BQN" #o755)))
-                     (replace 'check
-                       (lambda* (#:key tests? #:allow-other-keys)
-                         (when tests?
-                           (system "./BQN ./test/test"))))
-                     (add-after 'install 'reorder-jar-content
-                       (lambda* (#:key outputs #:allow-other-keys)
-                         (apply (assoc-ref ant:%standard-phases
-                                           'reorder-jar-content)
-                                #:outputs (list outputs))))
-                     (add-after 'reorder-jar-content 'jar-indices
-                       (lambda* (#:key outputs #:allow-other-keys)
-                         (apply (assoc-ref ant:%standard-phases
-                                           'generate-jar-indices)
-                                #:outputs (list outputs))))
-                     (add-after 'jar-indices 'fix-jar-timestamps
-                       (lambda* (#:key outputs #:allow-other-keys)
-                         (apply (assoc-ref ant:%standard-phases
-                                           'reorder-jar-content)
-                                #:outputs (list outputs))))
-                     (replace 'install
-                       (lambda* (#:key outputs #:allow-other-keys)
-                         (let* ((out (assoc-ref outputs "out"))
-                                (dest-bin (string-append out "/bin"))
-                                (dest-jar (string-append out "/share/java")))
-                           (mkdir-p dest-bin)
-                           (mkdir-p dest-jar)
-                           (rename-file "BQN" "dbqn")
-                           (install-file "dbqn" dest-bin)
-                           (install-file "BQN.jar" dest-jar)
-                           (substitute* (string-append dest-bin "/dbqn")
-                             (("BQN.jar")
-                              (string-append dest-jar "/BQN.jar")))))))))
-      (native-inputs (list `(,icedtea-8 "jdk") zip))
-      (inputs (list icedtea-8 bash-minimal))
-      (synopsis "BQN implementation based on dzaima/APL")
-      (description
-       "dbqn is a Java implementation of the
+  (package
+    (name "dbqn")
+    (version "0.2.2")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/dzaima/BQN")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "1zy3y9wbmaw0mrd2sp7d1r912gvs9k0mzw5d3drgmbzkbvpd6iq1"))))
+    (build-system gnu-build-system)
+    (arguments
+     (list
+      #:imported-modules `((guix build ant-build-system)
+                           ,@%default-gnu-imported-modules)
+      #:modules '((guix build gnu-build-system)
+                  ((guix build ant-build-system)
+                   #:prefix ant:)
+                  (guix build utils))
+      #:phases
+      #~(modify-phases %standard-phases
+          (delete 'configure)
+          (replace 'build
+            (lambda _
+              (invoke "./build")))
+          (replace 'check
+            (lambda* (#:key tests? #:allow-other-keys)
+              (if tests?
+                  (invoke "./BQN" "./test/test")
+                  (begin
+                    (display "test suite not run")
+                    (newline)))))
+          (add-after 'install 'reorder-jar-content
+            (assoc-ref ant:%standard-phases
+                       'reorder-jar-content))
+          (add-after 'reorder-jar-content 'generate-jar-indices
+            (assoc-ref ant:%standard-phases
+                       'generate-jar-indices))
+          (add-after 'generate-jar-indices 'strip-jar-timestamps
+            (assoc-ref ant:%standard-phases
+                       'strip-jar-timestamps))
+          (replace 'install
+            (lambda* (#:key inputs #:allow-other-keys)
+              (let ((dest-jar (string-append #$output "/share/java")))
+                (rename-file "BQN" "dbqn")
+                (substitute* "dbqn"
+                  (("java")
+                   (search-input-file inputs "/bin/java"))
+                  (("BQN.jar")
+                   (string-append dest-jar "/BQN.jar")))
+                (install-file "BQN.jar" dest-jar)
+                (install-file "dbqn"
+                              (string-append #$output "/bin"))))))))
+    (native-inputs (list `(,icedtea-8 "jdk") zip))
+    (inputs (list bash-minimal icedtea-8))
+    (synopsis "BQN implementation based on dzaima/APL")
+    (description
+     "dbqn is a Java implementation of the
@uref{https://mlochbaum.github.io/BQN/, BQN programming language} that does
 not need to be bootstrapped, based on an earlier Java implementation of APL by
 the same author.")
-      (home-page "https://github.com/dzaima/BQN")
-      (license license:expat))))
+    (home-page "https://github.com/dzaima/BQN")
+    (license license:expat)))

 (define bqn-sources
  ;; Aside from dbqn above, the main bqn repository is used by other
@@ -51,6 +51,7 @@
  #:use-module (guix build-system copy)
  #:use-module (guix build-system gnu)
  #:use-module (guix build-system meson)
+  #:use-module (guix build-system pyproject)
  #:use-module (guix build-system python)
  #:use-module (guix store)
  #:use-module (gnu packages)
@@ -72,6 +73,7 @@
  #:use-module (gnu packages ncurses)
  #:use-module (gnu packages pcre)
  #:use-module (gnu packages python)
+  #:use-module (gnu packages python-build)
  #:use-module (gnu packages python-xyz)
  #:use-module (gnu packages autotools)
  #:use-module (gnu packages gettext)
@@ -466,23 +468,26 @@ language as input.")
             (commit (string-append "v" version))))
       (file-name (git-file-name name version))
       (sha256
-        (base32
-         "1rihvlg11nzk70kfzz4i3gi5izcy46w05ismcx04p5j1hlim0brb"))))
-    (build-system python-build-system)
+        (base32 "1rihvlg11nzk70kfzz4i3gi5izcy46w05ismcx04p5j1hlim0brb"))))
+    (build-system pyproject-build-system)
    (arguments
     (list
-      #:phases #~(modify-phases %standard-phases
-                   (add-after 'unpack 'unbundle-ply
-                     (lambda _
-                       (rmdir "pcpp/ply")
-                       (substitute* "setup.py"
-                         (("'pcpp/ply/ply'") "")))))))
-    (native-inputs (list python-pytest))
+      #:test-backend #~'unittest
+      #:test-flags #~(list "discover" "-s" "tests" "-p" "*.py")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'unbundle-ply
+            (lambda _
+              (rmdir "pcpp/ply")
+              (substitute* "setup.py"
+                (("'pcpp/ply/ply'")
+                 "")))))))
+    (native-inputs (list python-setuptools))
    (propagated-inputs (list python-ply))
    (home-page "https://github.com/ned14/pcpp")
    (synopsis "C99 preprocessor written in Python")
-    (description "This package provides a C99 preprocessor written in pure
-Python.")
+    (description
+     "This package provides a C99 preprocessor written in pure Python.")
    (license license:bsd-3)))

 (define-public aml
@@ -1008,7 +1008,7 @@ has been designed to be fast, light and unintrusive.")
 (define-public kyua
  (package
    (name "kyua")
-    (version "0.13")
+    (version "0.14.1")
    (source (origin
              (method git-fetch)
              (uri (git-reference
@@ -1017,7 +1017,7 @@ has been designed to be fast, light and unintrusive.")
              (file-name (git-file-name name version))
              (sha256
               (base32
-                "1jzdal9smhmivj18683a5gy8jd2p1dbni7kcpaxq4g9jgjdidcrq"))))
+                "0w238ynhnjz7p2v8fbgxv35kl1x7a4vs86227qhb4gxncr75nsbl"))))
    (build-system gnu-build-system)
    (arguments
     (list
@@ -1042,16 +1042,6 @@ has been designed to be fast, light and unintrusive.")
                 (format #f "chdir(~s)" (dirname (which "ls"))))
                (("\"/bin/ls\"")
                 (string-append "\"" (which "ls") "\"")))))
-          (add-before 'check 'prepare-for-tests
-            (lambda _
-              ;; The test suite expects HOME to be writable.
-              (setenv "HOME" "/tmp")
-              ;; Generate the autom4te-generated testsuite script, which
-              ;; contains a '/bin/sh' shebang.
-              (invoke "make" "bootstrap/testsuite")
-              (substitute* "bootstrap/testsuite"
-                (("/bin/sh")
-                 (which "sh")))))
          (add-after 'unpack 'disable-problematic-tests
            (lambda _
              ;; The stacktrace tests expect core files to be dumped to the
@@ -1060,12 +1050,8 @@ has been designed to be fast, light and unintrusive.")
              ;; https://github.com/freebsd/kyua/issues/214).
              (substitute* "utils/Kyuafile"
                ((".*atf_test_program.*stacktrace_test.*")
-                 ""))))
-          (add-after 'install 'delete-installed-tests
-            (lambda _
-              ;; Delete 200 MiB of tests.
-              (delete-file-recursively (string-append #$output "/tests")))))))
-    (native-inputs (list autoconf automake gdb-minimal pkg-config))
+                 "")))))))
+    (native-inputs (list autoconf automake gdb-minimal libtool pkg-config))
    (inputs (list atf lutok sqlite))
    (home-page "https://github.com/freebsd/kyua")
    (synopsis "Testing framework for infrastructure software")
@@ -3165,57 +3151,6 @@ non-technical or business participants in a software project.  Behave uses
 tests written in a natural language style, backed up by Python code.")
    (license license:x11)))

-(define-public python-behave-web-api
-  (package
-    (name "python-behave-web-api")
-    (version "2.0.1")
-    (source
-     (origin
-       (method url-fetch)
-       (uri (pypi-uri "behave-web-api" version))
-       (sha256
-        (base32
-         "04p5sp6wck3mafj634w1fpvfhxm170l5q3hfb9d06pi71ql606n6"))))
-    (build-system pyproject-build-system)
-    (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (add-after 'unpack 'fix-dependencies
-           (lambda _
-             (substitute* "setup.py"
-               (("'wheel'") "")                ; We don't use it.
-               (("'ordereddict==1.1'") ""))    ; Python >= 2.7 has it built-in.
-             #t)))))
-    (native-inputs
-     (list python-pytest
-           python-setuptools
-           python-wheel))
-    (propagated-inputs
-     (list behave python-requests))
-    (home-page "https://github.com/jefersondaniel/behave-web-api")
-    (synopsis "Provides testing for JSON APIs with Behave for Python")
-    (description "This package provides testing utility modules for testing
-JSON APIs with Behave.")
-    (license license:expat)))
-
-(define-public python-nose-timer
-  (package
-    (name "python-nose-timer")
-    (version "0.7.5")
-    (source
-      (origin
-        (method url-fetch)
-        (uri (pypi-uri "nose-timer" version))
-        (sha256
-          (base32 "05wzkc88vbzw62pqkvhl33211b90kns0lny70b7qw62rcg4flzk4"))))
-    (build-system python-build-system)
-    (propagated-inputs
-     (list python-nose python-termcolor))
-    (home-page "https://github.com/mahmoudimus/nose-timer")
-    (synopsis "Timer plugin for nosetests")
-    (description "Shows how much time was needed to run individual tests.")
-    (license license:expat)))
-
 (define-public python-freezegun
  (package
    (name "python-freezegun")
@@ -855,6 +855,7 @@ dependency graph expansion and the creation of classpaths.")
       #:doc-dirs '()
       ;; FIXME: Could not initialize class org.eclipse.aether.transport.http.SslSocketFactory
       #:tests? #f
+       #:jdk ,openjdk11
       #:phases
       (modify-phases %standard-phases
         ;; FIXME: Currently, the S3 transporter depends on ClojureScript,
@@ -46,6 +46,7 @@
  #:use-module (guix build-system cmake)
  #:use-module (guix build-system copy)
  #:use-module (guix build-system emacs)
+  #:use-module (guix build-system pyproject)
  #:use-module (guix build-system python)
  #:use-module ((guix search-paths) #:select ($SSL_CERT_DIR $SSL_CERT_FILE))
  #:use-module (gnu packages)
@@ -460,14 +461,40 @@ and workspaces that can be used in the compiler environment of your choice.")
       (uri (pypi-uri "cmakelang" version))
       (sha256
        (base32 "0zz6g1ignqanl4ja9f5nrlk5f3mvv7cp5y9yswjd0m06n23jx603"))))
-    (build-system python-build-system)
-    (arguments (list #:tests? #f        ;no test data in pypi archive
-                     #:phases #~(modify-phases %standard-phases
-                                  (add-after 'unpack 'adjust-setup.py
-                                    (lambda _
-                                      (substitute* "setup.py"
-                                        (("cmakelang/doc/README.rst")
-                                         "README.rst")))))))
+    (build-system pyproject-build-system)
+    (arguments
+     (list
+      #:tests? #f        ;no test data in pypi archive
+      #:modules '((guix build pyproject-build-system)
+                  (guix build utils)
+                  (ice-9 textual-ports))
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'adjust-setup.py
+            (lambda _
+              (substitute* "setup.py"
+                (("cmakelang/doc/README.rst")
+                 "README.rst"))
+              ;; XXX: setup.py has multiple setup() calls, breaking the 'build
+              ;; phase ; in this case the package is wrong, but conveniently
+              ;; our goal is the first setup() call, so discard what comes from
+              ;; the second one.
+              (rename-file "setup.py" "setup.py.bak")
+              (call-with-input-file "setup.py.bak"
+                (lambda (in)
+                  (call-with-output-file "setup.py"
+                    (lambda (out)
+                      (let loop ((line (get-line in))
+                                 (setup-seen #f))
+                        (unless (or (eof-object? line)
+                                    (and (string-prefix? "setup(" line)
+                                         setup-seen))
+                          (display line out)
+                          (newline out)
+                          (loop (get-line in)
+                                (or setup-seen
+                                    (string-prefix? "setup(" line))))))))))))))
+    (native-inputs (list python-setuptools))
    (inputs (list python-jinja2 python-pyyaml python-six))
    (home-page "https://github.com/cheshirekow/cmake_format/")
    (synopsis "Language tools for CMake (format, lint, etc.)")
@@ -84,6 +84,7 @@
  #:use-module (gnu packages boost)
  #:use-module (gnu packages check)
  #:use-module (gnu packages cpp)
+  #:use-module (gnu packages crypto)
  #:use-module (gnu packages curl)
  #:use-module (gnu packages documentation)
  #:use-module (gnu packages file)
@@ -95,6 +96,7 @@
  #:use-module (gnu packages gtk)
  #:use-module (gnu packages java)
  #:use-module (gnu packages llvm)
+  #:use-module (gnu packages linux)
  #:use-module (gnu packages man)
  #:use-module (gnu packages maths)
  #:use-module (gnu packages perl)
@@ -597,6 +599,21 @@ than gzip and 15 % smaller output than bzip2.")
   (license (list license:gpl2+ license:lgpl2.1+)) ; bits of both
   (home-page "https://tukaani.org/xz/")))

+(define-public xz-for-graal-truffle
+  (package
+   (inherit xz)
+   (name "xz-for-graal-truffle")
+   (version "5.6.2")
+   (source (origin
+            (method url-fetch)
+            (uri (list (string-append "http://tukaani.org/xz/xz-" version
+                                      ".tar.gz")
+                       (string-append "http://multiprecision.org/guix/xz-"
+                                      version ".tar.gz")))
+            (sha256
+             (base32
+              "06a585qzn2qlwdv44w7x6p6x8qmbqrqzlz29y8108vyqw7021zcb"))))))
+
 (define-public heatshrink
  (package
    (name "heatshrink")
@@ -2510,6 +2527,46 @@ download times, and other distribution and storage costs.")
    (properties `((lint-hidden-cve . ("CVE-2023-23456" "CVE-2023-23457"))))
    (license license:gpl2+)))

+(define-public qatzip
+  (package
+    (name "qatzip")
+    (version "1.3.1")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                     (url "https://github.com/intel/QATzip")
+                     (commit (string-append "v" version))))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "0c7kph69cf48gr97j3gzh1zwd58wxmp64vfv34z4r9ixj3lh6ziz"))))
+    (build-system gnu-build-system)
+    (arguments
+     (list #:phases
+           #~(modify-phases %standard-phases
+               (replace 'bootstrap
+                 (lambda _
+                   ;; The script has a broken shebang (see:
+                   ;; <https://github.com/intel/QATzip/issues/143>).
+                   (invoke "sh" "autogen.sh"))))))
+    (native-inputs (list autoconf automake libtool))
+    (inputs (list numactl qatlib))
+    (propagated-inputs (list lz4 zlib)) ;in Requires of qatzip.pc
+    (home-page "https://github.com/intel/QATzip")
+    (synopsis "Compression Library accelerated by Intel QuickAssist Technology")
+    (description "QATzip is a library which builds on top of the
+ Intel QuickAssist Technology user space library, to provide extended
+accelerated compression and decompression services by offloading the actual
+compression and decompression request(s) to the Intel Chipset Series.  QATzip
+produces data using the standard gzip format (RFC1952) with extended headers
+or lz4 blocks with lz4 frame format.  The data can be decompressed with a
+compliant gzip or lz4 implementation.  QATzip is designed to take full
+advantage of the performance provided by Intel QuickAssist Technology.")
+    (license license:bsd-3)
+    ;; This package only supports hardware that exists on the x86_64 platform,
+    ;; and is not portable.
+    (supported-systems (list "x86_64-linux"))))
+
 (define-public quazip
  (package
    (name "quazip")
@@ -572,7 +572,7 @@ Its main purpose is to support the key usage by @code{docker-init}:
 (define-public podman
  (package
    (name "podman")
-    (version "5.7.0")
+    (version "5.7.1")
    (outputs '("out" "docker"))
    (properties
     `((output-synopsis "docker" "docker alias for podman")
@@ -585,7 +585,7 @@ Its main purpose is to support the key usage by @code{docker-init}:
             (url "https://github.com/containers/podman")
             (commit (string-append "v" version))))
       (sha256
-        (base32 "0p1hh3sy5m1l1151wsda3q346pd4dm9hgpwjqakdha8yixyicwj8"))
+        (base32 "16lb58r8vkngics6fn1b3six8bl3nrl9awrnq6ivdv1grfgy9z61"))
       (file-name (git-file-name name version))))
    (build-system gnu-build-system)
    (arguments
@@ -50,6 +50,7 @@
  #:use-module (gnu packages)
  #:use-module (gnu packages admin)
  #:use-module (gnu packages aidc)
+  #:use-module (gnu packages assembly)
  #:use-module (gnu packages attr)
  #:use-module (gnu packages autotools)
  #:use-module (gnu packages base)
@@ -794,6 +795,47 @@ data on your platform, so the seed itself will be as random as possible.
@end enumerate\n")
    (license license:artistic2.0)))

+(define-public qatlib
+  (package
+    (name "qatlib")
+    (version "25.08.0")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                     (url "https://github.com/intel/qatlib/")
+                     (commit version)))
+              (file-name (git-file-name name version))
+              (sha256
+               (base32
+                "1hbhrj0wlr68by7gdvsw4nh35rwg4yngn3m7awkx799pbqsw4iyc"))))
+    (build-system gnu-build-system)
+    (arguments
+     (list #:configure-flags #~(list "--disable-static") ;avoid large .a
+           #:phases
+           #~(modify-phases %standard-phases
+               (replace 'bootstrap
+                 (lambda _
+                   ;; The script has a broken shebang (see:
+                   ;; <https://github.com/intel/qatlib/issues/128>).
+                   (invoke "sh" "autogen.sh"))))))
+    (native-inputs (list autoconf autoconf-archive automake libtool nasm))
+    (inputs (list numactl openssl zlib))
+    (propagated-inputs (list openssl))  ;in 'Requires' of libqat.pc
+    (home-page "https://github.com/intel/qatlib")
+    (synopsis "Intel QuickAssist Technology Library (QATlib)")
+    (description "Intel QuickAssist Technology provides hardware acceleration for
+offloading security, authentication and compression services from the CPU,
+thus significantly increasing the performance and efficiency of standard
+platform solutions.  Its services include symmetric encryption and
+authentication, asymmetric encryption, digital signatures, RSA, DH and ECC,
+and lossless data compression.  This package provides user space libraries
+that allow access to Intel QuickAssist devices and expose the Intel
+QuickAssist APIs and sample codes.")
+    (license license:bsd-3)
+    ;; This package only supports hardware that exists on the x86_64 platform,
+    ;; and is not portable.
+    (supported-systems (list "x86_64-linux"))))
+
 (define-public crypto++
  (package
    (name "crypto++")
@@ -2159,6 +2159,27 @@ data in a single database.  RocksDB is partially based on @code{LevelDB}.")
    ;; files carry the 3-clause BSD license.
    (license (list license:gpl2 license:asl2.0 license:bsd-3))))

+(define-public rocksdb-for-ceph
+  (let ((commit "9fa4990159853479a222244574ca41202e4c95c1")
+        (revision "0"))
+    (package
+      (inherit rocksdb)
+      (name "rocksdb-for-ceph")
+      (version (git-version "7.9.2" revision commit))
+      (source (origin
+                (inherit (package-source rocksdb))
+                (uri (git-reference
+                       (url "https://github.com/ceph/rocksdb")
+                       (commit commit)))
+                (file-name (git-file-name name version))
+                (sha256
+                 (base32
+                  "0pdy461m9a48x4i829sirpypdlzf3q79p8iw3dng9wd4r4vyv594"))))
+      (arguments (substitute-keyword-arguments (package-arguments rocksdb)
+                   ((#:configure-flags flags ''())
+                    #~(cons "-DCMAKE_CXX_FLAGS=-Wno-error=maybe-uninitialized"
+                            #$flags)))))))
+
 (define-public sparql-query
  (package
    (name "sparql-query")
@@ -4345,26 +4366,53 @@ framework.")
 (define-public python-sqlalchemy-utils
  (package
    (name "python-sqlalchemy-utils")
-    (version "0.38.3")
+    (version "0.42.1")
    (source
-      (origin
-        (method url-fetch)
-        (uri (pypi-uri "SQLAlchemy-Utils" version))
-        (sha256
-         (base32 "0k8z0mjhvdv302kn0nhci8b2dgw4cn2akprsf37ma1540ykgp6lz"))))
-    (build-system python-build-system)
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/kvesteri/sqlalchemy-utils")
+             (commit version)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "0ny1p352p0dlgrf9fnmzj7ld1rga5zj698qpla1kdaliwwh6xawn"))))
+    (build-system pyproject-build-system)
    (arguments
-     '(#:tests? #f)) ; FIXME: Many tests require a running database server.
-       ;; #:phases
-       ;; (modify-phases %standard-phases
-       ;;   (replace 'check
-       ;;     (lambda _
-       ;;       (zero? (system* "py.test" "sqlalchemy_utils" "tests")))))
-    (propagated-inputs
-     (list python-six python-sqlalchemy))
+     (list
+      #:test-flags
+      ;; XXX: These tests require additional inputs.
+      #~(list "--deselect=tests/test_views.py::TestMySqlTrivialView"
+              "--deselect=tests/functions/test_database.py::\
+TestDatabasePostgresPg8000::test_create_and_drop"
+              "--deselect=tests/functions/test_database.py::\
+TestDatabasePostgresPsycoPG2CFFI::test_create_and_drop")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-before 'check 'start-postgresql
+            (lambda* (#:key inputs tests? #:allow-other-keys)
+              (when tests?
+                (setenv "TZDIR" (search-input-directory inputs
+                                                        "share/zoneinfo"))
+                (let ((dbdir (string-append (getcwd) "/../pgdir")))
+                  (setenv "SQLALCHEMY_UTILS_TEST_POSTGRESQL_USER"
+                          "nixbld")
+                  (invoke "initdb" "-D" dbdir)
+                  (invoke "pg_ctl" "-D" dbdir
+                          "-o" (string-append "-k " dbdir)
+                          "-l" (string-append dbdir "/db.log")
+                          "start")
+	          (invoke "psql" "-h" dbdir "-d" "postgres"
+                          "-c" "CREATE DATABASE sqlalchemy_utils_test;"))))))))
+    (propagated-inputs (list python-six python-sqlalchemy))
    (native-inputs
-     (list python-dateutil python-flexmock python-psycopg2 python-pytest
-           python-pytz))
+     (list postgresql
+           python-dateutil
+           python-flexmock
+           python-psycopg2
+           python-pytest
+           python-pytz
+           python-setuptools
+           tzdata-for-tests))
    (home-page "https://github.com/kvesteri/sqlalchemy-utils")
    (synopsis "Various utility functions for SQLAlchemy")
    (description
@@ -4466,19 +4514,23 @@ SQLAlchemy Database Toolkit for Python.")
  (package
    (name "python-sqlite-fts4")
    (version "1.0.3")
-    (source (origin
-              (method url-fetch)
-              (uri (pypi-uri "sqlite-fts4" version))
-              (sha256
-               (base32
-                "034kx0ac556sywy1p4qcrc36l24w3q0xwswqv2z9s3k8yvm5xc3q"))))
-    (build-system python-build-system)
-    (native-inputs (list python-pytest))
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/simonw/sqlite-fts4")
+             (commit version)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "05c69n4nrc9srkbih1q1wxlw6n9mb3dm7ysb47ipqjn3rp1aif11"))))
+    (build-system pyproject-build-system)
+    (native-inputs (list python-pytest python-setuptools))
    (home-page "https://github.com/simonw/sqlite-fts4")
    (synopsis "Python functions for working with SQLite FTS4 search")
-    (description "This package provides custom SQLite functions written
-in Python for ranking documents indexed using the SQLite's FTS4 full
-text search extension.")
+    (description
+     "This package provides custom SQLite functions written in Python for
+ranking documents indexed using the SQLite's FTS4 full text search
+extension.")
    (license license:asl2.0)))

 (define-public python-sqlite-utils
@@ -4671,18 +4723,41 @@ libraries with SQLALchemy.")
 (define-public python-psycopg2
  (package
    (name "python-psycopg2")
-    (version "2.9.6")
+    (version "2.9.11")
    (source
     (origin
-       (method url-fetch)
-       (uri (pypi-uri "psycopg2" version))
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://github.com/psycopg/psycopg2")
+              (commit version)))
+       (file-name (git-file-name name version))
       (sha256
-        (base32 "04chl9f7v7k1zssa40pmk06jvpyqiss2lpjq50dq69nqix0mhlgi"))))
-    (build-system python-build-system)
+        (base32 "04l2yzbl15nrw1pcjfkqycvqn6h9phcdh1xx9ynfy3dzfscq5ly5"))))
+    (build-system pyproject-build-system)
    (arguments
-     ;; Tests would require a postgresql database "psycopg2_test"
-     ;; and a running postgresql database management service.
-     '(#:tests? #f)) ; TODO re-enable after providing a test-db.
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-before 'check 'start-postgresql
+            (lambda* (#:key inputs tests? #:allow-other-keys)
+              (when tests?
+                (setenv "TZDIR" (search-input-directory inputs
+                                                        "share/zoneinfo"))
+                (let ((dbdir (string-append (getcwd) "/../pgdir")))
+                  (setenv "PSYCOPG2_TESTDB_USER" "nixbld")
+                  (setenv "PSYCOPG2_TESTDB_HOST" dbdir)
+                  (invoke "initdb" "-D" dbdir)
+                  (invoke "pg_ctl" "-D" dbdir
+                          "-o" (string-append "-k " dbdir)
+                          "-l" (string-append dbdir "/db.log")
+                          "start")
+	          (invoke "psql" "-h" dbdir "-d" "postgres"
+                          "-c" "CREATE DATABASE psycopg2_test;"))))))))
+    (native-inputs
+     (list postgresql
+           python-pytest
+           python-setuptools
+           tzdata-for-tests))
    (inputs
     (list postgresql)) ; libpq
    (home-page "https://www.psycopg.org/")
@@ -4704,14 +4779,16 @@ libraries with SQLALchemy.")
              (sha256
               (base32
                "1pkx7nj1mhacwpna7ldzqfqxd1xg8826600r0bs9ad1h93f429yh"))))
-    (build-system python-build-system)
+    (build-system pyproject-build-system)
    (arguments
-     (list #:tests? #f                  ;run for psycopg below
-           #:phases
-           #~(modify-phases %standard-phases
-               ;; This module requires 'psycopg', however psycopg needs this
-               ;; for its tests.  Disable sanity check to break the cycle.
-               (delete 'sanity-check))))
+     (list
+      #:tests? #f                  ;run for psycopg below
+      #:phases
+      #~(modify-phases %standard-phases
+          ;; This module requires 'psycopg', however psycopg needs this
+          ;; for its tests.  Disable sanity check to break the cycle.
+          (delete 'sanity-check))))
+    (native-inputs (list python-setuptools))
    (home-page "https://www.psycopg.org/")
    (synopsis "Connection pooler for psycopg")
    (description
@@ -4822,23 +4899,49 @@ from a SQLAlchemy model (or directly from the database).")
 (define-public yoyo-migrations
  (package
    (name "yoyo-migrations")
-    (version "8.2.0")
+    (version "9.0.0")
    (source
     (origin
-       ;; We use the upstream repository, as the tests are not included in the
-       ;; PyPI releases.
       (method hg-fetch)
       (uri (hg-reference
             (url "https://hg.sr.ht/~olly/yoyo")
             (changeset (string-append "v" version "-release"))))
       (file-name (string-append name "-" version "-checkout"))
       (sha256
-        (base32 "1al030ix0w63hr4s3mqry6s0mlqdj8p242pdqks06br7c25nx3yj"))))
-    (build-system python-build-system)
+        (base32 "0bn4n043y0n4dh7axwavfims2krap5dcmdaxswbadzmis3a4hxyb"))))
+    (build-system pyproject-build-system)
    (arguments
-     ;; XXX: Tests require a connection to some pgsql database and psycopg
-     ;; fails to connect to it.
-     '(#:tests? #f))
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-before 'check 'start-postgresql
+            (lambda* (#:key inputs tests? #:allow-other-keys)
+              (when tests?
+                (delete-file "test_databases.ini")
+                (call-with-output-file "test_databases.ini"
+                  (lambda (port)
+                    (format port "[DEFAULT]
+postgresql = postgresql://nixbld@/yoyo_test~%")))
+                (setenv "TZDIR" (search-input-directory inputs
+                                                        "share/zoneinfo"))
+                (let ((dbdir (string-append (getcwd) "/../pgdir")))
+                  (setenv "PGHOST" dbdir)
+                  (setenv "PGUSER" "nixbld")
+                  (invoke "initdb" "-D" dbdir)
+                  (invoke "pg_ctl" "-D" dbdir
+                          "-o" (string-append "-k " dbdir)
+                          "-l" (string-append dbdir "/db.log")
+                          "start")
+	          (invoke "psql" "-h" dbdir "-d" "postgres"
+                          "-c" "CREATE DATABASE yoyo_test;"))))))))
+    (native-inputs
+     (list postgresql
+           python-freezegun
+           python-psycopg2
+           python-pytest
+           python-setuptools
+           tms
+           tzdata-for-tests))
    (propagated-inputs
     (list python-sqlparse python-tabulate python-importlib-metadata))
    (home-page "https://ollycope.com/software/yoyo/latest/")
@@ -5531,7 +5634,7 @@ algorithm implementations.")
  (package
    (inherit apache-arrow)
    (name "python-pyarrow")
-    (build-system python-build-system)
+    (build-system pyproject-build-system)
    (arguments
     (list
      ;; XXX: Test data is distributed separately in
@@ -5541,7 +5644,6 @@ algorithm implementations.")
      #:tests? #f
      #:phases
      #~(modify-phases %standard-phases
-          (delete 'build) ; XXX the build is performed again during the install phase
          (add-after 'unpack 'enter-source-directory
            (lambda _ (chdir "python")))
          (add-after 'enter-source-directory 'set-version
@@ -5585,7 +5687,8 @@ __version_tuple__ = version_tuple = (~a)~%" version version-tuple))))))
           python-cython
           python-pytest
           python-pytest-runner
-           python-setuptools-scm))
+           python-setuptools-scm
+           python-setuptools))
    (outputs '("out"))
    (home-page "https://arrow.apache.org/docs/python/")
    (synopsis "Python bindings for Apache Arrow")
@@ -5671,16 +5774,31 @@ and @code{intake-parquet}.  It supports the following compression algorithms:
 (define-public python-crate
  (package
    (name "python-crate")
-    (version "0.23.2")
-    (source (origin
-              (method url-fetch)
-              (uri (pypi-uri "crate" version))
-              (sha256
-               (base32
-                "0ngmlvi320c5gsxab0s7qgq0ck4jdlcwvb6lbjhnfprafdp56vvx"))))
-    (build-system python-build-system)
-    (propagated-inputs
-     (list python-urllib3))
+    (version "2.0.0")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/crate/crate-python")
+             (commit version)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "0kk84wf7awgspdijycvhkbqvm5llp3wmwxa9n4w3qda861xn6krb"))))
+    (build-system pyproject-build-system)
+    (arguments
+     (list
+      #:test-flags
+      #~(list "--ignore=tests/testing/test_layer.py" ; Requires crate binary.
+              "--ignore=tests/client/test_http.py"))) ; XXX: fails collection.
+    (native-inputs
+     (list python-orjson
+           python-pytest
+           python-pytz
+           python-setuptools
+           python-sqlalchemy
+           python-verlib2
+           tzdata-for-tests))
+    (propagated-inputs (list python-urllib3))
    (home-page "https://github.com/crate/crate-python")
    (synopsis "CrateDB Python client")
    (description
@@ -116,13 +116,23 @@ clients.")
 (define-public xandikos
  (package
    (name "xandikos")
-    (version "0.2.12")
+    (version "0.3.0")
    (source
     (origin
       (method url-fetch)
       (uri (pypi-uri "xandikos" version))
-       (sha256 (base32 "0x6g5s9pkippxg429r9agp3w0xsid2vv1h45wfc3xzdfvgj6ygsr"))))
-    (build-system python-build-system)
+       (sha256
+        (base32 "10j7qmwcrwql4ah6q8si3nf1ljwrx99w8ipiy85bzjd3qz2vackj"))))
+    (build-system pyproject-build-system)
+    (arguments
+     (list
+      #:test-backend #~'unittest
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-before 'check 'check-setup
+            (lambda _
+              (setenv "XANDIKOSPATH" (mkdtemp "/tmp/xandikospath-XXXXXX")))))))
+    (native-inputs (list python-setuptools))
    (propagated-inputs
     (list python-aiohttp
           python-defusedxml
@@ -131,13 +141,6 @@ clients.")
           python-jinja2
           python-multidict
           python-vobject))
-    (arguments
-     (list
-      #:phases
-      #~(modify-phases %standard-phases
-          (add-before 'check 'check-setup
-            (lambda _
-              (setenv "XANDIKOSPATH" (mkdtemp "/tmp/xandikospath-XXXXXX")))))))
    (home-page "https://www.xandikos.org/")
    (synopsis "Lightweight CalDAV/CardDAV server")
    (description
@@ -2,7 +2,7 @@
 ;;; Copyright © 2014-2016, 2018, 2021, 2024, 2025 Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright © 2016-2018, 2020-2023, 2025 Efraim Flashner <efraim@flashner.co.il>
 ;;; Copyright © 2016 Sou Bunnbu <iyzsong@gmail.com>
-;;; Copyright © 2017, 2018, 2019, 2021 Nicolas Goaziou <mail@nicolasgoaziou.fr>
+;;; Copyright © 2017-2019, 2021, 2025 Nicolas Goaziou <mail@nicolasgoaziou.fr>
 ;;; Copyright © 2018, 2019, 2020, 2021 Tobias Geerinckx-Rice <me@tobias.gr>
 ;;; Copyright © 2018 Pierre-Antoine Rouby <contact@parouby.fr>
 ;;; Copyright © 2018 Arun Isaac <arunisaac@systemreboot.net>
@@ -411,17 +411,17 @@ It comes with a German-English dictionary with approximately 270,000 entries.")
 (define-public grammalecte
  (package
    (name "grammalecte")
-    (version "2.1.1")
+    (version "2.3.0")
    (source
     (origin
       (method url-fetch/zipbomb)
-       (uri (string-append "https://grammalecte.net/grammalecte/zip/"
+       (uri (string-append "https://grammalecte.net/zip/"
                           "Grammalecte-fr-v" version ".zip"))
       (sha256
-        (base32 "076jv3ywdgqqzg92bfbagc7ypy08xjq5zn4vgna6j9350fkfqhzn"))))
+        (base32 "0kv8h0116sfcrqnpd3jv2b098ychda7v27fciq1phxw50jbj395a"))))
    (build-system pyproject-build-system)
    (arguments
-     (list #:tests? #f)) ;no tests provided with the project
+     (list #:test-backend #~'unittest))
    (native-inputs
     (list python-setuptools))
    (home-page "https://grammalecte.net")
@@ -855,7 +855,7 @@ and can dramatically shorten the lifespan of the drive if left unchecked.")
              (sha256
               (base32
                "1ji5sq9jf0p44982zkb5dj2d3mrpy675k0mkyg3r17q5syz0wbia"))))
-    (build-system python-build-system)
+    (build-system pyproject-build-system)
    (arguments
     (list
      #:tests? #f ;XXX: root access is required, see: <scripts/tests/test.sh>
@@ -970,24 +970,31 @@ reformatted.  It can recover lost files from at least:
    (license license:gpl2+)))

 (define-public pydf
-  (package
-    (name "pydf")
-    (version "12")
-    (source
-     (origin
-       (method url-fetch)
-       (uri (pypi-uri "pydf" version))
-       (sha256
-        (base32
-         "0f8ly8xyp93i2hm9c0qjqd4y86nz73axw2f09z01mszwmg1sfivz"))))
-  (build-system python-build-system)
-  (home-page "http://kassiopeia.juls.savba.sk/~garabik/software/pydf/")
-  (synopsis "Colourised @command{df} clone")
-  (description "All-singing, all-dancing, fully colourised @command{df} clone
-written in Python.  It displays the amount of disk space available on the
-mounted file systems, using different colours for different types of file
-systems.  Output format is completely customizable.")
-  (license license:public-domain)))
+  (let ((commit "af38bb3b7aacbcc32271e6dafa8b8b0a77ffead8")
+        (revision "0"))
+    (package
+      (name "pydf")
+      (version (git-version "15" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+                (url "https://github.com/garabik/pydf")
+                (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "18ljigg8zm9pc3qg3alpyh3n4a4f1wcza4p36cchjn2vd4466jf4"))))
+      (build-system pyproject-build-system)
+      (arguments (list #:tests? #f)) ; No tests.
+      (native-inputs (list python-setuptools))
+      (home-page "http://kassiopeia.juls.savba.sk/~garabik/software/pydf/")
+      (synopsis "Colourised @command{df} clone")
+      (description
+       "All-singing, all-dancing, fully colourised @command{df} clone written
+in Python.  It displays the amount of disk space available on the mounted file
+systems, using different colours for different types of file systems.  Output
+format is completely customizable.")
+      (license license:public-domain))))

 (define-public f3
  (package
@@ -695,16 +695,16 @@ them do this.")
 (define-public python-django-allauth
  (package
    (name "python-django-allauth")
-    (version "65.7.0")
+    (version "65.9.0")
    (source
     (origin
       (method git-fetch)
       (uri (git-reference
-             (url "https://github.com/pennersr/django-allauth")
+              (url "https://codeberg.org/allauth/django-allauth")
             (commit version)))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "1k5b3x7pdysb21vbqx7pxi9cm72yj057mm1clg19ymiqj4kq8yfl"))))
+        (base32 "03a7175748533rw6h3grfpv86i3qb31ixw0kb2kj90gc77sh1sw2"))))
    (build-system pyproject-build-system)
    (arguments
     (list
@@ -740,7 +740,7 @@ them do this.")
           python-pytest-asyncio
           python-pytest-django
           python-setuptools))
-    (home-page "https://github.com/pennersr/django-allauth")
+    (home-page "https://codeberg.org/allauth/django-allauth")
    (synopsis "Set of Django applications addressing authentication")
    (description
     "Integrated set of Django applications addressing authentication,
@@ -253,10 +253,10 @@ management tool.")
       (file-name (git-file-name name version))
       (sha256
        (base32 "0m5ifgxdhcf7yci0ncgnxjas879sksrf3im0fahs573g268farz9"))))
-    (build-system python-build-system)
+    (build-system pyproject-build-system)
    ;; Integration tests need a running Docker daemon.
    (arguments (list #:tests? #f))
-    (native-inputs '())
+    (native-inputs (list python-setuptools))
    (inputs (modify-inputs (package-inputs python-docker)
              (prepend python-six)
              (delete "python-urllib3")))
@@ -264,6 +264,9 @@ management tool.")
     (modify-inputs (package-propagated-inputs python-docker)
       (prepend python-docker-pycreds python-urllib3-1.26)))))

+;; Needed for old v1 of docker-compose; remove once Docker is updated to a
+;; more recent version which has the command "docker compose" built-in, see:
+;; <https://codeberg.org/guix/guix/milestone/30347>.
 (define-public python-dockerpty
  (package
    (name "python-dockerpty")
@@ -275,9 +278,11 @@ management tool.")
       (sha256
        (base32
         "1kjn64wx23jmr8dcc6g7bwlmrhfmxr77gh6iphqsl39sayfxdab9"))))
-    (build-system python-build-system)
+    (build-system pyproject-build-system)
+    (arguments
+     (list #:tests? #f)) ; XXX: Requires outdated python-expects
    (native-inputs
-     (list python-six))
+     (list python-setuptools python-six))
    (home-page "https://github.com/d11wtq/dockerpty")
    (synopsis "Python library to use the pseudo-TTY of a Docker container")
    (description "Docker PTY provides the functionality needed to operate the
@@ -298,7 +303,7 @@ client.")
       (sha256
        (base32
         "1dq9kfak61xx7chjrzmkvbw9mvj9008k7g8q7mwi4x133p9dk32c"))))
-    (build-system python-build-system)
+    (build-system pyproject-build-system)
    ;; TODO: Tests require running Docker daemon.
    (arguments
     (list
@@ -310,6 +315,7 @@ client.")
              (substitute* "setup.py"
                ((", < 6")
                 "")))))))
+    (native-inputs (list python-setuptools))
    (inputs
     (list python-cached-property
           python-distro
@@ -581,7 +581,10 @@ calendars, equations, and other features as extensions of Markdown syntax.")
                 (replace 'build
                   (lambda _
                     (invoke #$(cc-for-target)
-                             "-O2" "-g" "-o" "stddoc" "stddoc.c")
+                             "-O2" "-g"
+                             ;; XXX: Relax gcc 14 strictness.
+                             "-Wno-int-conversion"
+                             "-o" "stddoc" "stddoc.c")
                     (with-input-from-file "stddoc.c"
                       (lambda _
                         (with-output-to-file "stddoc.c.html"
@@ -66,6 +66,7 @@
  #:use-module (gnu packages perl)
  #:use-module (gnu packages pkg-config)
  #:use-module (gnu packages python)
+  #:use-module (gnu packages python-build)
  #:use-module (gnu packages python-web)
  #:use-module (gnu packages python-xyz)
  #:use-module (gnu packages qt)
@@ -88,6 +89,7 @@
  #:use-module (guix build-system cmake)
  #:use-module (guix build-system gnu)
  #:use-module (guix build-system go)
+  #:use-module (guix build-system pyproject)
  #:use-module (guix build-system python)
  #:use-module (guix build-system qt)
  #:use-module (guix build-system trivial)
@@ -376,47 +378,48 @@ to open the application in a web browser, for offline usage.")
       (uri (list
             ;; XXX: Upstream does not exist anymore.
             ;; (string-append "http://www.bipede.fr/downloads/logiciels/"
-             ;;                "ToutEnClic-" version "-src.zip")
-             (string-append "https://archive.org/download/tout-en-clic-" version
-                            "-src/ToutEnClic-" version "-src.zip")))
+             ;; "ToutEnClic-" version "-src.zip")
+             (string-append "https://archive.org/download/tout-en-clic-"
+                            version "-src/ToutEnClic-" version "-src.zip")))
       (sha256
        (base32 "0xg24p925rl5bfqsq3jb2lrkidb0f3kbmay5iyxxmjsn3ra0blyh"))))
-    (build-system python-build-system)
+    (build-system pyproject-build-system)
    (arguments
-     `(#:tests? #f                      ; no tests
-       #:phases
-       (modify-phases %standard-phases
-         (delete 'build)
-         (replace 'install
-           (lambda* (#:key outputs #:allow-other-keys)
-             (let* ((out (assoc-ref outputs "out"))
-                    (share (string-append out "/share/toutenclic"))
-                    (pixmaps (string-append out "/share/pixmaps"))
-                    (doc (string-append out "share/doc/" ,name "-" ,version))
-                    (bin (string-append out "/bin"))
+     (list
+      #:tests? #f ;no tests
+      #:phases
+      #~(modify-phases %standard-phases
+          (delete 'build)
+          (replace 'install
+            (lambda _
+              (let ((share (string-append #$output "/share/toutenclic"))
+                    (bin (string-append #$output "/bin"))
                    (executable "toutenclic"))
-               ;; Install icon.
-               (install-file "toutenclic.png" pixmaps)
-               ;; Move files into "share/" directory.
-               (for-each (lambda (f) (install-file f share))
-                         (find-files "." "\\.py$"))
-               ;; Install documentation.
-               (install-file "ToutEnClic.pdf" doc)
-               ;; Create executable in "bin/".
-               (mkdir-p bin)
-               (with-directory-excursion bin
-                 (symlink (string-append share "/" executable ".py")
-                          executable)))))
-         (add-after 'install 'create-desktop-file
-           (lambda* (#:key outputs #:allow-other-keys)
-             (let* ((out (assoc-ref outputs "out"))
-                    (applications (string-append out "/share/applications")))
-               (mkdir-p applications)
-               (call-with-output-file
-                   (string-append applications "/toutenclic.desktop")
-                 (lambda (file)
-                   (format file
-                           "[Desktop Entry]~@
+                ;; Install icon.
+                (install-file "toutenclic.png"
+                              (string-append #$output "/share/pixmaps"))
+                ;; Move files into "share/" directory.
+                (for-each (lambda (f)
+                            (install-file f share))
+                          (find-files "." "\\.py$"))
+                ;; Install documentation.
+                (install-file "ToutEnClic.pdf"
+                              (string-append #$output "share/doc/"
+                                             #$name "-" #$version))
+                ;; Create executable in "bin/".
+                (mkdir-p bin)
+                (with-directory-excursion bin
+                  (symlink (string-append share "/" executable ".py")
+                           executable)))))
+          (add-after 'install 'create-desktop-file
+            (lambda _
+              (let ((applications (string-append #$output "/share/applications")))
+                (mkdir-p applications)
+                (call-with-output-file (string-append applications
+                                                      "/toutenclic.desktop")
+                  (lambda (file)
+                    (format file
+                     "[Desktop Entry]~@
                            Name=ToutEnClic~@
                            Comment=For schooling without difference~@
                            Exec=~a/bin/toutenclic~@
@@ -424,18 +427,16 @@ to open the application in a web browser, for offline usage.")
                            Terminal=false~@
                            Icon=toutenclic~@
                            Type=Application~%"
-                           out)))))))))
-    (native-inputs
-     (list unzip))
-    (inputs
-     (list python-pyqt))
+                     #$output)))))))))
+    (native-inputs (list unzip python-setuptools))
+    (inputs (list python-pyqt))
    (synopsis "School tools for physically disabled children")
-    (description "ToutEnClic is intended to facilitate the schooling
-of physically disabled children in ordinary schools.  It is both
-a multi-page virtual exercise book and a kit including pencil,
-scissors, glue, ruler, compass, protractor and square.  A virtual
-keyboard is also available if the child does not have any other
-specialized device.")
+    (description
+     "ToutEnClic is intended to facilitate the schooling of physically
+disabled children in ordinary schools.  It is both a multi-page virtual
+exercise book and a kit including pencil, scissors, glue, ruler, compass,
+protractor and square.  A virtual keyboard is also available if the child does
+not have any other specialized device.")
    (home-page "https://bipede.fr/contrib/")
    (license license:gpl3)))

@@ -1004,7 +1005,7 @@ learning for programming languages.")
 (define-public mazo
  (package
    (name "mazo")
-    (version "1.1.0")
+    (version "1.2.1")
    (source
     (origin
       (method git-fetch)
@@ -1013,43 +1014,37 @@ learning for programming languages.")
             (commit (string-append "v" version))))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "14nk3qsj6lg7wp2ws8lxhb4hyjnczvw1cn9f3m466dkkfimp7ygf"))))
-    (build-system python-build-system)
+        (base32 "0mwhd8y3xs57rbaarpi1ams5i0kndizdpns4ym7dmnnn7s9g1xq8"))))
+    (build-system pyproject-build-system)
    (arguments
-     `(#:use-setuptools? #f
-       #:phases
-       (modify-phases %standard-phases
-         (delete 'build)
-         (replace 'check
-           (lambda* (#:key tests? inputs outputs #:allow-other-keys)
-             (when tests?
-               (let* ((out (assoc-ref outputs "out"))
-                      (home (string-append out "/tmp")))
-                 (add-installed-pythonpath inputs outputs)
-                 (setenv "HOME" home)
-                 (invoke "python3" "manage.py" "test")))))
-         (replace 'install
-           (lambda* (#:key inputs outputs #:allow-other-keys)
-             (let* ((out (assoc-ref outputs "out"))
-                    (bin (string-append out "/bin"))
-                    (script (string-append bin "/mazo"))
-                    (share (string-append out "/share"))
-                    (help (string-append share "/help/C/mazo"))
-                    (icons (string-append
-                            share
-                            "/icons/hicolor/scalable/apps"))
-                    (apps (string-append share "/applications"))
-                    (site (string-append
-                           (site-packages inputs outputs)
-                           "/mazo")))
-               (mkdir-p help)
-               (mkdir-p bin)
-               (copy-file "mazo.py" script)
-               (chmod script #o555)
-               (install-file "icons/mazo.svg" icons)
-               (install-file "lugare.ulkeva.Mazo.desktop" apps)
-               (copy-recursively "help/C/mazo" help)
-               (copy-recursively "mazo" site)))))))
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (delete 'build)
+          (replace 'check
+            (lambda* (#:key tests? inputs outputs #:allow-other-keys)
+              (when tests?
+                (setenv "HOME" (getcwd))
+                (invoke "python3" "manage.py" "test"))))
+          (replace 'install
+            (lambda* (#:key inputs outputs #:allow-other-keys)
+              (let* ((bin (string-append #$output "/bin"))
+                     (script (string-append bin "/mazo"))
+                     (share (string-append #$output "/share"))
+                     (help (string-append share "/help/C/mazo")))
+                (mkdir-p help)
+                (mkdir-p bin)
+                (copy-file "mazo.py" script)
+                (chmod script #o555)
+                (install-file "icons/mazo.svg"
+                              (string-append share
+                                             "/icons/hicolor/scalable/apps"))
+                (install-file "lugare.ulkeva.Mazo.desktop"
+                              (string-append share "/applications"))
+                (copy-recursively "help/C/mazo" help)
+                (copy-recursively "mazo"
+                                  (string-append (site-packages inputs outputs)
+                                                 "/mazo"))))))))
    (native-inputs
     (list python-django
           python-django-cleanup
@@ -1071,8 +1066,9 @@ learning for programming languages.")
           yelp))
    (home-page "https://luis-felipe.gitlab.io/mazo/")
    (synopsis "Memorize concepts using multimedia flash cards")
-    (description "Mazo is a learning application that helps you memorize
-simple concepts using multimedia flash cards and spaced reviews.")
+    (description
+     "Mazo is a learning application that helps you memorize simple concepts
+using multimedia flash cards and spaced reviews.")
    (license license:public-domain)))

 (define-public hardv
@@ -737,6 +737,110 @@ used in the declarative section of design units.")
      (native-inputs
       '()))))

+(define-public klayout
+  (package
+    (name "klayout")
+    (version "0.30.5")
+    (source
+     (origin (method git-fetch)
+             (uri (git-reference
+                    (url "https://github.com/KLayout/klayout")
+                    (commit (string-append "v" version))))
+             (file-name (git-file-name name version))
+             (sha256
+              (base32
+               "1ixl8wzpiaw6frb28x9y9jy3fvhjclmn4xl77i72rs37rf4i2a2s"))))
+    (build-system copy-build-system)
+    (arguments
+     (list
+      #:install-plan
+      #~'(("output/klayout" "bin/")
+          ("output/" "bin/" #:include-regexp ("strm.*"))
+          ("output/" "lib/" #:include-regexp ("lib.*\\.so.*"))
+          ("output/pymod" "lib/"))
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-before 'install 'patch-build-script ;; ensure reproducibility
+            (lambda _
+              (substitute* "build.sh"
+                (("KLAYOUT_VERSION_DATE=\"\\$KLAYOUT_VERSION_DATE\"")
+                 "KLAYOUT_VERSION_DATE=1970-01-01"))))
+          (add-after 'patch-build-script 'disable-failing-tests
+            (lambda _
+              (substitute* "src/tl/unit_tests/unit_tests.pro"
+                ;; These need internet connection.
+                (("  tlWebDAVTests\\.cc")
+                 "# tlWebDAVTests.cc \\")
+                (("  tlGitTests\\.cc")
+                 "# tlGitTests.cc \\")
+                (("  tlHttpStreamTests\\.cc")
+                 "# tlHttpStreamTests.cc \\")
+                ;; The threaded tests are reportedly flaky.
+                (("  tlThreadedWorkersTests\\.cc")
+                 "# tlThreadedWorkersTests\\.cc \\"))
+              (substitute* "src/rba/rba.pro"
+                ;; There are issues of non-detereminism involved with Ruby's GC
+                ;; implementation. https://github.com/KLayout/klayout/issues/2251
+                (("SUBDIRS = rba unit_tests")
+                 "SUBDIRS = rba")
+                (("unit_tests.depends += rba")
+                 ""))))
+          (add-after 'disable-failing-tests 'build
+            (lambda _
+              (invoke "bash" "build.sh"
+                      "-prefix" "output"
+                      "-option"
+                      (string-append "-j" (number->string (parallel-job-count))))))
+          (add-after 'install 'patch-elfs
+            (lambda _
+              (let* ((lib (string-append #$output "/lib"))
+                     (layout-lib (string-append lib "/lay_plugins"))
+                     (db-lib (string-append lib "/db_plugins"))
+                     (bin (string-append #$output "/bin"))
+                     (executables (filter executable-file? (find-files #$output)))
+                     (ut-runner "build-release/ut_runner")
+                     (unit-tests (cons* ut-runner
+                                        (find-files "build-release" "\\.ut")))
+                     (patchem (lambda (elf)
+                                (when (not (string-suffix? ".py" elf))
+                                  (invoke "patchelf" "--add-rpath" lib elf)
+                                  (invoke "patchelf" "--add-rpath" layout-lib elf)
+                                  (invoke "patchelf" "--add-rpath" db-lib elf)))))
+                (map patchem executables)
+                (map patchem unit-tests)
+                (patchem ut-runner))))
+          (add-after 'patch-elfs 'check-after-install
+            (lambda* (#:key tests? #:allow-other-keys)
+              (when tests?
+                (with-directory-excursion "build-release"
+                  (mkdir "testtmp")
+                  (setenv "TESTTMP" "testtmp")
+                  (setenv "TESTSRC" "..")
+                  (setenv "LD_LIBRARY_PATH" ".")
+                  (setenv "QT_QPA_PLATFORM" "offscreen")
+                  (setenv "HOME" "/tmp/home") ;; Fontconfig needs a writable cache.
+                  (invoke "./ut_runner"))))))))
+    (native-inputs (list perl python qtsvg ruby tcl))
+    (inputs
+     (list bash-minimal
+           libgit2
+           patchelf
+           qt5compat
+           qtbase
+           qtmultimedia
+           qtsvg
+           qttools))
+    (home-page "https://www.klayout.de")
+    (synopsis "Mask layout editor")
+    (description "KLayout is @acronym{EDA, Electronic Design Automation}
+software.  It is a scriptable @acronym{VLSI, Very Large Scale Integration}
+layout editor used for visualizing and editing mask data, transcoding between
+different file formats (GDSII and OASIS), executing @acronym{DRC, Design rule
+checking}, @acronym{LVS, Layout Versus Schematic} verification, and drawing of
+chip cross-sections basked on mask data.")
+    ;; The license version will be clarified with the next version bump.
+    (license license:gpl3+)))
+
 (define-public libngspice
  ;; Note: The ngspice's build system does not allow us to build both the
  ;; library and the executables in one go.  Thus, we have two packages.
@@ -163,6 +163,7 @@
 ;;; Copyright @ 2025 Andrew Wong <wongandj@icloud.com>
 ;;; Copyright @ 2025 Nik Gaffney <nik@fo.am>
 ;;; Copyright © 2025 Untrusem <mysticmoksh@riseup.net>
+;;; Copyright © 2025 case_lambda <case_lambda@disroot.org>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -214,6 +215,7 @@
  #:use-module (gnu packages emacs)
  #:use-module (gnu packages emacs-build)
  #:use-module (gnu packages enchant)
+  #:use-module (gnu packages file-systems)
  #:use-module (gnu packages fonts)
  #:use-module (gnu packages freedesktop)
  #:use-module (gnu packages games)
@@ -311,6 +313,7 @@
  #:use-module (gnu packages ocaml)
  #:use-module (gnu packages erlang)
  #:use-module (gnu packages search)
+  #:use-module (gnu packages ssh)
  #:use-module (gnu packages statistics)
  #:use-module (gnu packages libcanberra)
  #:use-module (gnu packages telegram)
@@ -713,6 +716,33 @@ files, provide Age encrypted authentication information out of
@file{.authinfo.age}, open/edit/save Age encrypted files via Tramp...")
    (license license:gpl3+)))

+(define-public emacs-balanced-windows
+  (let ((commit "1da5354ad8a9235d13928e2ee0863f3642ccdd13")
+        (revision "0"))
+    (package
+      (name "emacs-balanced-windows")
+      (version (git-version "1.0.0" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri
+          (git-reference
+            (url "https://github.com/wbolster/emacs-balanced-windows")
+            (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32
+           "1hsjg48jlfi6lc6izp9xcfqvxj7c0ivjrfsr2q3yv3s1iy2fz37l"))))
+      (build-system emacs-build-system)
+      (arguments (list #:tests? #f)) ;there are no tests
+      (home-page "https://github.com/wbolster/emacs-balanced-windows/")
+      (synopsis "Automatically balance Emacs windows")
+      (description
+       "This Emacs package provides a global minor mode to automatically
+balance windows (keeping them roughly the same size) whenever the window
+configuration changes, e.g. after splitting or deleting a window.")
+      (license license:bsd-3))))
+
 (define-public emacs-bookmark-plus
  (package
    (name "emacs-bookmark-plus")
@@ -2431,7 +2461,7 @@ syntax for short lambda.")
 (define-public emacs-llm
  (package
    (name "emacs-llm")
-    (version "0.27.3")
+    (version "0.28.4")
    (source
     (origin
       (method git-fetch)
@@ -2440,7 +2470,7 @@ syntax for short lambda.")
             (commit version)))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "1yf6gbl5360747zgcnl983gwghgad892arpb07k5yhpa61jw50aa"))))
+        (base32 "14y852vddsppf1izsm5jcdhd59rkgj5la2vmxachia5pxicrqlb6"))))
    (build-system emacs-build-system)
    (arguments
     (list
@@ -3299,7 +3329,7 @@ you will die.  The game builds the list of words from the active buffer.")
 (define-public emacs-speed-type
  (package
    (name "emacs-speed-type")
-    (version "1.4")
+    (version "1.5")
    (source (origin
              (method git-fetch)
              (uri (git-reference
@@ -3308,22 +3338,14 @@ you will die.  The game builds the list of words from the active buffer.")
              (file-name (git-file-name name version))
              (sha256
               (base32
-                "1rw3lgm65jxcs7vbj0055ays4wv23mk2kj3xivnqmhnm030vk868"))))
+                "0bnn4a0fpjh94xykifqy2j82rgapvmlvs0vllq0xcskjbvibmdc8"))))
    (build-system emacs-build-system)
    (arguments
     (list
      #:test-command
      #~(list "emacs" "-Q" "--batch" "-L" "."
-              "-l" "test-speed-type.el"
-              "-f" "ert-run-tests-batch-and-exit")
-      #:phases
-      #~(modify-phases %standard-phases
-          (add-before 'check 'skip-failing-test
-            ;; This test requires an internet connection.
-            (lambda _
-              (substitute* "test-speed-type.el"
-                (("\\(ert-deftest speed-type--retrieve-test .*" all)
-                 (string-append all " (skip-unless nil)"))))))))
+              "-l" "test/speed-type-test.el"
+              "-f" "ert-run-tests-batch-and-exit")))
    (native-inputs (list emacs-dash))
    (propagated-inputs (list emacs-compat))
    (home-page "https://github.com/dakra/speed-type")
@@ -6835,7 +6857,7 @@ local LLM capabilities from Emacs.")
 (define-public emacs-org-fc
  (package
    (name "emacs-org-fc")
-    (version "0.7.0")
+    (version "0.9.2")
    (source
     (origin
       (method git-fetch)
@@ -6844,7 +6866,7 @@ local LLM capabilities from Emacs.")
             (commit (string-append "v" version))))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "1bch6dlw3f8zxvfazsndmilizvxvxpcfgrv89nk6id966y3czrpl"))))
+        (base32 "1f05z9i5sqx4qk25k057pkazd7mqiagp8l035q4i0zpddjqrwhjr"))))
    (build-system emacs-build-system)
    (arguments
     (list
@@ -11272,11 +11294,11 @@ not hang at all.")
    (license license:gpl3+)))

 (define-public emacs-elastic-modes
-  (let ((commit "ea49bb03b78cb9fd17655990223e3095f137a3ce")
-        (revision "1"))
+  (let ((commit "c577e8921a4d9bd77742729707152bc557fae3e2")
+        (revision "2"))
    (package
      (name "emacs-elastic-modes")
-      (version "1.0.0")
+      (version (git-version "1.0.0" revision commit))
      (source (origin
                (method git-fetch)
                (uri (git-reference
@@ -11285,7 +11307,7 @@ not hang at all.")
                (file-name (git-file-name name version))
                (sha256
                 (base32
-                  "1dkigkjw4i9nz5rl0dnic16ljdnp5cyz2xic3hc2myqnjlqnc6z6"))))
+                  "0r40g7zgz9072x74qbnv8lmql0gajsz2p8b8jckmgyniakmln69v"))))
      (build-system emacs-build-system)
      (arguments (list #:tests? #false)) ;no tests
      (propagated-inputs (list emacs-dash))
@@ -21653,6 +21675,50 @@ using a convenient notation.")
    (license (list license:gpl3+
                   license:fdl1.3+)))) ;GFDLv1.3+ for the manual

+(define-public emacs-tmsu
+  ;; There are no releases or tags upstream.
+  (let ((commit "c75ae9bed8f3bb2229e873fcc85fe62701e47974")
+        (revision "0"))
+    (package
+      (name "emacs-tmsu")
+      (version (git-version "0.9" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url "https://github.com/vifon/tmsu.el")
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "0mxz9bmdcdxkj7f4ih405i4vpd35c72xgs1i8cbi0132dpnnblpz"))))
+      (build-system emacs-build-system)
+      (arguments
+       (list
+        #:phases
+        #~(modify-phases %standard-phases
+            (add-after 'unpack 'patch-exec-paths
+              (lambda* (#:key inputs #:allow-other-keys)
+                (let ((tmsu (search-input-file inputs "bin/tmsu")))
+                  (substitute* (list "tmsu.el" "tmsu-dired.el")
+                    (("\"tmsu\"")
+                     (string-append "\"" tmsu "\"")))))))
+        #:test-command
+        #~(list "emacs"
+                "-batch"
+                "-l"
+                "tmsu-tests.el"
+                "-f"
+                "ert-run-tests-batch-and-exit")))
+      (inputs (list tmsu))
+      (synopsis "Emacs interface to the @code{tmsu} file tagging tool")
+      (description
+       "@code{tmsu.el} focuses on enhancing the @acronym{UX, User Experience}
+of the most common @code{tmsu} operations: tag editing and querying.  It's
+primarily intended to be used from dired, though @code{tmsu-edit} can be used
+separately from it.")
+      (home-page "https://github.com/vifon/tmsu.el")
+      (license license:gpl3+))))
+
 (define-public emacs-beframe
  (let ((commit "c3f4583b0767e7f8c38c83ed29af40af8ba3bdfa")) ;version bump
    (package
@@ -22780,6 +22846,91 @@ window (using the fringe, by default), allows you to jump between the hunks
 and revert them selectively.")
    (license license:gpl3+)))

+(define-public emacs-difftastic
+  ;; No releases or tags.
+  (let ((commit "5a23176610b7181f52b7088cbdf1d2a95691b27e")
+        (revision "0"))
+    (package
+      (name "emacs-difftastic")
+      (version (git-version "0.0.0" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+                (url "https://github.com/pkryger/difftastic.el/")
+                (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32
+           "0nl1kcaxgq67338knfhmxxmxl5npsvjvvs3z7s8m5z4wpknsn1rd"))))
+      (build-system emacs-build-system)
+      (arguments
+       (list
+        #:test-command
+        #~(list "emacs" "--batch"
+                "-l" "test/difftastic.t.el"
+                "-l" "test/difftastic-bindings.t.el"
+                "-f" "ert-run-tests-batch-and-exit")
+        #:phases
+        #~(modify-phases %standard-phases
+            (add-before 'check 'unpack-el-mock
+              (lambda _
+                (install-file
+                 (string-append
+                  #$(this-package-native-input "el-mock") "/el-mock.el")
+                 ".")))
+            ;; 11/435 tests fail.
+            (add-before 'check 'skip-failing-tests
+              (lambda _
+                (let ((skip-tests
+                       `("-forge-pullreq-show-diff-args:buffer-post-object"
+                         "-forge-pullreq-show-diff-args:current-topic"
+                         ,(string-append
+                           "-forge-pullreq-show-diff-args"
+                           ":new-pullreq-with-base-and-head")
+                         "-forge-pullreq-show-diff-args:single-prefix-argument"
+                         "-magit-diff-buffer-file:no-file"
+                         "-forge-pullreq-show-diff-args:triple-prefix-argument"
+                         "forge-create-pulreq-show-diff:basic"
+                         "forge-pullreq-show-diff:basic"
+                         "forge-pullreq-show-diff:double-prefix-arg"
+                         "forge-pullreq-show-diff:single-prefix-arg"
+                         "forge-pullreq-show-diff:triple-prefix-arg")))
+                  (substitute* "test/difftastic.t.el"
+                    (("\\(ert-deftest difftastic-([a-z:-]*) \\(\\)" all test)
+                     (if (member test skip-tests)
+                         (string-append all "(skip-unless nil)")
+                         all))))))
+            (add-after 'unpack 'substitute-python-path
+              (lambda* (#:key inputs #:allow-other-keys)
+                (emacs-substitute-variables "difftastic.el"
+                  ("difftastic-executable"
+                   (search-input-file inputs "/bin/difft"))))))))
+      (inputs
+       (list difftastic))
+      (propagated-inputs
+       (list emacs-compat emacs-magit))
+      (native-inputs
+       (list
+        ;; This package uses a custom version of el-mock for the tests.
+        (origin
+          (method git-fetch)
+          (uri (git-reference
+                 (url "https://github.com/pkryger/el-mock.el")
+                 (commit "8fb750784faf07445033441bd86485fecfdb9413")))
+          (file-name "el-mock")
+          (sha256
+           (base32
+            "1qbcj952hrrpr26rh8q77vf5i35nzkbsrqdvj7rrc307dp0n2gsv")))))
+      (home-page "https://github.com/pkryger/difftastic.el/")
+      (synopsis "Wrapper interface for @code{difft} command line tool")
+      (description
+       "This package integrates @code{difftastic} structural diff tool into
+Emacs.  It automatically displays @code{difftastic} output within Emacs using
+faces from the user theme, ensuring consistency with overall coding
+environment.")
+      (license license:gpl3+))))
+
 (define-public emacs-diminish
  ;; XXX: Upstream did not tag last release.
  (let ((commit "fd486ef76e4c1d8211ae337a43b8bba106d4bca7")
@@ -25237,7 +25388,7 @@ functions written in continuation-passing style.")
 (define-public emacs-attrap
  (package
    (name "emacs-attrap")
-    (version "1.1")
+    (version "1.2")
    (source
     (origin
       (method git-fetch)
@@ -25245,7 +25396,7 @@ functions written in continuation-passing style.")
             (url "https://github.com/jyp/attrap")
             (commit version)))
       (sha256
-        (base32 "0wqc7bqx9rvk8r7fd3x84h8p01v97s6w2jf29nnjb59xakwp22i7"))
+        (base32 "0ixxgp3fvx67a6a9xm4z25iaw9mbliyijxr30aj8pd3ski6i8c5b"))
       (file-name (git-file-name name version))))
    (build-system emacs-build-system)
    (propagated-inputs
@@ -25968,14 +26119,14 @@ want to use it.")
 (define-public emacs-track-changes
  (package
    (name "emacs-track-changes")
-    (version "1.4")
+    (version "1.5")
    (source
     (origin
       (method url-fetch)
       (uri (string-append "https://elpa.gnu.org/packages/track-changes-"
                           version ".tar"))
       (sha256
-        (base32 "0ygc53dm144ld4f7ig1fh1z345gnkrin7q108kj9d4dhgp8f2381"))))
+        (base32 "0ylvxd5iijihqa5l9w6k6hmwaf09hw98k4f9g2hxfbn8sifvgb53"))))
    (build-system emacs-build-system)
    (arguments (list #:tests? #f)) ; no tests
    (home-page "https://elpa.gnu.org/packages/track-changes.html")
@@ -31388,7 +31539,7 @@ current upstream.")
 (define-public emacs-ultra-scroll
  (package
    (name "emacs-ultra-scroll")
-    (version "0.4.2")
+    (version "0.5")
    (source (origin
              (method git-fetch)
              (uri (git-reference
@@ -31397,7 +31548,7 @@ current upstream.")
              (file-name (git-file-name name version))
              (sha256
               (base32
-                "0k1xqkxq89mz8dvzbfpks3jnrcmbd0hcz8a0hib1m3ka55hpczqz"))))
+                "041jfjfck7lkf3zcbm3gkz8v0w8r3bbw0incvriskbl2iws0ap9i"))))
    (build-system emacs-build-system)
    (arguments (list #:tests? #f))      ;no tests
    (home-page "https://github.com/jdtsmith/ultra-scroll")
@@ -35412,7 +35563,7 @@ instances (play/pause, volume control, media selection, etc.) remotely.")
 (define-public emacs-navigel
  (package
    (name "emacs-navigel")
-    (version "1.0.0")
+    (version "1.1.0")
    (source (origin
              (method git-fetch)
              (uri (git-reference
@@ -35421,7 +35572,7 @@ instances (play/pause, volume control, media selection, etc.) remotely.")
              (file-name (git-file-name name version))
              (sha256
               (base32
-                "0fszhjf6bj8frvlnim86sfv6sab3qyignxqh8x6i4bqgwnb6svkf"))))
+                "15vzp5s52m5rj27bsxrz73v3vsjgk1n5rk2b68i5vfbbrxirh188"))))
    (build-system emacs-build-system)
    (native-inputs
     (list emacs-ert-runner))
@@ -38790,6 +38941,44 @@ global minor mode whose purpose is to automatically feed TRAMP sub-processes
 with passwords for paths matching regexps.")
      (license license:gpl3+))))

+(define-public emacs-ssh-tunnels
+  ;; There are no tags or releases upstream.
+  (let ((commit "5010d779edef33f869065231b99d74723c9c7eaf")
+        (revision "0"))
+    (package
+      (name "emacs-ssh-tunnels")
+      (version (git-version "1.0" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+                (url "https://github.com/death/ssh-tunnels")
+                (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32
+           "15pwgc9s7f5fjmx2savjrpwr6qcpp0s9iy0y10abpy63np4krc62"))))
+      (build-system emacs-build-system)
+      (arguments
+       (list
+        #:tests? #f                     ;no tests
+        #:phases
+        #~(modify-phases %standard-phases
+            (add-after 'unpack 'set-ssh-location
+              (lambda* (#:key inputs #:allow-other-keys)
+                (emacs-substitute-variables "ssh-tunnels.el"
+                  ("ssh-tunnels-program"
+                   (search-input-file inputs "/bin/ssh"))))))))
+      (inputs (list openssh))
+      (propagated-inputs (list emacs-helm))
+      (home-page "https://github.com/death/ssh-tunnels")
+      (synopsis "Manipulate @code{ssh} tunnels from Emacs")
+      (description "This package provides an Emacs interface to modify,
+run and kill @code{ssh} tunnels.  It lets customise descriptions of the
+tunnels configurations, and includes an @code{emacs-helm} interface to modify
+and act on tunnels.")
+      (license license:expat))))
+
 (define-public emacs-eacl
  (package
    (name "emacs-eacl")
@@ -40011,7 +40200,7 @@ federated microblogging social network.")
 (define-public emacs-org-social
  (package
    (name "emacs-org-social")
-    (version "2.7.2")
+    (version "2.9")
    (source
     (origin
       (method git-fetch)
@@ -40020,7 +40209,7 @@ federated microblogging social network.")
             (commit (string-append "v" version))))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "1cj5r00sdb83v356ni2ic1gdychxidgpnvl48b6wq6j11j8yqa12"))))
+        (base32 "1d8hwrpa20524qiqfwwvsk1h10yqk8fzac74n1ls7ixk28db0nvg"))))
    (build-system emacs-build-system)
    (arguments
     (list
@@ -43502,8 +43691,8 @@ org-mode templates.")
    (license license:gpl3+)))

 (define-public emacs-org-glossary
-  (let ((commit "1b9b7fd3d1e6c214c34463e568daaba6df00ec27")
-        (revision "0"))
+  (let ((commit "97827bc323765a5f70213c62800bed50d75c2822")
+        (revision "1"))
    (package
      (name "emacs-org-glossary")
      (version (git-version "0.0.1" revision commit))
@@ -43515,7 +43704,7 @@ org-mode templates.")
               (commit commit)))
         (file-name (git-file-name name version))
         (sha256
-          (base32 "09mg8aqxamnxx8kpdyk074wf2wkm4rx62z7q66azw70hjr1ggwa3"))))
+          (base32 "0qd1ikc602nnhhm0czv4gn9b1g4jqhjbnnz93ba2pjimgssmb58w"))))
      (build-system emacs-build-system)
      (arguments
       (list
@@ -44372,7 +44561,7 @@ provides an easy way to bind keys under a configurable prefix key.")
 (define-public emacs-spacious-padding
  (package
    (name "emacs-spacious-padding")
-    (version "0.7.0")
+    (version "0.8.0")
    (source
     (origin
       (method git-fetch)
@@ -44381,7 +44570,7 @@ provides an easy way to bind keys under a configurable prefix key.")
              (commit version)))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "00mwzbvhzlvnhsbc5rki5cx08fnx4s7cmnlz8lqh534wmsmh3wf0"))))
+        (base32 "1vb9nbzjz5bpfbmmsf2ab8dizqmn4bbk0nd95rfv207gyjrgy6hn"))))
    (build-system emacs-build-system)
    (arguments
     (list
@@ -44389,12 +44578,7 @@ provides an easy way to bind keys under a configurable prefix key.")
      #:phases
      #~(modify-phases %standard-phases
          (add-after 'unpack 'build-info-manual
-            (lambda _
-              (invoke "emacs"
-                      "--batch"
-                      "--eval=(require 'ox-texinfo)"
-                      "--eval=(find-file \"README.org\")"
-                      "--eval=(org-texinfo-export-to-info)"))))))
+            (lambda _ (emacs-makeinfo))))))
    (native-inputs (list texinfo))
    (home-page "https://github.com/protesilaos/spacious-padding")
    (synopsis "Increase the padding or spacing of frames and windows")
@@ -45514,27 +45698,35 @@ buffer.")
    (license license:gpl3+)))

 (define-public emacs-setup
-  (package
-    (name "emacs-setup")
-    (version "1.5.0")
-    (source
-      (origin
-        (method url-fetch)
-        (uri (string-append "https://elpa.gnu.org/packages/setup-"
-                            version ".tar"))
-        (sha256
-          (base32 "184g3kd9caxyhwq41w94spkjs1j45vblg4sqfb5h5pqb5h9p95n5"))))
-    (build-system emacs-build-system)
-    (home-page "https://git.sr.ht/~pkal/setup")
-    (synopsis "Helpful configuration macro")
-    (description
-"The @code{setup} macro simplifies repetitive configuration patterns, by
-providing context-sensitive local macros in @code{setup} bodies.  These macros
-can be mixed with regular elisp code without any issues, allowing for
-flexible and terse configurations.  The list of local macros can be
-extended by the user via @code{setup-define}.  A list of currently known
-local macros are documented in the docstring for @code{setup}.")
-    (license license:gpl3+)))
+  ;; No tagged releases; this commit reflects the version bump on the source
+  (let ((commit "5a69dab9bb79d8bebaaa9bc14795cbaafd1c2423"))
+    (package
+      (name "emacs-setup")
+      (version "1.5.0")
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+                (url "https://codeberg.org/pkal/setup.el")
+                (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32
+           "1pa5k36pkgvp8als0ngxgy17x0gja9j26qydw3wwawkslssl5kbx"))))
+      (build-system emacs-build-system)
+      (arguments
+       (list
+        #:tests? #f))                   ; No tests.
+      (home-page "https://codeberg.org/pkal/setup.el")
+      (synopsis "Helpful configuration macro")
+      (description
+       "The @code{setup} macro simplifies repetitive configuration patterns,
+by providing context-sensitive local macros in @code{setup} bodies.  These
+macros can be mixed with regular elisp code without any issues, allowing for
+flexible and terse configurations.  The list of local macros can be extended
+by the user via @code{setup-define}.  A list of currently known local macros
+are documented in the docstring for @code{setup}.")
+      (license license:gpl3+))))

 (define-public emacs-tomelr
  (package
@@ -45650,7 +45842,7 @@ Fennel code within Emacs.")
 (define-public emacs-org-modern
  (package
    (name "emacs-org-modern")
-    (version "1.10")
+    (version "1.11")
    (source
     (origin
       (method git-fetch)
@@ -45658,16 +45850,16 @@ Fennel code within Emacs.")
             (url "https://github.com/minad/org-modern")
             (commit version)))
       (sha256
-        (base32 "1vyfv56cgpp5x3sanq6qsxhd6cgjf2n9awcgy1giary1kad455bl"))
+        (base32 "0s5sh1hiwmnpyj5jvy93wi1aqf85dznz7rr9kbm77zcfsyqhnly2"))
       (file-name (git-file-name name version))))
    (build-system emacs-build-system)
    (propagated-inputs (list emacs-compat))
    (home-page "https://github.com/minad/org-modern")
    (synopsis "Modern Org style")
    (description
-     "Org Modern implements a modern style for your Org buffers using font locking
-and text properties.  The package styles headlines, keywords, tables and
-source blocks.")
+     "Org Modern implements a modern style for your Org buffers using font
+locking and text properties.  The package styles headlines, keywords, tables
+and source blocks.")
    (license license:gpl3+)))

 (define-public emacs-org-modern-indent
@@ -45821,7 +46013,7 @@ hacker.")
 (define-public emacs-osm
  (package
    (name "emacs-osm")
-    (version "1.10")
+    (version "2.0")
    (source (origin
              (method git-fetch)
              (uri (git-reference
@@ -45830,7 +46022,7 @@ hacker.")
              (file-name (git-file-name name version))
              (sha256
               (base32
-                "0kn9x8i5lypa8g4gi0kg4rpw0xvmgfmmp22d1iwgavg6lrd1a3qr"))))
+                "1yldym0ny5y3yjkd5piqk3pnag6xhyickrn8z57vxbwswvwnwaqm"))))
    (build-system emacs-build-system)
    (arguments
     (list #:tests? #f                  ;no tests
@@ -1,5 +1,5 @@
 ;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2013-2017, 2019, 2021-2022 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2013-2017, 2019, 2021-2022, 2025 Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright © 2013 Andreas Enge <andreas@enge.fr>
 ;;; Copyright © 2014 Taylan Ulrich Bayirli/Kammer <taylanbayirli@gmail.com>
 ;;; Copyright © 2014, 2015, 2016, 2017, 2018, 2019, 2020 Mark H Weaver <mhw@netris.org>
@@ -464,19 +464,22 @@ editor (console only)")
                          (string-append (getenv "LIBRARY_PATH")
                                         ":" libgccjit-libdir)))))
            (add-after 'unpack 'patch-compilation-driver
-              (lambda _
+              (lambda* (#:key inputs #:allow-other-keys)
                (substitute* "lisp/emacs-lisp/comp.el"
                  (("\\(defcustom native-comp-driver-options nil")
                   (format
                    #f "(defcustom native-comp-driver-options '(~@{~s~^ ~})"
                    (string-append
-                     "-B" #$(this-package-input "binutils") "/bin/")
+                     "-B" (dirname (search-input-file inputs "/bin/nm")))
                    (string-append
-                     "-B" #$(this-package-input "glibc") "/lib/")
+                     "-B" (dirname (search-input-file inputs "/lib/libc.so")))
                    (string-append
-                     "-B" #$(this-package-input "libgccjit") "/lib/")
+                     "-B" (dirname (search-input-file inputs "/lib/libgccjit.so")))
                    (string-append
-                     "-B" #$(this-package-input "libgccjit") "/lib/gcc/"))))))
+                     "-B" (string-append
+                           (dirname
+                            (search-input-file inputs "/lib/libgccjit.so"))
+                           "/gcc")))))))
            (add-after 'build 'build-trampolines
              (lambda* (#:key make-flags #:allow-other-keys)
                (apply invoke "make" "trampolines" make-flags)))
@@ -498,11 +501,7 @@ editor (console only)")
    (inputs
     (modify-inputs (package-inputs emacs-minimal)
       (prepend gnutls
-                ;; To "unshadow" ld-wrapper in native builds
-                (make-ld-wrapper "ld-wrapper" #:binutils binutils)
                ;; For native compilation
-                binutils
-                (libc-for-target)
                libgccjit

                ;; Avoid Emacs's limited movemail substitute that retrieves POP3
@@ -1757,24 +1757,20 @@ these identified regions.
  (package
    (name "stcgal")
    (version "1.10")
-    (source (origin
-              ;; The "doc" subdirectory referred to by stcgal's setup.py is
-              ;; missing from the source distribution on PyPI so we fetch
-              ;; directly from the project's git repository instead.
-              (method git-fetch)
-              (uri (git-reference
-                    (url "https://github.com/grigorig/stcgal")
-                    (commit (string-append "v" version))))
-              (file-name (git-file-name name version))
-              (sha256
-               (base32
-                "04hsj49sw5mb6swhd3sdsm7dzwp1frnzpmq70wgsn5vmjavb1ka8"))))
-    (build-system python-build-system)
-    (propagated-inputs
-     (list python-pyserial python-pyusb python-tqdm))
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/grigorig/stcgal")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "04hsj49sw5mb6swhd3sdsm7dzwp1frnzpmq70wgsn5vmjavb1ka8"))))
+    (build-system pyproject-build-system)
+    (propagated-inputs (list python-pyserial python-pyusb python-tqdm))
    (native-inputs
     ;; For tests.
-     (list python-pyyaml))
+     (list python-pytest python-pyyaml python-setuptools))
    (home-page "https://github.com/grigorig/stcgal")
    (synopsis "Programmer for STC 8051-compatible microcontrollers")
    (description "stcgal is a command-line flash-programming tool for STC
@@ -14,7 +14,7 @@
 ;;; Copyright © 2020 Jakub Kądziołka <kuba@kadziolka.net>
 ;;; Copyright © 2020 Christopher Howard <christopher@librehacker.com>
 ;;; Copyright © 2021 Felipe Balbi <balbi@kernel.org>
-;;; Copyright © 2021, 2024 Felix Gruber <felgru@posteo.net>
+;;; Copyright © 2021, 2024, 2025 Felix Gruber <felgru@posteo.net>
 ;;; Copyright © 2021, 2024-2025 Maxim Cournoyer <maxim@guixotic.coop>
 ;;; Copyright © 2021 Guillaume Le Vaillant <glv@posteo.net>
 ;;; Copyright © 2023 c4droid <c4droid@foxmail.com>
@@ -91,6 +91,7 @@
  #:use-module (gnu packages graphics)
  #:use-module (gnu packages gtk)
  #:use-module (gnu packages image)
+  #:use-module (gnu packages image-processing)
  #:use-module (gnu packages kde-frameworks)
  #:use-module (gnu packages libedit)
  #:use-module (gnu packages libusb)
@@ -109,9 +110,12 @@
  #:use-module (gnu packages python)
  #:use-module (gnu packages python-build)
  #:use-module (gnu packages python-xyz)
+  #:use-module (gnu packages serialization)
  #:use-module (gnu packages qt)
+  #:use-module (gnu packages robotics)
  #:use-module (gnu packages sdl)
  #:use-module (gnu packages sphinx)
+  #:use-module (gnu packages stb)
  #:use-module (gnu packages sqlite)
  #:use-module (gnu packages texinfo)
  #:use-module (gnu packages textutils)
@@ -1154,7 +1158,7 @@ The following systems are supported:
 (define-public sameboy
  (package
    (name "sameboy")
-    (version "0.16.3")
+    (version "1.0.2")
    (source
     (origin
       (method git-fetch)
@@ -1163,7 +1167,7 @@ The following systems are supported:
             (commit (string-append "v" version))))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "1jdjg59vzzkbi3c3qaxpsxqx955sb86cd3kcypb0nhjxbnwac1di"))))
+        (base32 "0pwnik37c3sgvib5xbadwbq2mjjvgxilhig09rjb3xp5i1d7ykja"))))
    (build-system gnu-build-system)
    (native-inputs
     (list rgbds pkg-config))
@@ -3725,6 +3729,165 @@ hardware states and PS2 system memory.  This allows you to play PS2 games on
 your PC, with many additional features and benefits.")
    (license license:gpl3+)))

+(define-public rpcs3
+  ;; NB: When updating to a new release, don't forget to check if any more
+  ;; libraries can be linked dynamically, and to update the commits for any
+  ;; specialized sources included in native-inputs so that they match the
+  ;; sub-modules in ./3rdparty.
+  (package
+    (name "rpcs3")
+    (version "0.0.38")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://github.com/RPCS3/rpcs3")
+              (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "0dwrfjs9b3ldwyn68nmyf0qip4hm1w8c3picdl3zk7z76j7rrhal"))))
+    (build-system cmake-build-system)
+    (arguments
+     (list
+      #:configure-flags
+      #~(list
+         ;; -fexceptions is needed to compile part of yaml-cpp.
+         "-DCMAKE_CXX_FLAGS=-fexceptions"
+         ;; "USE_NATIVE_INSTRUCTIONS makes rpcs3 compile with -march=native,
+         ;; which is useful for local builds, but not good for packages."
+         "-DUSE_NATIVE_INSTRUCTIONS=OFF"
+         "-DWITH_LLVM=ON"
+         "-DBUILD_LLVM=OFF"
+         "-DSTATIC_LINK_LLVM=OFF"
+         "-DUSE_FAUDIO=ON"
+         "-DUSE_LIBEVDEV=ON"
+         "-DUSE_DISCORD_RPC=OFF"
+         "-DUSE_VULKAN=ON"
+         "-DUSE_PRECOMPILED_HEADERS=OFF"
+         "-DUSE_SDL=ON"
+         "-DUSE_SYSTEM_CUBEB=ON"
+         "-DUSE_SYSTEM_CURL=ON"
+         "-DUSE_SYSTEM_FAUDIO=ON"
+         "-DUSE_SYSTEM_FFMPEG=ON"
+         "-DUSE_SYSTEM_FLATBUFFERS=ON"
+         "-DUSE_SYSTEM_GLSLANG=ON"
+         "-DUSE_SYSTEM_HIDAPI=ON"
+         "-DUSE_SYSTEM_LIBPNG=ON"
+         "-DUSE_SYSTEM_LIBUSB=ON"
+         "-DUSE_SYSTEM_MINIUPNPC=ON"
+         "-DUSE_SYSTEM_OPENAL=ON"
+         "-DUSE_SYSTEM_OPENCV=ON"
+         "-DUSE_SYSTEM_PUGIXML=ON"
+         "-DUSE_SYSTEM_RTMIDI=ON"
+         "-DUSE_SYSTEM_SDL=ON"
+         "-DUSE_SYSTEM_VULKAN_MEMORY_ALLOCATOR=ON"
+         "-DUSE_SYSTEM_WOLFSSL=ON"
+         "-DUSE_SYSTEM_ZLIB=ON"
+         "-DUSE_SYSTEM_ZSTD=ON"
+         "-DBUILD_RPCS3_TESTS=ON"
+         "-DRUN_RPCS3_TESTS=ON"
+         ;; "Choose whether to enable GameMode features or not."
+         ;; Off, for now, because GameMode requires systemd to work.
+         "-DUSE_GAMEMODE=OFF")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'add-some-submodules
+            ;; TODO: Remove as many of these as possible.
+            (lambda* (#:key inputs #:allow-other-keys)
+              (with-directory-excursion "3rdparty"
+                (rmdir "fusion/fusion")
+                (symlink (string-append
+                          (search-input-directory inputs "Fusion") "/../")
+                         "fusion/fusion")
+                (rmdir "SoundTouch/soundtouch")
+                (symlink (dirname
+                          (search-input-file inputs "soundtouch.pc.in"))
+                         "SoundTouch/soundtouch")
+                (rmdir "asmjit/asmjit")
+                (symlink (string-append
+                          (search-input-directory inputs "src/asmjit")
+                          "/../../")
+                         "asmjit/asmjit")
+                (rmdir "yaml-cpp/yaml-cpp")
+                (symlink (dirname
+                          (search-input-file inputs "yaml-cpp.pc.in"))
+                         "yaml-cpp/yaml-cpp")
+                (rmdir "stblib/stb")
+                (symlink (dirname
+                          (search-input-file inputs "stb_c_lexer.h"))
+                         "stblib/stb")))))))
+    (inputs
+     (append
+      (list cubeb
+            curl
+            eudev
+            faudio
+            ;; RPCS3 v0.0.38 uses symbols that are deprecated in ffmpeg 8.
+            ;; See https://github.com/RPCS3/rpcs3/issues/17461
+            ffmpeg-6
+            flatbuffers
+            glew
+            glslang
+            glu
+            hidapi
+            jack-2
+            libevdev
+            libglvnd
+            libpng
+            libusb-next
+            llvm-18
+            mesa
+            miniupnpc-next
+            openal
+            opencv
+            pugixml-next
+            pulseaudio
+            qtbase
+            qtmultimedia
+            qtsvg
+            rtmidi
+            sdl3
+            spirv-tools
+            vulkan-loader
+            wayland
+            wolfssl-for-rpcs3
+            zlib
+            `(,zstd "lib"))))
+    (native-inputs
+     (list
+      googletest
+      pkg-config
+      vulkan-memory-allocator
+      (package-source asmjit)
+      (package-source fusion)
+      (package-source stb)
+      (origin
+        (file-name "rpcs3-soundtouch-source")
+        (method git-fetch)
+        (uri (git-reference
+               (url "https://github.com/RPCS3/soundtouch")
+               (commit "3982730833b6daefe77dcfb32b5c282851640c17")))
+        (sha256
+         (base32 "07q514mx69jkrz7i58c45iwj3zql88vdsa1sah7immwr1005i91y")))
+      (origin
+        (file-name "rpcs3-yaml-cpp-source")
+        (method git-fetch)
+        (uri (git-reference
+               (url "https://github.com/RPCS3/yaml-cpp")
+               (commit "456c68f452da09d8ca84b375faa2b1397713eaba")))
+        (sha256
+         (base32 "0spp91yz1bvr9dljc7zgjf2sqw49d8b9yinlncykjwzxm7ap7jys")))))
+    (home-page "https://rpcs3.net/")
+    (synopsis "PlayStation 3 emulator")
+    (description "RPCS3 is an emulator and debugger for the Sony
+@acronym{PS3,PlayStation 3}.")
+    (license
+     (list license:gpl2                 ;core, pine_server.h
+           license:bsd-3                ;FindWayland.cmake, FindFFMPEG.cmake
+           ;;flow_layout.h, sse2neon.h, unordered_dense.h, ffx_fsr1.h,
+           ;;ffx_a.h, bcdec.hpp, LUrlParser.h, khrplatform.h
+           license:expat))))
+
 (define-public gens-gs
  (package
    (name "gens-gs")
@@ -4420,11 +4420,19 @@ G-codes to binary and vice versa.")
                 (lambda _
                   (substitute* "tests/libslic3r/test_quadric_edge_collapse.cpp"
                     (("#include <libigl/igl/qslim.h>")
-                      "#include <igl/qslim.h>")))))))
+                      "#include <igl/qslim.h>"))))
+               (add-after 'install 'wrap-program
+                 (lambda _
+                   (wrap-program (string-append #$output "/bin/prusa-slicer")
+                     ;; For GtkFileChooserDialog.
+                     `("GSETTINGS_SCHEMA_DIR" =
+                       (,(string-append #$(this-package-input "gtk+")
+                                        "/share/glib-2.0/schemas")))))))))
    (native-inputs
     (list pkg-config catch2-3.8))
    (inputs
-     (list boost-1.83
+     (list bash-minimal
+           boost-1.83
           cereal
           cgal
           curl
@@ -392,50 +392,56 @@ embedded systems.")
 (define-public python-efl
  (package
    (name "python-efl")
-    (version "1.26.0")
+    (version "1.26.1")
    (source
-      (origin
-        (method url-fetch)
-        (uri (string-append "https://download.enlightenment.org/rel/bindings/"
-                            "python/python-efl-" version ".tar.xz"))
-        (sha256
-         (base32
-          "0dj6f24n33hkpy0bkdclnzpxhvs8vpaxqaf7hkw0di19pjwrq25h"))
-        (modules '((guix build utils)))
-        ;; Remove files generated by Cython
-        (snippet
-         '(begin
-            (for-each (lambda (file)
-                        (let ((generated-file
-                                (string-append (string-drop-right file 3) "c")))
-                          (when (file-exists? generated-file)
-                            (delete-file generated-file))))
-                      (find-files "efl" "\\.pyx$"))
-            (delete-file "efl/eo/efl.eo_api.h")))))
-    (build-system python-build-system)
+     (origin
+       (method url-fetch)
+       (uri (string-append "https://download.enlightenment.org/rel/bindings/"
+                           "python/python-efl-" version ".tar.xz"))
+       (sha256
+        (base32 "1mr80vgbcs03rs5lbmg8pxj8hifkrzrwdrw01plik2h729z3knyw"))
+       (modules '((guix build utils)))
+       ;; Remove files generated by Cython
+       (snippet
+        '(begin
+           (for-each (lambda (file)
+                       (let ((generated-file
+                              (string-append (string-drop-right file 3) "c")))
+                         (when (file-exists? generated-file)
+                           (delete-file generated-file))))
+                     (find-files "efl" "\\.pyx$"))
+           (delete-file "efl/eo/efl.eo_api.h")))))
+    (build-system pyproject-build-system)
    (arguments
-     '(#:phases
-       (modify-phases %standard-phases
-         (replace 'build
-           (lambda _
-             (setenv "ENABLE_CYTHON" "1")
-             (invoke "python" "setup.py" "build")))
-        (add-before 'build 'set-flags
-          (lambda _
-            (setenv "CFLAGS"
-                    (string-append "-I" (assoc-ref %build-inputs "python-dbus")
-                                   "/include/dbus-1.0"))))
-        (add-before 'check 'set-environment
-          (lambda _
-            ;; Some tests require write access to HOME.
-            (setenv "HOME" "/tmp")
-            ;; These tests try to connect to the internet.
-            (delete-file "tests/ecore/test_09_file_download.py")
-            (delete-file "tests/ecore/test_11_con.py"))))))
+     (list
+      #:test-flags
+      #~(list "tests"
+              ;; These tests try to connect to the internet.
+              "--ignore=tests/ecore/test_09_file_download.py"
+              "--ignore=tests/ecore/test_11_con.py"
+              ;; The above test ignorance probably breaks this one.
+              "--deselect=tests/ecore/test_08_exe.py::TestExe::testInit"
+              ;; This test requires access to a running Xorg server,
+              ;; /var/lib/dbus and /etc.
+              "--ignore=tests/dbus/test_01_basics.py"
+              ;; XXX: RuntimeWarning: Setting standard icon failed
+              "--ignore=tests/elementary/test_02_image_icon.py")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-before 'build 'set-flags
+            (lambda* (#:key inputs #:allow-other-keys)
+              (let ((include-dir (search-input-directory inputs
+                                                         "include/dbus-1.0")))
+                (setenv "CFLAGS" (string-append "-I" include-dir)))))
+          (add-before 'check 'configure-tests
+            (lambda _
+              (setenv "HOME" "/tmp")))))) ;needed by tests
    (native-inputs
-     (list pkg-config python-cython-0))
-    (inputs
-     (list efl python-dbus python-packaging))
+     (list pkg-config
+           python-cython-0
+           python-pytest
+           python-setuptools))
+    (inputs (list efl python-dbus python-packaging))
    (home-page "https://www.enlightenment.org/")
    (synopsis "Python bindings for EFL")
    (description
@@ -692,3 +692,25 @@ as well as those for Chinese dialects.  It has the ability to compose phrases
 and sentences intelligently and provide very accurate traditional Chinese
 output.")
    (license license:lgpl2.1+)))
+
+(define-public fcitx5-hangul
+  (package
+    (name "fcitx5-hangul")
+    (version "5.1.7")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/fcitx/fcitx5-hangul")
+             (commit version)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "02lkbwg25jr4hazjyxcy69midfsmxc0ksbdrfwbmqcfa3kz5d9gb"))))
+    (build-system cmake-build-system)
+    (native-inputs (list extra-cmake-modules pkg-config gettext-minimal))
+    (inputs (list fcitx5 libhangul))
+    (home-page "https://github.com/fcitx/fcitx5-hangul")
+    (synopsis "Hangul support for Fcitx5")
+    (description
+     "This package provides the Hangul (Korean) input method engine for Fcitx5.")
+    (license license:lgpl2.1+)))
@@ -354,14 +354,14 @@ Accounting.")
 (define-public homebank
  (package
    (name "homebank")
-    (version "5.9.4")
+    (version "5.9.6")
    (source (origin
              (method url-fetch)
              (uri (string-append "https://www.gethomebank.org/public/sources"
                                  "/homebank-" version ".tar.gz"))
              (sha256
               (base32
-                "1gwzj3x3rnd3f5z1fzvrl740zhpnxjcsbxlmabwgkw22l6226i4c"))))
+                "0ymp7qj6im1cl66lbf9q2r8dgav3dagbhbipskg8zcgj0kz0ncph"))))
    (build-system glib-or-gtk-build-system)
    (native-inputs
     (list pkg-config intltool))
@@ -1257,29 +1257,6 @@ of Bitcoin BIP-0039.")
 Ledger Blue/Nano S.")
    (license license:asl2.0)))

-(define-public python-btchip-python
-  (package
-    (name "python-btchip-python")
-    (version "0.1.32")
-    (source
-      (origin
-        (method url-fetch)
-        (uri (pypi-uri "btchip-python" version))
-        (sha256
-          (base32
-            "0mcg3gfd0qk8lhral3vy9cfd4pii9kzs42q71pf6b3y0c70y1x9l"))))
-    (build-system python-build-system)
-    (arguments
-     `(#:tests? #f)) ; those require PyQt4
-    (propagated-inputs
-      (list python-ecdsa python-hidapi))
-    (home-page "https://github.com/LedgerHQ/btchip-python")
-    (synopsis "Python library to communicate with Ledger Nano dongle")
-    (description
-      "This package provides a Python library to communicate with Ledger
-Nano dongle.")
-    (license license:asl2.0)))
-
 (define-public python-trezor
  (package
    (name "python-trezor")
@@ -44,6 +44,7 @@
  #:use-module (guix build-system gnu)
  #:use-module (guix build-system go)
  #:use-module (guix build-system meson)
+  #:use-module (guix build-system pyproject)
  #:use-module (guix build-system python)
  #:use-module (guix build-system qt)
  #:use-module (guix download)
@@ -78,6 +79,7 @@
  #:use-module (gnu packages perl)
  #:use-module (gnu packages pkg-config)
  #:use-module (gnu packages python)
+  #:use-module (gnu packages python-build)
  #:use-module (gnu packages qt)
  #:use-module (gnu packages readline)
  #:use-module (gnu packages swig)
@@ -490,29 +492,31 @@ Management Engine (ME).  You need to @code{sudo rmmod mei_me} and
  (package
    (name "me-cleaner")
    (version "1.2")
-    (source (origin
-              (method git-fetch)
-              (uri (git-reference
-                     (url "https://github.com/corna/me_cleaner")
-                     (commit (string-append "v" version))))
-              (sha256
-               (base32
-                "1bdj2clm13ir441vn7sv860xsc5gh71ja5lc2wn0gggnff0adxj4"))
-              (file-name (git-file-name name version))))
-    (build-system python-build-system)
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/corna/me_cleaner")
+             (commit (string-append "v" version))))
+       (sha256
+        (base32 "1bdj2clm13ir441vn7sv860xsc5gh71ja5lc2wn0gggnff0adxj4"))
+       (file-name (git-file-name name version))))
+    (build-system pyproject-build-system)
    (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (add-after 'install 'install-documentation
-           (lambda* (#:key outputs #:allow-other-keys)
-             (let* ((out (assoc-ref outputs "out"))
-                    (man (string-append out "/share/man/man1")))
-               (install-file "man/me_cleaner.1" man)
-               #t))))))
+     (list
+      #:tests? #f ; No tests.
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'install 'install-documentation
+            (lambda _
+              (install-file "man/me_cleaner.1"
+                            (string-append #$output "/share/man/man1")))))))
+    (native-inputs (list python-setuptools))
    (home-page "https://github.com/corna/me_cleaner")
    (synopsis "Intel ME cleaner")
-    (description "This package provides tools for disabling Intel
-ME as far as possible (it only edits ME firmware image files).")
+    (description
+     "This package provides tools for disabling Intel ME as far as possible
+(it only edits ME firmware image files).")
    (license license:gpl3+)

    ;; This is an Intel thing.
@@ -488,7 +488,7 @@ provide serif, sans and monospaced variants.")
 package provides the TrueType (TTF) files.")
    (license
     (license:fsdg-compatible
-      "https://www.gnome.org/fonts/#Final_Bitstream_Vera_Fonts"
+      "https://spdx.org/licenses/Bitstream-Vera.html"
      "The Font Software may be sold as part of a larger software package but
 no copy of one or more of the Font Software typefaces may be sold by
 itself."))))
@@ -576,6 +576,61 @@ intended to be optimally legible for readers who are partially visually impaired
 all characters maximally distinguishable from one another.")
      (license license:silofl1.1))))

+(define-public font-atkinson-hyperlegible-next
+  (let ((commit "7925f50f649b3813257faf2f4c0b381011f434f1")
+        (revision "0"))
+    (package
+      (name "font-atkinson-hyperlegible-next")
+      (version (git-version "2.001" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url
+                "https://github.com/googlefonts/atkinson-hyperlegible-next/")
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "01m59xl35xvjv07d0qwli1czgfjg2wfgv676xi71is2rirh1y71f"))))
+      (build-system font-build-system)
+      (home-page "https://www.brailleinstitute.org/freefont/")
+      (synopsis
+       "Typeface designed to increase legibility for low vision readers")
+      (description
+       "Atkinson Hyperlegible Next is an improvement of the typeface Atkinson
+Hyperlegible, including new characters, improved glyphs, and improved kerning.
+Additionally, the two previous weights has increased to six, all in upright
+and italic, allowing for greater flexibility in use.")
+      (license license:silofl1.1))))
+
+(define-public font-atkinson-hyperlegible-mono
+  (let ((commit "154d50362016cc3e873eb21d242cd0772384c8f9")
+        (revision "0"))
+    (package
+      (name "font-atkinson-hyperlegible-mono")
+      (version (git-version "2.001" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url
+                "https://github.com/googlefonts/atkinson-hyperlegible-next-mono/")
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "0bdhp70zniqnj14raw9krb034zrvvxhzimzqys713p8ksrndck2p"))))
+      (build-system font-build-system)
+      (home-page "https://www.brailleinstitute.org/freefont/")
+      (synopsis
+       "Monospace typeface designed to increase legibility for low vision readers")
+      (description
+       "Atkinson Hyperlegible Mono is an entirely new typeface inspired by
+Atkinson Hyperlegible.  The characters in a monospace typeface all occupy the
+same width, allowing for them to be scanned quickly in table-based and coding
+environments.  The glyphs in Atkinson Hyperlegible Mono are newly created for
+this variation, and unique to the typeface.")
+      (license license:silofl1.1))))
+
 (define-public font-lato
  (package
    (name "font-lato")
@@ -38,6 +38,7 @@
 ;;; Copyright © 2025 Arnaud Lechevallier <arnaud.lechevallier@free.fr>
 ;;; Copyright © 2025 Vinicius Monego <monego@posteo.net>
 ;;; Copyright © 2025 Simen Endsjø <contact@simendsjo.me>
+;;; Copyright © 2025 gemmaro <gemmaro.dev@gmail.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -569,38 +570,78 @@ types (revolute, prismatic, wheel, etc.).")
    (license license:zlib)))

 (define-public python-anvil-parser
-  (let ((commit "27544bb41f035617be130a209a84371cbaf837cc")
+  ;; Github project does not have tags.
+  (let ((commit "91a7eda55f0fb55a948d1072896430c29d906809")
        (revision "0"))
  (package
    (name "python-anvil-parser")
-    (version (git-version "0.9.0" revision commit))
+    (version (git-version "0.10.6" revision commit))
    (source
     (origin
       (method git-fetch)
       (uri (git-reference
-             (url "https://github.com/0xTiger/anvil-parser")
+             (url "https://github.com/0xTiger/anvil-parser2")
             (commit commit)))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "196nli36pz4sllx1m8jlys661hgbxhcxr2c4545fqb4nd27hhwy7"))))
-    (build-system python-build-system)
+        (base32 "16j7kv6v782nz1fafkxkb7v2vpwfhpi1a66ak04xawg9h1fz7vkc"))))
+    (build-system pyproject-build-system)
+    (native-inputs
+     (list python-pytest python-setuptools))
    (propagated-inputs (list python-frozendict python-nbt))
-    (home-page "https://github.com/0xTiger/anvil-parser")
+    (home-page "https://github.com/0xTiger/anvil-parser2")
    (synopsis "Anvil file format parser")
    (description "This package provides an Anvil file format parser.")
    (license license:expat))))

+;;~4MiB of test files.
+(define python-nbt-testdata
+  (file-union
+   "python-nbt-testdata"
+   (list
+    (let ((file "Sample_World.tar.gz"))
+      `(,file
+        ,(origin
+           (method url-fetch)
+           (uri (string-append
+                 "https://github.com/twoolie/NBT/files/13199373/"
+                 file))
+           (sha256
+            (base32
+             "1s58g5zicx8ghdai2qix2aqq0fc675vfajica4h78c397crwjrl9"))))))))
+
 (define-public python-nbt
  (package
    (name "python-nbt")
    (version "1.5.1")
-    (source (origin
-              (method url-fetch)
-              (uri (pypi-uri "NBT" version))
-              (sha256
-               (base32
-                "1i9ncrzy5zcfnxzkh2j31n9ayzxfncckzwa6fkz9vjq5fq9v4fys"))))
-    (build-system python-build-system)
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://github.com/twoolie/NBT")
+              (commit (string-append "version-" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "1a3mj7c18m1n5iqzwwvvlk7n65kxp3xbmccsqyap36apwpbbxyd9"))))
+    (build-system pyproject-build-system)
+    (arguments
+     (list
+      #:test-flags
+      #~(list "tests/regiontests.py" "tests/nbttests.py")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-before 'check 'fake-download
+            ;; Fake the download of the test tarball.
+            (lambda _
+              (substitute*
+                  "tests/downloadsample.py"
+                (("tar_file = .*")
+                 (string-append
+                  "tar_file = '"
+                  #+python-nbt-testdata
+                  "/Sample_World.tar.gz'"))))))))
+    (native-inputs
+     (list python-pytest python-setuptools))
    (home-page "https://github.com/twoolie/NBT")
    (synopsis "Named Binary Tag reader and writer")
    (description
@@ -1949,6 +1990,43 @@ programming languages.")
 visual novel engine, explaining all of its features.")
    (license license:expat)))

+(define-public rpatool
+  ;; XXX: No releases or version tags, see:
+  ;; <https://codeberg.org/shiz/rpatool/issues/28>.
+  (let ((revision "0")
+        (commit "74f26d5dfdd645483e02552aa766ca447ad6b191"))
+    (package
+      (name "rpatool")
+      (version (git-version "0.8" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url "https://codeberg.org/shiz/rpatool")
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "10dm8bak0dm84d1ciwzw6jd5y64invddlmcdnawnpp7jn3wrg1jb"))))
+      (build-system pyproject-build-system)
+      (arguments
+       (list
+        #:tests? #f ;no tests
+        #:phases
+        #~(modify-phases %standard-phases
+            (delete 'build)
+            (replace 'install
+              (lambda _
+                (install-file "rpatool"
+                              (string-append #$output "/bin")))))))
+      (home-page "https://codeberg.org/shiz/rpatool")
+      (synopsis "Tool to work with Ren'Py archives")
+      (description
+       "@samp{rpatool} is a simple tool allowing you to create, modify and
+extract @url{https://www.renpy.org/,Ren'Py} Archive files
+(@code{.rpa}/@code{.rpi}).  Currently, only writing RPAv2/RPAv3 archives is
+supported.")
+      (license license:wtfpl2))))
+
 (define-public python-pyxel
  ;; Note to updaters: Use commit and revision even if you're bumping
  ;; to a release, as upstream is known to "reuse" tags.
@@ -2094,36 +2172,40 @@ robust and compatible with many systems and operating systems.")
    (license license:zlib)))

 (define-public mc2mt
+  ;; No tags in the repository.
  (let ((commit "039dbc26466a430e03c646dc5a9bd0822637a87a")
        (revision "0"))
-  (package
-    (name "mc2mt")
-    (version (git-version "0.1" revision commit))
-    (source
-     (origin
-       (method git-fetch)
-       (uri (git-reference
-             (url "https://github.com/listia/mc2mt")
-             (commit commit)))
-       (file-name (git-file-name name version))
-       (sha256
-        (base32 "1vnaznwgm87x0n5dp14363p2h54lpzalynrrd6lbs6wgrqq7fq9i"))
-       (patches (search-patches "mc2mt-add-packaging-support.patch"))
-       (modules '((guix build utils)))
-       (snippet
-        #~(begin
-            (substitute* "mc2mtlib/argument_parser.py"
-              (("mineclone2") "mineclone"))))))
-    (build-system pyproject-build-system)
-    (native-inputs (list python-setuptools))
-    (propagated-inputs (list python-anvil-parser))
-    (arguments
-     (list #:tests? #f)) ; no tests
-    (synopsis "Minecraft to Minetest world converter")
-    (description "@code{mc2mt} is a Minecraft to Minetest world converter.
+    (package
+      (name "mc2mt")
+      (version (git-version "0.1" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+                (url "https://github.com/listia/mc2mt")
+                (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "1vnaznwgm87x0n5dp14363p2h54lpzalynrrd6lbs6wgrqq7fq9i"))
+         (patches (search-patches "mc2mt-add-packaging-support.patch"))
+         (modules '((guix build utils)))))
+      (build-system pyproject-build-system)
+      (arguments
+       (list
+        #:tests? #f ; no tests
+        #:phases
+        #~(modify-phases %standard-phases
+            (add-after 'unpack 'patch-code
+              (lambda* _
+                (substitute* "mc2mtlib/argument_parser.py"
+                  (("mineclone2") "mineclone")))))))
+      (native-inputs (list python-pytest python-setuptools))
+      (propagated-inputs (list python-anvil-parser))
+      (synopsis "Minecraft to Minetest world converter")
+      (description "@code{mc2mt} is a Minecraft to Minetest world converter.
 It can convert worlds from Minecraft 1.9 and later.")
-    (home-page "https://github.com/listia/mc2mt")
-    (license license:expat))))
+      (home-page "https://github.com/listia/mc2mt")
+      (license license:expat))))

 (define-public mygui
  (package
@@ -1544,7 +1544,7 @@ practise.")
 (define-public doom-runner
  (package
    (name "doom-runner")
-    (version "1.8.3")
+    (version "1.9.1")
    (source
     (origin
       (method git-fetch)
@@ -1553,10 +1553,13 @@ practise.")
             (commit (string-append "v" version))))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "0rpywq95zy9w0wj1262x4rf84c52wg1rgf0by549qph6fybn34rn"))))
+        (base32 "19jq5cj6rc8d5ghd9321a2f3v0b7z928990d7dj6ynyhkpcj769p"))
+       (modules '((guix build utils)))
+       (snippet #~(delete-file-recursively "Screenshots")))) ;Save 1.4MiB.
    (build-system qt-build-system)
    (arguments
     (list
+      #:qtbase qtbase
      #:tests? #f                       ;no tests
      #:modules '((guix build qt-build-system)
                  ((guix build gnu-build-system) #:prefix gnu:)
@@ -1565,37 +1568,37 @@ practise.")
      #~(modify-phases %standard-phases
          (replace 'configure
            (lambda _
-              (substitute* "DoomRunner.pro"
-                (("/usr")
-                 #$output))
              (invoke "qmake" "DoomRunner.pro" "-spec" "linux-g++"
-                      "\"CONFIG+=release\"")))
+                      "\"CONFIG+=release\""
+                      (string-append "INSTALL_DIR=" #$output))))
          (replace 'build (assoc-ref gnu:%standard-phases 'build))
          (replace 'install (assoc-ref gnu:%standard-phases 'install))
          (add-after 'install 'install-xdg
            (lambda _
+              (with-directory-excursion #$output
+                (install-file "DoomRunner" "bin/")
+                (delete-file "DoomRunner"))
              (with-directory-excursion "Install/XDG"
                (install-file "DoomRunner.desktop"
-                              (string-append #$output
-                                             "/share/applications"))
-                (let ((install-icon
-                       (lambda (size)
-                         (install-file (simple-format
-                                        #f "DoomRunner.~sx~s.png"
-                                        size size)
-                                       (simple-format
-                                        #f "~a/share/icons/hicolor/~sx~s/apps"
-                                        #$output size size)))))
-                  (for-each install-icon
-                            '(16 24 32 48 64 128)))))))))
+                              (string-append #$output "/share/applications"))
+                (install-file "io.github.Youda008.DoomRunner.appdata.xml"
+                              (string-append #$output "/share/metainfo"))
+                (for-each
+                 (lambda (size)
+                   (let ((filename (simple-format #f "DoomRunner.~sx~s.png"
+                                                  size size)))
+                     (chmod filename #o444)
+                     (install-file
+                      filename
+                      (simple-format #f "~a/share/icons/hicolor/~sx~s/apps"
+                                     #$output size size))))
+                 '(16 24 32 48 64 128))))))))
    (home-page "https://github.com/Youda008/DoomRunner")
    (synopsis "Launcher for Doom engine games")
-    (description
-     "Doom Runner is yet another launcher of common Doom source ports (like
-GZDoom, Zandronum, PrBoom, ...) with graphical user interface.  It is
-written in C++ and Qt, and it is designed around the idea of presets
-for various multi-file modifications to allow one-click switching
-between them and minimize any repetitive work.")
+    (description "Doom Runner is yet another launcher of common Doom source
+ports (e.g.  GZDoom, Zandronum, PrBoom) with a graphical user interface.  It
+is written in C++ and Qt, and it is designed around the idea of presets for
+various multi-file modifications to allow one-click switching between them.")
    (license license:gpl3)))

 (define-public falltergeist
@@ -9235,7 +9238,7 @@ original.")
 (define-public woof-doom
  (package
    (name "woof-doom")
-    (version "15.2.0")
+    (version "15.3.0")
    (source
     (origin
       (method git-fetch)
@@ -9244,22 +9247,29 @@ original.")
             (commit (string-append "woof_" version))))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "04c7hm4jnr9aiz6w4520zww6b7j86qv9xaf87hdv48cjc9sp2ljk"))
+        (base32 "0ki7wqjhqhjxci04aksh9m8m35gi2db89475v79rjzdgk00b3mqv"))
       (modules '((guix build utils)))
       (snippet '(begin
                   (with-directory-excursion "third-party"
                     (delete-file-recursively "miniz")
                     (delete-file-recursively "yyjson")
-                     (delete-file-recursively "spng"))
+                     (delete-file-recursively "spng")
+                     (substitute* "CMakeLists.txt"
+                       (("add_library\\(miniz.+")
+                        "find_package(miniz REQUIRED)")
+                       (("target_.+\\(miniz.+$") "")
+                       (("add_library\\(spng.+")
+                        "find_package(PkgConfig)
+pkg_search_module(spng REQUIRED spng)")
+                       (("target_.+\\(spng.+$") "")))
                   (delete-file-recursively "win32")
                   (substitute* (find-files "src" ".")
-                     (("miniz.h") "miniz/miniz.h"))))
-       (patches (search-patches "woof-doom-unbundle-spng-miniz.patch"))))
+                     (("miniz.h") "miniz/miniz.h"))))))
    (build-system cmake-build-system)
    (arguments
     (list
      #:tests? #f)) ;'demotest' requires internet access.
-    (native-inputs (list python))
+    (native-inputs (list pkg-config python))
    (inputs (list libebur128
                  libsndfile
                  libxmp
@@ -9270,8 +9280,8 @@ original.")
                  spng
                  yyjson
                  fluidsynth))
-    (home-page "https://github.com/fabiangreffrath/woof")
-    (synopsis "MBF-style Doom source port targeted at modern systems")
+    (home-page "https://fabiangreffrath.github.io/woof/")
+    (synopsis "MBF-lineage Doom source port")
    (description
     "Woof! is a continuation of the MBF lineage of Doom source ports, with
 modern features such as dynamic resolution scaling, uncapped framerates,
@@ -9284,7 +9294,6 @@ UMAPINFO, DEHEXTRA, and DSDHacked specifictions.")
     (list (license:non-copyleft
            "https://bitbucket.org/jpommier/pffft/src/master/pffft.h"
            "FFTPACK license")
-           license:bsd-2
           license:bsd-3
           license:cc-by3.0
           license:cc0
@@ -200,6 +200,18 @@ written in C, C++, Ada, Objective-C, Pascal and more.")
               (base32
                "1i940b04404xr44xc66c4r4nk091czqz7zzrmhbpk64aaaax1z5w"))))))

+(define-public gdb-17
+  (package
+    (inherit gdb-14)
+    (version "17.1")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "mirror://gnu/gdb/gdb-"
+                                  version ".tar.xz"))
+              (sha256
+               (base32
+                "0xnqqv3j463r5rnfmblj3zwhf0l0lyy4bp1zaid8zxn9fignz68l"))))))
+
 (define-public gdb
  ;; The "default" version.
  gdb-14)
@@ -34,10 +34,11 @@
  #:use-module (gnu packages)
  #:use-module (guix packages)
  #:use-module (guix gexp)
+  #:use-module (guix git-download)
  #:use-module (guix download)
  #:use-module (guix build-system gnu)
  #:use-module (guix build-system perl)
-  #:use-module (guix build-system python)
+  #:use-module (guix build-system pyproject)
  #:use-module (gnu packages bash)
  #:use-module (gnu packages check)
  #:use-module (gnu packages docbook)
@@ -48,6 +49,7 @@
  #:use-module (gnu packages perl-check)
  #:use-module (gnu packages tex)
  #:use-module (gnu packages xml)
+  #:use-module (gnu packages python-build)
  #:use-module (gnu packages python-xyz)
  #:use-module (gnu packages sphinx)
  #:use-module (guix utils))
@@ -232,17 +234,37 @@ color, font attributes (weight, posture), or underlining.")
 (define-public mdpo
  (package
    (name "mdpo")
-    (version "0.3.6")
+    (version "0.3.86") ;the last version without Rust
    (source
     (origin
-       (method url-fetch)
-       (uri (pypi-uri "mdpo" version))
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://github.com/mondeja/mdpo")
+              (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
       (sha256
-        (base32 "0kgbm0af7jwpfspa2xxiy9nc2l1r2s1rhbhz4r229zcqv49ak6sq"))))
-    (build-system python-build-system)
-    (native-inputs (list python-bump2version python-pytest python-yamllint))
-    (propagated-inputs
-     (list python-polib python-pymd4c))
+        (base32 "130g8ggy0xgk5jmlx23569wmv9fz7fhm8qi46cjj7n4fxr0vnmyx"))))
+    (build-system pyproject-build-system)
+    (arguments
+     (list
+      ;; tests: 91 passed
+      #:test-flags
+      ;; XXX: The Most of the tests fail because 0.3.86 was released in 2022
+      ;; and depends on python-pytest@6.2.4.
+      ;; 
+      ;; OSError: pytest: reading from stdin while output is captured!
+      ;; Consider using `-s`.
+      #~(list "--ignore=test/test_integration/"
+              "--ignore=test/test_unit/test_md2po/"
+              "--ignore=test/test_unit/test_md2po2md/"
+              "--ignore=test/test_unit/test_mdpo2html/"
+              "--ignore=test/test_unit/test_po2md/")))
+    (native-inputs
+     (list python-pytest
+           python-setuptools))
+    (inputs
+     (list python-polib
+           python-pymd4c))
    (home-page "https://github.com/mondeja/mdpo")
    (synopsis "Markdown file translation utilities using pofiles")
    (description
@@ -588,9 +588,10 @@ interface (FFI) of Guile.")
              (sha256
               (base32
                "1ji3ynhp36m1ccx7bmaq75dhij9frpn19v9mpi4aajn8csl194il"))))
-    (build-system python-build-system)
+    (build-system pyproject-build-system)
    (arguments
     (list
+      #:tests? #f ; No test suite.
      #:phases
      #~(modify-phases %standard-phases
          (add-before 'build 'set-environment
@@ -603,12 +604,11 @@ interface (FFI) of Guile.")
                           "extra_macros = { \"_FILE_OFFSET_BITS\": 64 }")))
                     #~())
              (substitute* "setup.py"
-                (("cc") (which "gcc"))))))
-      #:tests? #f)) ; No test suite.
+                (("cc") (which "gcc"))))))))
    (inputs
     (list gpgme))
    (native-inputs
-     (list swig))
+     (list swig python-setuptools))
    (home-page (package-home-page gpgme))
    (synopsis "Python bindings for GPGME GnuPG cryptography library")
    (description "This package provides Python bindings to the GPGME GnuPG
@@ -46,6 +46,7 @@
 ;;; Copyright © 2025 David Thompson <davet@gnu.org>
 ;;; Copyright © 2025 Danny Milosavljevic <dannym@friendly-machines.com>
 ;;; Copyright © 2025 Patrick Norton <patrick.147.norton@gmail.com>
+;;; Copyright © 2025 Jared Klingenberger <jkling@noreply.codeberg.org>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -4598,7 +4599,7 @@ decode/encode structures and slices.")
 (define-public go-github-com-gaissmai-bart
  (package
    (name "go-github-com-gaissmai-bart")
-    (version "0.11.1")
+    (version "0.26.0")
    (source
     (origin
       (method git-fetch)
@@ -4607,7 +4608,7 @@ decode/encode structures and slices.")
             (commit (string-append "v" version))))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "1rnbmykmkl0c1fzz4vkv7q72l7hl2xpmalbm41f4lifdjscx5nk7"))))
+        (base32 "0w79ns4l7av8c4mzfshc0gyp7nfav2jgg6n2my2nziy8wns1bw33"))))
    (build-system go-build-system)
    (arguments
     (list
@@ -1119,7 +1119,7 @@ in the style of communicating sequential processes (@dfn{CSP}).")
  (package
    (inherit go-1.24)
    (name "go")
-    (version "1.25.3")
+    (version "1.25.5")
    (source
     (origin
       (method git-fetch)
@@ -1128,7 +1128,7 @@ in the style of communicating sequential processes (@dfn{CSP}).")
              (commit (string-append "go" version))))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "037gcrl8nagdsq2kv8irx7n0nijjmlqpz0b0zyj482xz2wzar0fs"))))
+        (base32 "102ngi7q0bwb0q391jag7fix70x7lp2mdmbkkh50fwclga14l842"))))
    (arguments
     (substitute-keyword-arguments (package-arguments go-1.24)
       ((#:phases phases)
@@ -64,28 +64,7 @@
        (base32 "1zmp7kkldb59fx1y6k4mkff8ngmyb9pflcd3yqb28m9wb9bp4j4h"))
       (file-name (git-file-name name version))
       (patches (search-patches "gpodder-disable-updater.patch"))))
-    (build-system python-build-system)
-    (native-inputs
-     (list intltool
-           python-coverage
-           python-minimock
-           python-pytest
-           python-pytest-cov
-           python-pytest-httpserver
-           which))
-    (inputs
-     (list bash-minimal
-           gtk+
-           python-pygobject
-           python-pycairo
-           python-requests
-           python-dbus
-           python-html5lib
-           python-mutagen
-           python-mygpoclient
-           python-podcastparser
-           yt-dlp
-           xdg-utils))
+    (build-system pyproject-build-system)
    (arguments
     (list
      #:phases
@@ -120,6 +99,27 @@
              (let ((gi-typelib-path (getenv "GI_TYPELIB_PATH")))
                (wrap-program (string-append #$output "/bin/gpodder")
                  `("GI_TYPELIB_PATH" ":" prefix (,gi-typelib-path)))))))))
+    (native-inputs
+     (list intltool
+           python-minimock
+           python-pytest
+           python-pytest-cov
+           python-pytest-httpserver
+           python-setuptools
+           which))
+    (inputs
+     (list bash-minimal
+           gtk+
+           python-pygobject
+           python-pycairo
+           python-requests
+           python-dbus
+           python-html5lib
+           python-mutagen
+           python-mygpoclient
+           python-podcastparser
+           yt-dlp
+           xdg-utils))
    (home-page "https://gpodder.github.io")
    (synopsis "Simple podcast client")
    (description "gPodder is a podcatcher, i.e. an application that allows
@@ -205,7 +205,7 @@ coordinates as well as partial support for adjustments in global coordinate syst
 (define-public gpxsee
  (package
    (name "gpxsee")
-    (version "13.22")
+    (version "15.6")
    (source
     (origin
       (method git-fetch)
@@ -214,7 +214,7 @@ coordinates as well as partial support for adjustments in global coordinate syst
             (commit version)))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "15m5rqky2fwsq5n6x531350x39wwhpv1hz56m1yfaxj7acxhb2p5"))))
+        (base32 "0kfbx7vv740fkx96v3m1gywl0mdfs3mxq84hmipjksm59qi4s3yy"))))
    (build-system qt-build-system)
    (arguments
     (list
@@ -428,21 +428,17 @@ graphs in Graphviz's DOT language, written in pure Python.")
              (sha256
               (base32
                "1kp77wiv7b5qib82i3y3sn9r49rym43aaqm5aw1bwnzfbbq2m6i9"))))
-    (build-system python-build-system)
+    (build-system pyproject-build-system)
    (arguments
     (list
-      #:phases
-      #~(modify-phases %standard-phases
-          (replace 'check
-            (lambda* (#:key tests? #:allow-other-keys)
-              (when tests?
-                (invoke "pytest" "-vv" "tests"
-                        ;; The test_semicolon test fails for unknown reason
-                        ;; (see:
-                        ;; https://github.com/kjellmf/dot2tex/issues/94).
-                        "-k" "not test_semicolon")))))))
+      ;; tests: 57 passed, 1 deselected
+      #:test-flags
+      ;; The test_semicolon test fails for unknown reason, see:
+      ;; <https://github.com/kjellmf/dot2tex/issues/94>.
+      #~(list "--deselect=tests/test_dot2tex.py::MultipleStatements::test_semicolon")))
    (native-inputs
     (list python-pytest
+           python-setuptools
           (texlive-local-tree
            (list texlive-pgf
                  texlive-preview
@@ -469,28 +465,35 @@ This approach allows:
 (define-public gprof2dot
  (package
    (name "gprof2dot")
-    (version "2021.02.21")
+    (version "2025.04.14")
    (source
     (origin
       (method git-fetch)
       (uri (git-reference
-             (url "https://github.com/jrfonseca/gprof2dot")
-             (commit version)))
+              (url "https://github.com/jrfonseca/gprof2dot")
+              (commit version)))
       (file-name (git-file-name name version))
       (sha256
-        (base32
-         "1jjhsjf5fdi1fkn7mvhnzkh6cynl8gcjrygd3cya5mmda3akhzic"))))
-    (build-system python-build-system)
+        (base32 "0yil32pbcarwsfmhgn2zhldjj985v9p80f2yi2shkaxzfc4w6zwi"))))
+    (build-system pyproject-build-system)
    (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (replace 'check
-           (lambda* (#:key inputs outputs tests? #:allow-other-keys)
-             (when tests?
-               (add-installed-pythonpath inputs outputs)
-               (invoke "python" "tests/test.py")))))))
+     (list
+      #:test-backend #~'custom
+      #:test-flags
+      #~(list "tests/test.py"
+              "--python=bash"
+              "--max-acceptable=0"
+              (string-append "--gprof2dot=" #$output "/bin/gprof2dot"))
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-before 'check 'pre-tests
+            ;; Prevent irrelevant errors that cause test output mismatches:
+            ;; ‘Fontconfig error: No writable cache directories’
+            (lambda _
+              (setenv "XDG_CACHE_HOME" "/tmp"))))))
    (native-inputs
-     (list graphviz))
+     (list graphviz
+           python-setuptools))
    (home-page "https://github.com/jrfonseca/gprof2dot")
    (synopsis "Generate a dot graph from the output of several profilers")
    (description "This package provides a Python script to convert the output
@@ -1030,7 +1030,7 @@ invocations."))))
 (define-public guile-dsv
  (package
    (name "guile-dsv")
-    (version "0.8.0")
+    (version "0.8.1")
    (source (origin
              (method git-fetch)
              (uri (git-reference
@@ -1039,7 +1039,7 @@ invocations."))))
              (file-name (git-file-name name version))
              (sha256
               (base32
-                "0mc4najwji8144xzhpnrljrmh7m9iiykf3bp3lzksrwqyhz8np2k"))))
+                "0hpdl2x0lp0dqpx23l29a45lvn5c2qpd4bzrl8d46vm4nraqi7aa"))))
    (build-system gnu-build-system)
    (native-inputs (list autoconf
                         automake
@@ -1053,29 +1053,28 @@ invocations."))))
    (inputs (list bash-minimal guile-3.0))
    (propagated-inputs (list guile-lib guile-smc))
    (arguments
-     `(#:modules (((guix build guile-build-system)
-                   #:select (target-guile-effective-version))
-                  ,@%default-gnu-modules)
-       #:imported-modules ((guix build guile-build-system)
-                           ,@%default-gnu-imported-modules)
-       #:phases (modify-phases %standard-phases
-                  (delete 'strip)
-                  (add-after 'install 'wrap-program
-                    (lambda* (#:key inputs outputs #:allow-other-keys)
-                      (let* ((out (assoc-ref outputs "out"))
-                             (bin (string-append out "/bin"))
-                             (guile-lib (assoc-ref inputs "guile-lib"))
-                             (version (target-guile-effective-version))
-                             (scm (string-append "/share/guile/site/" version))
-                             (go (string-append "/lib/guile/" version
-                                                "/site-ccache")))
-                        (wrap-program (string-append bin "/dsv")
-                          `("GUILE_LOAD_PATH" prefix
-                            (,(string-append out scm) ,(string-append
-                                                        guile-lib scm)))
-                          `("GUILE_LOAD_COMPILED_PATH" prefix
-                            (,(string-append out go) ,(string-append guile-lib
-                                                       go))))) #t)))))
+     (list #:modules `(((guix build guile-build-system)
+                        #:select (target-guile-effective-version))
+                       ,@%default-gnu-modules)
+           #:imported-modules `((guix build guile-build-system)
+                                ,@%default-gnu-imported-modules)
+           #:phases #~(modify-phases %standard-phases
+                        (delete 'strip)
+                        (add-after 'install 'wrap-program
+                          (lambda* (#:key inputs #:allow-other-keys)
+                            (let* ((bin (string-append #$output "/bin"))
+                                   (guile-lib (assoc-ref inputs "guile-lib"))
+                                   (version (target-guile-effective-version))
+                                   (scm (string-append "/share/guile/site/" version))
+                                   (go (string-append "/lib/guile/" version
+                                                      "/site-ccache")))
+                              (wrap-program (string-append bin "/dsv")
+                                `("GUILE_LOAD_PATH" prefix
+                                  (,(string-append #$output scm)
+                                   ,(string-append guile-lib scm)))
+                                `("GUILE_LOAD_COMPILED_PATH" prefix
+                                  (,(string-append #$output go)
+                                   ,(string-append guile-lib go))))))))))
    (home-page "https://github.com/artyom-poptsov/guile-dsv")
    (synopsis "DSV module for Guile")
    (description
@@ -88,6 +88,69 @@
    (description "This package provides JSON support for Hare.")
    (license license:mpl2.0)))

+(define-public hare-lex
+  (package
+    (name "hare-lex")
+    (version "0.25.2.3")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://git.sr.ht/~stacyharper/hare-lex")
+              (commit version)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "06jlkb1q8ybr6yx56c6ikxv5ywz44k04dpwxcc796cnpzpkgqlyf"))))
+    (build-system hare-build-system)
+    (supported-systems %hare-supported-systems)
+    (home-page "https://git.sr.ht/~stacyharper/hare-lex")
+    (synopsis "General purpose lexical tokenization machinery for Hare")
+    (description "This module provides a general purpose lexer machine for Hare.")
+    (license license:mpl2.0)))
+
+(define-public hare-irc
+  (package
+    (name "hare-irc")
+    (version "0.25.2.0")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://git.sr.ht/~sircmpwn/hare-irc")
+              (commit version)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "0ani8prdwjsfh8iqn5kfmkiim9ihl8dvbr28g69c037f6gbdb08v"))))
+    (build-system hare-build-system)
+    (supported-systems %hare-supported-systems)
+    (home-page "https://sr.ht/~sircmpwn/hare-irc")
+    (synopsis "IRC client protocol implementation for Hare")
+    (description "This package provides an implementation of the IRC client
+protocol for Hare programs, based on the @url{ircdocs.horse} specifications.")
+    (license license:mpl2.0)))
+
+(define-public hare-scfg
+  (package
+    (name "hare-scfg")
+    (version "0.25.2")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://git.sr.ht/~chrisppy/hare-scfg")
+              (commit version)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "1nj9gqvnvmwh3j39rj1h856p5qzghv5in01rxi4x74mqirl5q2ch"))))
+    (build-system hare-build-system)
+    (supported-systems %hare-supported-systems)
+    (home-page "https://git.sr.ht/~chrisppy/hare-scfg")
+    (synopsis "Hare library for a simple configuration file format")
+    (description "This package provides a Hare library for parsing
+@uref{https://git.sr.ht/~emersion/scfg, scfg}, a simple configuration file
+format with one directive per line.")
+    (license license:mpl2.0)))
+
 (define-public hare-ssh
  (package
    (name "hare-ssh")
@@ -109,6 +172,28 @@
 and agent protocols in pure Hare.")
    (license license:mpl2.0)))

+(define-public hare-template
+  (package
+    (name "hare-template")
+    (version "0.25.2.5")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://git.sr.ht/~stacyharper/hare-template")
+              (commit version)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "0mfg3ijfmii7vag1cgvr0n76hd7cic6vdf37gd05c5ilnb31ial6"))))
+    (build-system hare-build-system)
+    (inputs (list hare-lex))
+    (supported-systems %hare-supported-systems)
+    (home-page "https://git.sr.ht/~stacyharper/hare-template")
+    (synopsis "Templating tool and library for Hare")
+    (description "This package aims to offer a good and simple templating
+system for Hare, using code generation.")
+    (license license:mpl2.0)))
+
 (define-public hare-gi
  (package
    (name "hare-gi")
@@ -221,3 +306,23 @@ language.")
    (description "This package is a set of gtk-layer-shell bindings for the Hare
 language.")
    (license license:mpl2.0)))
+
+(define-public hare-xml
+  (package
+    (name "hare-xml")
+    (version "0.25.2.0")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://git.sr.ht/~sircmpwn/hare-xml")
+              (commit version)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "1h216z59piz1g7a0iiy1qic1wj8lbajw3mw5zw9nid0bz2vx81b0"))))
+    (build-system hare-build-system)
+    (supported-systems %hare-supported-systems)
+    (home-page "https://git.sr.ht/~sircmpwn/hare-xml")
+    (synopsis "XML support for Hare")
+    (description "This package provides XML support for Hare.")
+    (license license:mpl2.0)))
@@ -41,6 +41,7 @@
  #:use-module (guix build-system gnu)
  #:use-module (guix build-system glib-or-gtk)
  #:use-module (guix build-system meson)
+  #:use-module (guix build-system pyproject)
  #:use-module (guix build-system python)
  #:use-module (guix utils)
  #:use-module (gnu packages)
@@ -70,6 +71,7 @@
  #:use-module (gnu packages perl)
  #:use-module (gnu packages pkg-config)
  #:use-module (gnu packages python)
+  #:use-module (gnu packages python-build)
  #:use-module (gnu packages python-check)
  #:use-module (gnu packages python-xyz)
  #:use-module (gnu packages python-web)
@@ -1173,15 +1175,11 @@ and does not rely on an online service.")
             (commit (string-append "v" version))))
       (file-name (git-file-name name version))
       (sha256
-        (base32
-         "0i8vwnikwd1bfpv4xlgzc51gn6s18q58nqhvcdiyjzcmy3z344c2"))))
-    (build-system python-build-system)
-    (arguments
-     `(#:tests? #f)) ; No tests
-    (propagated-inputs
-     (list python-tinycss2 python-pygobject))
-    (native-inputs
-     `(("gettext" ,gettext-minimal)))
+        (base32 "0i8vwnikwd1bfpv4xlgzc51gn6s18q58nqhvcdiyjzcmy3z344c2"))))
+    (build-system pyproject-build-system)
+    (arguments (list #:tests? #f)) ; No tests
+    (propagated-inputs (list python-tinycss2 python-pygobject))
+    (native-inputs (list gettext-minimal python-setuptools))
    (home-page "https://github.com/openSUSE/IBus-Theme-Tools")
    (synopsis "Tool for IBus Themes")
    (description "IBus Theme Tools can extract IBus-specific settings from
@@ -260,6 +260,66 @@ globalisation support for software applications.  This package contains the
 Java part.")
    (license x11)))

+;; GraalVM Truffle 25.0.1 wants ICU4J 76.1, but ICU stopped publishing
+;; source tarballs with build.xml after 73.2. Version 74+ only provides
+;; Maven-based builds or pre-built JARs. Using 73.2 as a compromise.
+(define-public java-icu4j-for-graal-truffle
+  (package
+    (inherit java-icu4j)
+    (name "java-icu4j-for-graal-truffle")
+    (version "73.2")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append
+                    "https://github.com/unicode-org/icu/releases/download/release-"
+                    (string-map (lambda (x) (if (char=? x #\.) #\- x)) version)
+                    "/icu4j-"
+                    (string-map (lambda (x) (if (char=? x #\.) #\_ x)) version)
+                    ".tgz"))
+              (sha256
+               (base32 "0g4sxanzm5s0axjk2lm1w15gr0gx8jasir6rdjn23yx039brchjb"))))
+    (arguments
+     (substitute-keyword-arguments (package-arguments java-icu4j)
+       ((#:phases phases)
+        `(modify-phases ,phases
+           (add-after 'build 'create-sources-jar
+             (lambda _
+               ;; Create a sources JAR from the core source files.
+               ;; mx shading needs .java source files, not .class files.
+               (invoke "jar" "cf" "icu4j-sources.jar"
+                       "-C" "main/classes/core/src" "com")))
+           (replace 'install
+             (lambda* (#:key outputs #:allow-other-keys)
+               (let ((share (string-append (assoc-ref outputs "out")
+                                           "/share/java/")))
+                 (mkdir-p share)
+                 (install-file "icu4j.jar" share)
+                 (install-file "icu4j-sources.jar" share))))))))))
+
+(define-public java-icu4j-charset-for-graal-truffle
+  (package
+    (inherit java-icu4j-for-graal-truffle)
+    (name "java-icu4j-charset-for-graal-truffle")
+    (arguments
+     (substitute-keyword-arguments (package-arguments java-icu4j-for-graal-truffle)
+       ((#:build-target _) "icu4j-charset.jar")
+       ((#:phases phases)
+        `(modify-phases ,phases
+           (replace 'create-sources-jar
+             (lambda _
+               ;; Create a sources JAR from the charset source files.
+               (invoke "jar" "cf" "icu4j-charset-sources.jar"
+                       "-C" "main/classes/charset/src" "com")))
+           (replace 'install
+             (lambda* (#:key outputs #:allow-other-keys)
+               (let ((share (string-append (assoc-ref outputs "out")
+                                           "/share/java/")))
+                 (mkdir-p share)
+                 (install-file "icu4j-charset.jar" share)
+                 (install-file "icu4j-charset-sources.jar" share))))))))
+    (inputs (list java-icu4j-for-graal-truffle))
+    (synopsis "ICU4J charset provider for GraalVM Truffle")))
+
 (define-public icu4c-for-skia
  ;; The current version of skia needs this exact commit
  ;; for its test dependencies.
@@ -856,14 +856,14 @@ due to its architecture which automatically parallelises the image workflows.")
 (define-public gmic
  (package
    (name "gmic")
-    (version "3.5.5")
+    (version "3.6.5")
    (source
     (origin
       (method url-fetch)
       (uri (string-append "https://gmic.eu/files/source/gmic_"
                           version ".tar.gz"))
       (sha256
-        (base32 "1wyzq5g8kfnglb5l8ipzh6lhf4667vmcd88gd9vf55fdnvdrjygp"))))
+        (base32 "16hncbj7isxcw5al3zf62n8iwpsvbnmfclihdbgq4fnwci6yb1q9"))))
    (build-system cmake-build-system)
    (arguments
     (list
@@ -1990,11 +1990,16 @@ segmentation.")
      ;; these tests.
      '(list "--ignore=pims/tests/test_common.py"
             "--ignore=pims/tests/test_imseq.py"
-             "--ignore=pims/tests/test_norpix.py")))
+             "--ignore=pims/tests/test_norpix.py")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'relax-requirements
+            (lambda _
+              (substitute* "setup.py"
+                (("'slicerator>=.*',")
+                 "'slicerator',")))))))
    (native-inputs
-     (list python-pytest
-           python-setuptools
-           python-wheel))
+     (list python-pytest python-setuptools))
    (propagated-inputs
     (list python-imageio python-numpy python-slicerator))
    (home-page "https://github.com/soft-matter/pims")
@@ -1069,7 +1069,7 @@ archives.")
 (define-public nomacs
  (package
    (name "nomacs")
-    (version "3.21.1")
+    (version "3.22.0")
    (source
     (origin
       (method git-fetch)
@@ -1079,7 +1079,7 @@ archives.")
       (file-name (git-file-name name version))
       (sha256
        (base32
-         "1by62r1g1clji7g539zyhm5z7h1ssp8pcb6vrm33p2gvz3vba5j5"))))
+         "1ps68xxdqz9r7w5cpicj461x06w0p6r54x1cbk38idl0vlrq65ya"))))
    (build-system cmake-build-system)
    (arguments
     `(#:build-type "Release" ; fails to build with debug info
@@ -1087,40 +1087,25 @@ archives.")
                               "-DUSE_SYSTEM_QUAZIP=true"
                               "-DENABLE_QUAZIP=true"
                               "-DENABLE_OPENCV=true")
-       #:tests? #f ; no rule for target 'test'
       #:phases
       (modify-phases %standard-phases
-         (add-after 'unpack 'copy-plugins
-           (lambda* (#:key inputs #:allow-other-keys)
-             (copy-recursively (assoc-ref inputs "plugins")
-                               "ImageLounge/plugins")))
-         (add-after 'copy-plugins 'cd-to-source-dir
-           (lambda _ (chdir "ImageLounge") #t)))))
+         (add-after 'unpack 'cd-to-source-dir
+           (lambda _ (chdir "ImageLounge")))
+         (replace 'check
+           (lambda* (#:key tests? #:allow-other-keys)
+             (when tests? (invoke "make" "check")))))))
    (inputs
-     `(("plugins"
-        ,(origin
-           (method git-fetch)
-           (uri (git-reference
-                 ;; The original git repository at
-                 ;; https://github.com/novomesk/nomacs-plugins
-                 ;; is not updated any more, use a maintained fork.
-                 (url "https://github.com/novomesk/nomacs-plugins")
-                 (commit "20101da282f13d3184ece873388e1c234a79b5e7")))
-           (sha256
-            (base32
-             "0nbrsxhggy15idvm5dlhxh2z14gvki7vljxqi90hw98nmbh5ri41"))))
-       ("exiv2" ,exiv2)
-       ("libraw" ,libraw)
-       ("libtiff" ,libtiff)
-       ("opencv" ,opencv)
-       ("quazip" ,quazip)
-       ("qtimageformats" ,qtimageformats)
-       ("qtbase" ,qtbase)
-       ("qt5compat" ,qt5compat)
-       ("qtsvg" ,qtsvg)))
-    (native-inputs
-     `(("pkg-config" ,pkg-config)
-       ("qttools" ,qttools)))
+     (list
+      exiv2
+      libraw
+      libtiff
+      opencv
+      quazip
+      qt5compat
+      qtbase
+      qtimageformats
+      qtsvg))
+    (native-inputs (list googletest pkg-config qttools))
    (synopsis "Image viewer supporting all common formats")
    (description "Nomacs is a simple to use image lounge featuring
 semi-transparent widgets that display additional information such as metadata,
@@ -3,7 +3,7 @@
 ;;; Copyright © 2013, 2015, 2016, 2025 Andreas Enge <andreas@enge.fr>
 ;;; Copyright © 2014, 2015, 2016, 2020 Mark H Weaver <mhw@netris.org>
 ;;; Copyright © 2014, 2015 Alex Kost <alezost@gmail.com>
-;;; Copyright © 2014, 2016, 2017, 2018, 2019 Ricardo Wurmus <rekado@elephly.net>
+;;; Copyright © 2014, 2016, 2017, 2018, 2019, 2025 Ricardo Wurmus <rekado@elephly.net>
 ;;; Copyright © 2015 Taylan Ulrich Bayırlı/Kammer <taylanbayirli@gmail.com>
 ;;; Copyright © 2015 Amirouche Boubekki <amirouche@hypermove.net>
 ;;; Copyright © 2014, 2017 John Darrington <jmd@gnu.org>
@@ -2891,12 +2891,25 @@ GIF, TIFF, WEBP, BMP, PNG, XPM formats.")
       #:modules ((guix build python-build-system)
                  ((guix build glib-or-gtk-build-system) #:prefix glib-or-gtk:)
                  (guix build utils))
+       ;; XXX: Tests are not discovered.
+       #:tests? #false
       #:phases
       (modify-phases %standard-phases
         (add-after 'unpack 'python3.11-compatibility
           (lambda _
             (substitute* "setup.py"
-               (("\"rU\"") "\"r\""))))
+               (("\"rU\"") "\"r\"")
+               (("test_suite='tests'.*") ""))
+             (substitute* "setup.cfg"
+               (("install-") "install_"))
+             ;; This file makes Python confuse it for a module, so we rename
+             ;; it.
+             (rename-file "lib/xml.py" "lib/xmlo.py")
+             (substitute* (find-files "." "\\.py$")
+               (("lib.xml") "lib.xmlo"))
+             ;; This procedure has been removed.
+             (substitute* "lib/gettext_setup.py"
+               (("c = gettext.bind_textdomain_codeset.*") "c = True\n"))))
         (add-after 'install 'glib-or-gtk-wrap
           (assoc-ref glib-or-gtk:%standard-phases 'glib-or-gtk-wrap))
         (add-after 'install 'wrap-program
@@ -2904,6 +2917,10 @@ GIF, TIFF, WEBP, BMP, PNG, XPM formats.")
             (let* ((out (assoc-ref outputs "out"))
                    (gdk-pixbuf (assoc-ref inputs "gdk-pixbuf"))
                    (gtk+ (assoc-ref inputs "gtk+")))
+               ;; This is replaced with an invalid shebang.
+               (substitute* (string-append out "/bin/mypaint")
+                 (("#!python")
+                  (string-append "#!" (which "python3"))))
               (wrap-program (string-append out "/bin/mypaint")
                 `("GI_TYPELIB_PATH" ":" prefix
                   (,(getenv "GI_TYPELIB_PATH")))))))
@@ -640,7 +640,7 @@ highlighted.
       #:phases
       (modify-phases %standard-phases
         (delete 'configure))))         ; No ./configure script
-    (home-page "https://mcpcpc.github.io/kirc/")
+    (home-page "https://kirc.dev/")
    (synopsis "IRC client written in POSIX C99")
    (description "Kirc is an Internet Relay Chat (IRC) client.  It includes
 support for Simple Authentication and Security Layer (SASL), the
@@ -323,6 +323,35 @@ It can be used as a replacement for the Apache @code{CBZip2InputStream} /
 algorithms in Java.")
    (license license:public-domain)))

+(define-public java-xz-for-graal-truffle
+  (package
+    (inherit java-xz)
+    (name "java-xz-for-graal-truffle")
+    (version "1.10")
+    (source (origin
+              (method url-fetch/zipbomb)
+              (uri (string-append "https://tukaani.org/xz/xz-java-" version ".zip"))
+              (sha256
+               (base32 "1rbzbzab8iizic4yqh2ps9hmjxxym7hghc4gkiggscpl8bd54an0"))))
+    (arguments
+     `(#:tests? #f
+       #:jdk ,openjdk
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'build 'create-sources-jar
+           (lambda _
+             ;; Create a sources JAR from the source files.
+             ;; Only include org/tukaani/xz - exclude demo files in root.
+             (invoke "jar" "cf" "build/jar/xz-sources.jar"
+                     "-C" "src" "org")))
+         (replace 'install
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let* ((out (assoc-ref outputs "out"))
+                    (share (string-append out "/share/java")))
+               (mkdir-p share)
+               (install-file "build/jar/xz.jar" share)
+               (install-file "build/jar/xz-sources.jar" share)))))))))
+
 (define-public java-zstd
  (package
    (name "java-zstd")
@@ -338,9 +367,9 @@ algorithms in Java.")
                "0z26z04sc4j6k0g4gvq4xc86mc4wiyp1j7z5hh6wpqgmy9b6h2zb"))))
    (build-system ant-build-system)
    (arguments
-     `(#:jar-name "java-zstd.jar"
+     `(#:jar-name "zstd-jni.jar"
       #:source-dir "src/main/java"
-       #:tests? #f; Require scala
+       #:tests? #f
       #:phases
       (modify-phases %standard-phases
         (add-before 'build 'generate-version
@@ -352,7 +381,21 @@ algorithms in Java.")

 public class ZstdVersion {
  public static final String VERSION = \"~a\";
-}" ,version))))))))
+}" ,version)))))
+         (add-before 'install 'generate-pom
+           (lambda _
+             (with-output-to-file "pom.xml"
+               (lambda _
+                 (format #t "<?xml version=\"1.0\" encoding=\"UTF-8\"?>
+<project>
+  <modelVersion>4.0.0</modelVersion>
+  <groupId>com.github.luben</groupId>
+  <artifactId>zstd-jni</artifactId>
+  <version>~a</version>
+  <packaging>jar</packaging>
+  <name>zstd-jni</name>
+</project>" ,version)))))
+         (replace 'install (install-from-pom "pom.xml")))))
    (inputs
     `(("zstd" ,zstd)))
    (home-page "https://github.com/luben/zstd-jni")
@@ -363,3 +406,47 @@ compression needs.  This package provides JNI bindings for Zstd native
 library that provides fast and high compression lossless algorithm for
 Android, Java and all JVM languages.")
    (license license:bsd-2)))
+
+(define-public java-zstd-1.5.7
+  (package
+    (inherit java-zstd)
+    (version "1.5.7")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                     (url "https://github.com/luben/zstd-jni")
+                     (commit (string-append "v" version "-6"))))
+              (file-name (git-file-name "java-zstd" version))
+              (sha256
+               (base32
+                "014pmfix7rd1p1kmalvxyigqyiii5q3l7qahfnp32pz886pjd41i"))))
+    (arguments
+     `(#:jar-name "zstd-jni.jar"
+       #:source-dir "src/main/java"
+       #:tests? #f
+       #:phases
+       (modify-phases %standard-phases
+         (add-before 'build 'generate-version
+           (lambda _
+             (with-output-to-file
+               "src/main/java/com/github/luben/zstd/util/ZstdVersion.java"
+               (lambda _
+                 (format #t "package com.github.luben.zstd.util;
+
+public class ZstdVersion {
+  public static final String VERSION = \"~a\";
+}" ,version)))))
+         (add-before 'install 'generate-pom
+           (lambda _
+             (with-output-to-file "pom.xml"
+               (lambda _
+                 (format #t "<?xml version=\"1.0\" encoding=\"UTF-8\"?>
+<project>
+  <modelVersion>4.0.0</modelVersion>
+  <groupId>com.github.luben</groupId>
+  <artifactId>zstd-jni</artifactId>
+  <version>~a</version>
+  <packaging>jar</packaging>
+  <name>zstd-jni</name>
+</project>" ,version)))))
+         (replace 'install (install-from-pom "pom.xml")))))))
@@ -336,7 +336,7 @@ secondary errors.")
                (dirname
                 (search-input-file
                  inputs
-                  "/lib/m2/org/apache/commons/commons-lang3/3.12.0/commons-lang3-3.12.0.jar")))
+                  "/lib/m2/org/apache/commons/commons-lang3/3.17.0/commons-lang3-3.17.0.jar")))
               (("\\$\\{apache-commons-text_SOURCE_DIR\\}")
                (dirname
                 (search-input-file
@@ -347,7 +347,7 @@ secondary errors.")
               (("FetchContent_MakeAvailable\\(apache-commons-lang\\)")
                (string-append "set(apache-commons-lang_SOURCE_DIR "
                               (assoc-ref inputs "java-commons-lang3")
-                               "/lib/m2/org/apache/commons/commons-lang3/3.12.0)"))
+                               "/lib/m2/org/apache/commons/commons-lang3/3.17.0)"))
               (("FetchContent_MakeAvailable\\(apache-commons-text\\)")
                (string-append "set(apache-commons-text_SOURCE_DIR "
                               (assoc-ref inputs "java-commons-text")
@@ -870,7 +870,7 @@ noun phrases, verb phrases, etc.).")
 (define-public praat
  (package
    (name "praat")
-    (version "6.4.47")
+    (version "6.4.49")
    (source (origin
              (method git-fetch)
              (uri (git-reference
@@ -879,7 +879,7 @@ noun phrases, verb phrases, etc.).")
              (file-name (git-file-name name version))
              (sha256
               (base32
-                "0iyzdmgb56w80lgd4kb1cw9a0skxfbwj00q25idz7mkjij522fhi"))))
+                "1h49ffxjrc3pxamm0b77n6jirl5pp9xm09fvb16mx1qwr0cnzi2q"))))
    (build-system gnu-build-system)
    (arguments
     (list #:make-flags #~(list (string-append "CC="
@@ -4,6 +4,7 @@
 ;;; Copyright © 2020 Tobias Geerinckx-Rice <me@tobias.gr>
 ;;; Copyright © 2022 Pradana Aumars <paumars@courrier.dev>
 ;;; Copyright © 2023 Zhu Zihao <all_but_last@163.com>
+;;; Copyright © 2025 Luca Di Sera <disera.luca@gmail.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -139,6 +140,9 @@ interactive and automated theorem proving.")
              (substitute* "src/lean.mk.in"
               (("SHELL = /usr/bin/env bash")
                "SHELL = bash"))
+              (substitute* "src/stdlib.make.in"
+               (("/usr/bin/env bash")
+                "bash"))
              (setenv "SHELL" "bash -euo pipefail")))
          (replace 'check
            (lambda* (#:key tests? parallel-tests? #:allow-other-keys)
@@ -48,7 +48,8 @@
  #:use-module ((guix build-system python) #:select (pypi-uri
                                                     package-with-python2
                                                     python-build-system))
-  #:use-module (guix build-system ruby))
+  #:use-module (guix build-system ruby)
+  #:use-module (guix build-system trivial))

 (define-public libffi
  (package
@@ -88,6 +89,21 @@ conversions for values passed between the two languages.")
    ;; See <https://github.com/atgreen/libffi/blob/master/LICENSE>.
    (license expat)))

+(define-public libffi-for-graal-truffle
+  (package
+    (inherit libffi)
+    (name "libffi-for-graal-truffle")
+    (version "3.4.8")
+    (source (origin
+              (method url-fetch)
+              (uri
+               (string-append "https://github.com/libffi/libffi/releases"
+                              "/download/v" version "/libffi-" version ".tar.gz"))
+              (file-name "libffi-src.tar.gz")
+              (sha256
+               (base32
+                "16qias9rs3g3lg3zs9zx76hqzry7pkzc8lhjxnqargwqi2hl565w"))))))
+
 ;; Provide a variant without static trampolines as some packages
 ;; (particularly GHC < 9) cannot handle them.  See
 ;; <https://github.com/libffi/libffi/pull/647> for a discussion.
@@ -92,6 +92,20 @@
 devices on various operating systems.")
    (license license:lgpl2.1+)))

+(define-public libusb-next
+  (package
+    (inherit libusb)
+    (name "libusb-next")
+    (version "1.0.29")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append "https://github.com/libusb/libusb/"
+                           "releases/download/v" version
+                           "/libusb-" version ".tar.bz2"))
+       (sha256
+        (base32 "118alz1rzqp6qaq486wn5hygs27qnc38rm4vxb69a4wd1yazqxsr"))))))
+
 (define-public libusb-compat
  (package
    (name "libusb-compat")
@@ -2966,39 +2966,33 @@ at login.  Local and dynamic reconfiguration are its key features.")
    (name "python-pamela")
    (version "1.0.0")
    (source
-      (origin
-        ;; Tests not distributed in pypi release.
-        (method git-fetch)
-        (uri (git-reference
-               (url "https://github.com/minrk/pamela")
-               (commit version)))
-        (file-name (git-file-name name version))
-        (sha256
-         (base32
-          "0cg3w6np1fbjpvzhv54xg567hpf38szwp2d4gvzb9r736nxbv0vr"))))
-    (build-system python-build-system)
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/minrk/pamela")
+             (commit version)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "0cg3w6np1fbjpvzhv54xg567hpf38szwp2d4gvzb9r736nxbv0vr"))))
+    (build-system pyproject-build-system)
    (arguments
-     '(#:tests? #f ; Test suite isn't designed to be run inside a container.
-       #:phases
-       (modify-phases %standard-phases
-         (add-after 'unpack 'hardcode-pam.so
-           (lambda* (#:key inputs #:allow-other-keys)
-             (let ((pam (assoc-ref inputs "linux-pam")))
-               (substitute* "pamela.py"
-                 (("find_library\\(\"pam\")")
-                  (string-append "'" pam "/lib/libpam.so'")))
-               #t)))
-         (replace 'check
-           (lambda* (#:key tests? #:allow-other-keys)
-             (if tests?
-               (if (file-exists? "test_pamela.py")
-                 (invoke "py.test" "--assert=plain" "test_pamela.py")
-                 (invoke "python" "-m" "pamela" "-a" "`whoami`"))
-               #t))))))
-    (inputs
-     (list linux-pam))
-    (native-inputs
-     (list python-pytest))
+     (list
+      #:tests? #f ;Test suite isn't designed to be run inside a container.
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'hardcode-pam.so
+            (lambda* (#:key inputs #:allow-other-keys)
+              (substitute* "pamela.py"
+                (("find_library\\(\"pam\")")
+                 (format #f "~s"
+                         (search-input-file inputs "lib/libpam.so"))))))
+          (replace 'check
+            (lambda* (#:key tests? #:allow-other-keys)
+              (when (and tests? (file-exists? "test_pamela.py"))
+                (invoke "pytest" "--assert=plain" "test_pamela.py")
+                (invoke "python" "-m" "pamela" "-a" "`whoami`")))))))
+    (inputs (list linux-pam))
+    (native-inputs (list python-pytest python-setuptools))
    (home-page "https://github.com/minrk/pamela")
    (synopsis "PAM interface using ctypes")
    (description "This package provides a PAM interface using @code{ctypes}.")
@@ -4862,20 +4856,20 @@ the command line or a script.")
         (file-name (git-file-name name version))
         (sha256
          (base32 "00h5p8fk1zi237q8mqds8apqbis9iw0yih1hl0pr63dsnyzmmrpw"))))
-      (build-system python-build-system)
+      (build-system pyproject-build-system)
      (arguments
-       '(#:phases
-         (modify-phases %standard-phases
-           (add-after 'unpack 'fix-build-with-python3
-             (lambda _
-               (substitute* "setup.py"
-                 (("itervalues") "values")))))
-         ;; There are currently no checks in the package.
-         #:tests? #f))
-      (native-inputs (list python))
+       (list
+        #:tests? #f  ; No tests.
+        #:phases
+        #~(modify-phases %standard-phases
+            (add-after 'unpack 'fix-build-with-python3
+              (lambda _
+                (substitute* "setup.py"
+                  (("itervalues")
+                   "values")))))))
+      (native-inputs (list python python-setuptools))
      (home-page "http://guichaz.free.fr/iotop/")
-      (synopsis
-       "Displays the IO activity of running processes")
+      (synopsis "Displays the IO activity of running processes")
      (description
       "Iotop is a Python program with a top like user interface to show the
 processes currently causing I/O.")
@@ -48,6 +48,7 @@
 ;;; Copyright © 2025 Junker <dk@junkeria.club>
 ;;; Copyright © 2025 Simen Endsjø <contact@simendsjo.me>
 ;;; Copyright © 2025 Ashish SHUKLA <ashish.is@lostca.se>
+;;; Copyright © 2025 vga <v@vgz.li>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -6317,6 +6318,55 @@ Macros and symbol-macros are fully expanded and all special forms, except
       ;; See <https://github.com/alex-gutev/cl-form-types/issues/22>.
       '(#:tests? #f)))))

+(define-public sbcl-cl-forms
+  (let ((commit "680953089c4a4d6201e639ac8188c46656d3f693")
+        (revision "0"))
+    (package
+      (name "sbcl-cl-forms")
+      (version (git-version "0.0.0" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url "https://github.com/mmontone/cl-forms")
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "19bmcvg89ydgkz1rjds0q0ydrpj4dxcvgnqgjjkbsi1h8yw18fsj"))))
+      (build-system asdf-build-system/sbcl)
+      (native-inputs (list sbcl-fiveam sbcl-trivial-open-browser))
+      (inputs (list sbcl-alexandria
+                    sbcl-cl-ppcre
+                    sbcl-ironclad
+                    sbcl-uuid
+                    sbcl-clavier
+                    sbcl-fmt
+                    sbcl-cl-str
+                    sbcl-cl-base64
+                    sbcl-cl-css
+                    sbcl-cl-who
+                    sbcl-djula
+                    sbcl-hunchentoot
+                    sbcl-lack
+                    sbcl-ningle
+                    sbcl-cl-peppol))
+      (arguments
+       '(#:asd-systems '("cl-forms" "cl-forms.core" "cl-forms.who"
+                         "cl-forms.djula" "cl-forms.ningle" "cl-forms.peppol")))
+      (home-page "https://github.com/mmontone/cl-forms")
+      (synopsis "Web forms handling library for Common Lisp")
+      (description
+       "@code{cl-forms} provides functionality for managing web forms in
+Common Lisp.
+
+It supports various field types (string, boolean, integer, email,
+password, and more) and allows rendering through multiple backends,
+such as @code{cl-who} and @code{djula}.")
+      (license license:expat))))
+
+(define-public cl-forms
+  (sbcl-package->cl-source-package sbcl-cl-forms))
+
 (define-public sbcl-cl-freetype2
  (let ((commit "8bcb232b319a66fb700eaea88d0b308a837bce04")
        (revision "1"))
@@ -9133,6 +9183,39 @@ files.")
 (define-public ecl-cl-pdf
  (sbcl-package->ecl-package sbcl-cl-pdf))

+(define-public sbcl-cl-peppol
+  (let ((commit "d1c9571e58240022929226481526cc268a6c6ac7")
+        (revision "0"))
+    (package
+      (name "sbcl-cl-peppol")
+      (version (git-version "0.0.1" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url "https://github.com/mmontone/cl-peppol")
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "076wvjc666v76k3z62h1360qhh3hw4xkrvzhfdz6anvq9vl13klm"))))
+      (build-system asdf-build-system/sbcl)
+      (inputs (list sbcl-cxml sbcl-xpath))
+      (arguments
+       '(#:asd-systems '("peppol")))
+      (home-page "https://github.com/mmontone/cl-peppol")
+      (synopsis "OpenPEPPOL electronic invoicing code lists for Common Lisp")
+      (description
+       "@code{cl-peppol} provides access to code lists extracted from the OpenPEPPOL
+standard for electronic business and invoicing in Europe.")
+      (license license:expat))))
+
+;; No ECL variant: tests fail because xpath returns 11 instead of the
+;; expected 11.0d0. Possible incompatibility in numeric type handling.
+;; This problem also affects dependent packages.
+
+(define-public cl-peppol
+  (sbcl-package->cl-source-package sbcl-cl-peppol))
+
 (define-public sbcl-cl-permutation
  (let ((commit "20c10e9ca56452d2fafc3ec0984dcdf78b4f4b19")
        (revision "0"))
@@ -17171,6 +17254,40 @@ Lisp.")
 (define-public ecl-flute
  (sbcl-package->ecl-package sbcl-flute))

+(define-public sbcl-fmt
+  (let ((commit "91a29ec31e317bd6bd67d693acebc1d50bf0ac5e")
+        (revision "0"))
+    (package
+      (name "sbcl-fmt")
+      (version (git-version "0.0.0" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+               (url "https://github.com/mmontone/fmt")
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "078y5yig5fw0jcsjjabaq7dlyxsd10w5k80ywx6gbm0j88al3fzp"))))
+      (build-system asdf-build-system/sbcl)
+      (native-inputs (list sbcl-fiveam sbcl-local-time))
+      (inputs (list sbcl-alexandria))
+      (home-page "https://github.com/mmontone/fmt")
+      (synopsis "Extensible text formatting facility for Common Lisp using
+s-expressions")
+      (description
+       "@code{fmt} provides an alternative to the Common Lisp @code{format}
+function by utilizing s-expressions for formatting directives instead
+of control strings.")
+      (license license:expat))))
+
+(define-public cl-fmt
+  (sbcl-package->cl-source-package sbcl-fmt))
+
+;; TODO: Not reproducible.
+;; (define-public ecl-fmt
+;;   (sbcl-package->ecl-package sbcl-fmt))
+
 (define-public sbcl-fn
  (let ((commit "8d8587d03a7b5e26b306fc90018e385d9e5acc2c")
        (revision "1"))
@@ -595,7 +595,7 @@ output), and Binutils.")
    ("18.1.8" . "1l9wm0g9jrpdf309kxjx7xrzf13h81kz8bbp0md14nrz38qll9la")
    ("19.1.7" . "18hkfhsm88bh3vnj21q7f118vrcnf7z6q1ylnwbknyb3yvk0343i")
    ("20.1.8" . "0v0lwf58i96vcwsql3hlgy72z3ncfvqwgyghyn26m2ri8vy83k6a")
-    ("21.1.5" . "0fwfs8gd5c5r5kw6dkpc4817ihd6r8h3qsyl2c9ffyc9hiqlmrnw")))
+    ("21.1.8" . "0v99a90546lrd3cxgam32c0jcnwzi0ljk0ihdvd9xghzss1pq1x6")))

 (define %llvm-patches
  '(("14.0.6" . ("clang-14.0-libc-search-path.patch"
@@ -613,7 +613,7 @@ output), and Binutils.")
                 "clang-17.0-link-dsymutil-latomic.patch"))
    ("20.1.8" . ("clang-18.0-libc-search-path.patch"
                 "clang-17.0-link-dsymutil-latomic.patch"))
-    ("21.1.5" . ("clang-18.0-libc-search-path.patch"
+    ("21.1.8" . ("clang-18.0-libc-search-path.patch"
                 "clang-17.0-link-dsymutil-latomic.patch"))))

 (define (llvm-monorepo version)
@@ -1240,7 +1240,7 @@ Library.")
  (make-clang-toolchain clang-20 libomp-20))

 (define-public llvm-21
-  (make-llvm "21.1.5"))
+  (make-llvm "21.1.8"))

 (define-public clang-runtime-21
  (clang-runtime-from-llvm llvm-21))
@@ -1255,7 +1255,7 @@ Library.")
                    (package-version llvm-21)))
     (sha256
      (base32
-       "057k2707v4cin44b422r9gi12m41yh4ymqi3vakxx9d08d8q8lqm")))))
+       "0ac8qb3ajxh9xnlyk71ar599qvbbf0y8lbif2chvi6ph3drpxnvd")))))

 (define-public libomp-21
  (package
@@ -931,7 +931,7 @@ on numbers.")
 (define-public lutok
  (package
    (name "lutok")
-    (version "0.4")
+    (version "0.6.2")
    (source (origin
              (method git-fetch)
              (uri (git-reference
@@ -940,13 +940,13 @@ on numbers.")
              (file-name (git-file-name name version))
              (sha256
               (base32
-                "0a2vc2wy5hasw69h1mz768ywx6c4ccl9jzzd4ixddwba3z3ha03b"))))
+                "1hk8shp1vkxa09qxaafcfrgc9098cr75n5zc192bv8yjyvz0hvc3"))))
    (build-system gnu-build-system)
    ;; Disable the test suite to avoid a circular dependency on kyua.
    (arguments (list #:tests? #f))
    (native-inputs (list autoconf automake libtool pkg-config))
    (inputs (list atf))
-    (propagated-inputs (list lua-5.2))  ;included in c_gate.hpp
+    (propagated-inputs (list lua-5.4))  ;included in c_gate.hpp
    (home-page "https://github.com/freebsd/lutok")
    (synopsis "Lightweight C++ API for Lua")
    (description "Lutok is a lightweight C++ API library for Lua.
@@ -2543,20 +2543,17 @@ data by providing clean labels during training.")
 (define-public python-cma
  (package
    (name "python-cma")
-    (version "4.2.0")
+    (version "4.4.1")
    (source (origin
              (method url-fetch)
              (uri (pypi-uri "cma" version))
              (sha256
               (base32
-                "17wv4r80av3cpr3dqad7jf7bwnjahk4bgagqlkqxjp8zfmg60s0q"))))
+                "1n17shbcmy7h7k105ar9yhj2zmgykx1wv9fhwd5kbwrcypa221mz"))))
    (build-system pyproject-build-system)
    (arguments
-     (list #:phases #~(modify-phases %standard-phases
-                        (replace 'check
-                          (lambda* (#:key tests? #:allow-other-keys)
-                            (when tests?
-                              (invoke "python" "-m" "cma.test")))))))
+     (list #:test-backend #~'custom
+           #:test-flags #~'("cma/test.py")))
    (native-inputs (list python-pytest python-setuptools))
    (propagated-inputs (list python-numpy))
    (home-page "https://github.com/CMA-ES/pycma")
@@ -3740,31 +3737,6 @@ in a fast and accurate way.")
     (list python-numpy python-scipy))
    (synopsis "Python interface for the XGBoost library")))

-(define-public python-iml
-  (package
-    (name "python-iml")
-    (version "0.6.2")
-    (source
-     (origin
-       (method url-fetch)
-       (uri (pypi-uri "iml" version))
-       (sha256
-        (base32
-         "1k8szlpm19rcwcxdny9qdm3gmaqq8akb4xlvrzyz8c2d679aak6l"))))
-    (build-system pyproject-build-system)
-    (propagated-inputs
-     (list python-ipython python-numpy python-pandas python-scipy))
-    (native-inputs
-     (list python-nose python-setuptools))
-    (home-page "https://github.com/interpretable-ml/iml")
-    (synopsis "Interpretable Machine Learning (iML) package")
-    (description "Interpretable ML (iML) is a set of data type objects,
-visualizations, and interfaces that can be used by any method designed to
-explain the predictions of machine learning models (or really the output of
-any function).  It currently contains the interface and IO code from the Shap
-project, and it will potentially also do the same for the Lime project.")
-    (license license:expat)))
-
 (define-public gloo
  (let ((version "0.0.0")                         ; no proper version tag
        (commit "54cbae0d3a67fa890b4c3d9ee162b7860315e341")
@@ -326,14 +326,14 @@ completely independent from the extension API.")
 (define-public mailutils
  (package
    (name "mailutils")
-    (version "3.20")
+    (version "3.21")
    (source (origin
             (method url-fetch)
             (uri (string-append "mirror://gnu/mailutils/mailutils-"
                                 version ".tar.xz"))
             (sha256
              (base32
-               "0ag8d9fafzyjk53iyknzvb82risv1jf4wgnann5ii9fx3smzmwx8"))
+               "1sgmgslmifs8kpi4y2gjw4c7z0xfhhxdnxxwzmsnd3cvd7f1wz74"))
             (patches
              (search-patches "mailutils-variable-lookup.patch"))))
    (build-system gnu-build-system)
@@ -545,7 +545,7 @@ with a @code{ncurses} user interface similar to @code{alpine} and
 (define-public goimapnotify
  (package
    (name "goimapnotify")
-    (version "2.5.3")
+    (version "2.5.4")
    (source
     (origin
       (method git-fetch)
@@ -554,7 +554,7 @@ with a @code{ncurses} user interface similar to @code{alpine} and
             (commit version)))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "0k8yqq2fl2z8jv6nh7b826z9j4493x6ifaw8ybjp7ipz9rg9y3dh"))))
+        (base32 "0jsy172spckdma6p480g2r9nm7z36v5qkmd4919f06yx0nk1w6za"))))
    (build-system go-build-system)
    (arguments
     (list
@@ -1341,86 +1341,67 @@ security functionality including PGP, S/MIME, SSH, and SSL.")
      (license license:bsd-3))))

 (define-public mu
-  ;; this commit fixes nondeterministic test failing the build
-  ;; revert back to a tagged release next time
-  ;; <https://github.com/djcb/mu/commit/46f91ab7b7641caac992a41264ac41a76c001c87>
-  (let ((commit "46f91ab7b7641caac992a41264ac41a76c001c87")
-        (revision "1"))
-    (package
-      (name "mu")
-      (version (git-version "1.12.13" revision commit))
-      (source
-       (origin
-         (method git-fetch)
-         (uri (git-reference
-                (url "https://github.com/djcb/mu")
-                (commit commit)))
-         (file-name (git-file-name name version))
-         (sha256
-          (base32 "1dbadvpl0fwy975f4i58rq7n85gfjhv92lcdmkv1w3h1mjn2v0sd"))))
-      (build-system meson-build-system)
-      (native-inputs
-       (list pkg-config
-             emacs-minimal
-             gnupg                      ; for tests
-             tzdata-for-tests           ; for tests
-             texinfo))
-      (inputs
-       (list glib gmime guile-3.0 xapian readline python))
-      (arguments
-       (list
-        #:modules '((guix build meson-build-system)
-                    (guix build emacs-utils)
-                    ((guix build guile-build-system)
-                     #:select (target-guile-effective-version))
-                    (guix build utils))
-        #:imported-modules `(,@%meson-build-system-modules
-                             (guix build guile-build-system)
-                             (guix build emacs-utils))
-        #:configure-flags
-        #~(list (format #f "-Dguile-extension-dir=~a/lib" #$output))
-        #:phases
-        #~(modify-phases %standard-phases
-            ;; This phase can be removed in the next major release of mu.
-            ;; <https://github.com/djcb/mu/commit/f237a2b9905475fb95da6a04e318d10cab61ddeb>
-            ;; <https://github.com/djcb/mu/commit/fc4d5b01a703e8c8cc390cfea135f08d3b45ccab>
-            (add-after 'unpack 'patch-bin-references
-              (lambda _
-                (substitute* '("guile/tests/test-mu-guile.cc"
-                               "mu/tests/test-mu-query.cc")
-                  (("/bin/sh") (which "sh")))
-                (substitute* '("lib/tests/bench-indexer.cc"
-                               "lib/utils/mu-utils-file.cc"
-                               "lib/utils/mu-test-utils.cc")
-                  (("/bin/rm") (which "rm")))
-                (substitute* '("lib/mu-maildir.cc")
-                  (("/bin/mv") (which "mv")))))
-            (add-after 'install 'fix-ffi
-              (lambda _
-                (substitute* (find-files #$output "mu\\.scm")
-                  (("\"libguile-mu\"")
-                   (format #f "\"~a/lib/libguile-mu\"" #$output)))))
-            (add-after 'install 'install-emacs-autoloads
-              (lambda _
-                (emacs-generate-autoloads
-                 "mu4e"
-                 (string-append #$output
-                                "/share/emacs/site-lisp/mu4e"))))
-            (add-after 'install 'wrap-executable
-              (lambda _
-                (let* ((bin (string-append #$output "/bin"))
-                       (version (target-guile-effective-version))
-                       (scm (string-append #$output "/share/guile/site/" version)))
-                  (wrap-program (string-append bin "/mu")
-                    `("GUILE_LOAD_PATH" ":" prefix (,scm)))))))))
-      (home-page "https://www.djcbsoftware.nl/code/mu/")
-      (synopsis "Quickly find emails")
-      (description
-       "Mu is a tool for dealing with e-mail messages stored in the
+  (package
+    (name "mu")
+    (version "1.12.14")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://github.com/djcb/mu")
+              (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "188l9h2smmq6x16l9kjbjk4rbyxgz552kiwr3j1y981cl0nndli2"))))
+    (build-system meson-build-system)
+    (native-inputs
+     (list pkg-config
+           emacs                      ; TODO: use emacs-minimal next release
+           gnupg                      ; for tests
+           tzdata-for-tests           ; for tests
+           texinfo))
+    (inputs
+     (list glib gmime guile-3.0 xapian readline python))
+    (arguments
+     (list
+      #:modules '((guix build meson-build-system)
+                  (guix build emacs-utils)
+                  ((guix build guile-build-system)
+                   #:select (target-guile-effective-version))
+                  (guix build utils))
+      #:imported-modules `(,@%meson-build-system-modules
+                           (guix build guile-build-system)
+                           (guix build emacs-utils))
+      #:configure-flags
+      #~(list (format #f "-Dguile-extension-dir=~a/lib" #$output))
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'install 'fix-ffi
+            (lambda _
+              (substitute* (find-files #$output "mu\\.scm")
+                (("\"libguile-mu\"")
+                 (format #f "\"~a/lib/libguile-mu\"" #$output)))))
+          (add-after 'install 'install-emacs-autoloads
+            (lambda _
+              (emacs-generate-autoloads
+               "mu4e"
+               (string-append #$output
+                              "/share/emacs/site-lisp/mu4e"))))
+          (add-after 'install 'wrap-executable
+            (lambda _
+              (let* ((bin (string-append #$output "/bin"))
+                     (version (target-guile-effective-version))
+                     (scm (string-append #$output "/share/guile/site/" version)))
+                (wrap-program (string-append bin "/mu")
+                  `("GUILE_LOAD_PATH" ":" prefix (,scm)))))))))
+    (home-page "https://www.djcbsoftware.nl/code/mu/")
+    (synopsis "Quickly find emails")
+    (description
+     "Mu is a tool for dealing with e-mail messages stored in the
 Maildir format.  Mu's purpose in life is to help you to quickly find the
 messages you need; in addition, it allows you to view messages, extract
 attachments, create new maildirs, and so on.")
-      (license license:gpl3+))))
+    (license license:gpl3+)))

 (define-public alot
  (package
@@ -3680,24 +3661,20 @@ filtering, digest delivery, and more.")
 (define-public python-mailmanclient
  (package
    (name "python-mailmanclient")
-    (version "3.3.3")
+    (version "3.3.5")
    (source
     (origin
       (method url-fetch)
       (uri (pypi-uri "mailmanclient" version))
       (sha256
-        (base32
-         "0ppqnv84v7npgjykhqdy5c38vanz4l0qw871kpsl27z4fm365zlj"))))
-    (build-system python-build-system)
+        (base32 "0myq9mjsqpmhzb378rgnfvmmhjbal36al5cw90hw1sm79ih1qn33"))))
+    (build-system pyproject-build-system)
    (arguments
     `(#:tests? #f)) ; Requires mailman running
+    (native-inputs
+     (list python-setuptools))
    (propagated-inputs
     (list python-requests))
-    ;(native-inputs
-    ; `(("mailman" ,mailman)
-    ;   ("python-falcon" ,python-falcon)
-    ;   ("python-pytest" ,python-pytest)
-    ;   ("python-pytest-services" ,python-pytest-services)))
    (home-page "https://www.list.org/")
    (synopsis "Python bindings for the Mailman 3 REST API")
    (description
@@ -3705,7 +3682,6 @@ filtering, digest delivery, and more.")
 the GNU Mailman 3 REST API.")
    (license license:lgpl3+)))

-
 (define-public mlmmj
  (package
    (name "mlmmj")
@@ -4636,14 +4612,13 @@ IMAP, Atom feeds or HTML archives.")
        (sha256
         (base32
          "1dr5zpqnb54h4f5ax8334l1dcp8j9083d7v4vdi1xqkwmnavklck"))))
-    (build-system python-build-system)
+    (build-system pyproject-build-system)
    (arguments
-     '(#:phases
-       (modify-phases %standard-phases
-         (replace 'check
+     (list #:test-backend #~'custom
           ;; Run doctests as described in the README.
-           (lambda _
-             (invoke "python" "-m" "authres" "-v"))))))
+           #:test-flags #~(list "-m" "authres" "-v")))
+    (native-inputs
+     (list python-setuptools))
    (home-page "https://launchpad.net/authentication-results-python")
    (synopsis "Authentication-Results email header creator and parser")
    (description
@@ -972,7 +972,7 @@ hypertext navigation, and table-of-contents bookmarks.")
           startup-notification))
    (native-search-paths
     (list (search-path-specification
-             (variable "CAJA_EXTENSIONDIR")
+             (variable "CAJA_EXTENSION_DIRS")
             (files (list "lib/caja/extensions-2.0/**")))))
    (home-page "https://mate-desktop.org/")
    (synopsis "File manager for the MATE desktop")
@@ -2099,13 +2099,13 @@ extremely large and complex data collections.")
            (lambda* (#:key inputs #:allow-other-keys)
              (let ((simple
                     (search-input-file
-                      inputs "/lib/m2/org/slf4j/slf4j-simple/1.7.25/slf4j-simple-1.7.25.jar"))
+                      inputs "/lib/m2/org/slf4j/slf4j-simple/1.7.36/slf4j-simple-1.7.36.jar"))
                    (api
                     (search-input-file
-                      inputs "/lib/m2/org/slf4j/slf4j-api/1.7.25/slf4j-api-1.7.25.jar"))
+                      inputs "/lib/m2/org/slf4j/slf4j-api/1.7.36/slf4j-api-1.7.36.jar"))
                    (nop
                     (search-input-file
-                      inputs "/lib/m2/org/slf4j/slf4j-nop/1.7.25/slf4j-nop-1.7.25.jar"))
+                      inputs "/lib/m2/org/slf4j/slf4j-nop/1.7.36/slf4j-nop-1.7.36.jar"))
                    (junit
                     (search-input-file
                      inputs "/lib/m2/junit/junit/4.12/junit-4.12.jar"))
@@ -3840,13 +3840,13 @@ ASCII text files using Gmsh's own scripting language.")
 (define-public veusz
  (package
    (name "veusz")
-    (version "4.1")
+    (version "4.2")
    (source
     (origin
       (method url-fetch)
       (uri (pypi-uri "veusz" version))
       (sha256
-        (base32 "0idg249sg367rxp69nwpsib5dwb0bbznb8hak004573ygc7dmd5k"))))
+        (base32 "1vc5zmjzhjkmfy2417xs8h1bix8xyd0gvikskp3k3qgf9wz22a4g"))))
    (build-system pyproject-build-system)
    (arguments
     (list
@@ -4417,33 +4417,29 @@ self-contained C-extension for Python.")
  (package
    (name "python-cvxopt")
    (version "1.3.2")
-    (source (origin
-              (method git-fetch)
-              (uri (git-reference
-                    (url "https://github.com/cvxopt/cvxopt")
-                    (commit version)))
-              (file-name (git-file-name name version))
-              (sha256
-               (base32
-                "0vdfag3rr906w0gk7vxm2yxfy8y92i4wmqxi82cbykpfp5r82i36"))))
-    (build-system python-build-system)
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/cvxopt/cvxopt")
+             (commit version)))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "0vdfag3rr906w0gk7vxm2yxfy8y92i4wmqxi82cbykpfp5r82i36"))))
+    (build-system pyproject-build-system)
    (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (add-after 'unpack 'find-libraries
-           (lambda* (#:key inputs #:allow-other-keys)
-             (setenv "CVXOPT_BLAS_LIB" "openblas")
-             (setenv "CVXOPT_LAPACK_LIB" "openblas")
-             (setenv "CVXOPT_BUILD_FFTW" "1")
-             (setenv "CVXOPT_BUILD_GLPK" "1")
-             (setenv "CVXOPT_BUILD_GSL" "1")
-             #t)))))
-    (inputs
-     (list fftw
-           glpk
-           gsl
-           openblas
-           suitesparse))
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'find-libraries
+            (lambda* (#:key inputs #:allow-other-keys)
+              (setenv "CVXOPT_BLAS_LIB" "openblas")
+              (setenv "CVXOPT_LAPACK_LIB" "openblas")
+              (setenv "CVXOPT_BUILD_FFTW" "1")
+              (setenv "CVXOPT_BUILD_GLPK" "1")
+              (setenv "CVXOPT_BUILD_GSL" "1"))))))
+    (native-inputs (list python-pytest python-setuptools))
+    (inputs (list fftw glpk gsl openblas suitesparse))
    (home-page "https://www.cvxopt.org")
    (synopsis "Python library for convex optimization")
    (description
@@ -4667,28 +4663,27 @@ can return results in exact arithmetic.")
    (name "python-petsc4py")
    (version "3.24.0")
    (source
-      (origin
-        (method url-fetch)
-        (uri (pypi-uri "petsc4py" version))
-        (sha256
-          (base32
-           "06wi2r43drlfj3hml5392pckn2n99rjfb1p1hz75n3d84z5jrj9x"))))
-    (build-system python-build-system)
+     (origin
+       (method url-fetch)
+       (uri (pypi-uri "petsc4py" version))
+       (sha256
+        (base32 "06wi2r43drlfj3hml5392pckn2n99rjfb1p1hz75n3d84z5jrj9x"))))
+    (build-system pyproject-build-system)
    (arguments
-     (list #:phases
-           #~(modify-phases %standard-phases
-               (add-before 'build 'set-PETSC_DIR
-                 (lambda* (#:key inputs #:allow-other-keys)
-                   ;; Define path to PETSc installation.
-                   (setenv "PETSC_DIR"
-                           (assoc-ref inputs "petsc-openmpi"))))
-               (add-before 'check 'mpi-setup
-                 #$%openmpi-setup)
-               (replace 'check
-                 (lambda* (#:key tests? #:allow-other-keys)
-                   (when tests?
-                     (invoke "python" "test/runtests.py")))))))
-    (native-inputs (list python-cython))
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-before 'build 'set-PETSC_DIR
+            (lambda* (#:key inputs #:allow-other-keys)
+              ;; Define path to PETSc installation.
+              (setenv "PETSC_DIR"
+                      (assoc-ref inputs "petsc-openmpi"))))
+          (add-before 'check 'mpi-setup #$%openmpi-setup)
+          (replace 'check
+            (lambda* (#:key tests? #:allow-other-keys)
+              (when tests?
+                (invoke "python" "test/runtests.py")))))))
+    (native-inputs (list python-cython python-setuptools))
    (inputs (list petsc-openmpi python-numpy))
    (home-page "https://bitbucket.org/petsc/petsc4py/")
    (synopsis "Python bindings for PETSc")
@@ -4963,37 +4958,39 @@ arising after the discretization of partial differential equations.")
    (name "python-slepc4py")
    (version "3.24.0")
    (source
-      (origin
-        (method url-fetch)
-        (uri (pypi-uri "slepc4py" version))
-        (sha256
-          (base32
-            "1wiqcwgr9mq81dd68glsnwn57gqmgahcvcchqqqq3ns7bykvdjah"))))
-    (build-system python-build-system)
+     (origin
+       (method url-fetch)
+       (uri (pypi-uri "slepc4py" version))
+       (sha256
+        (base32 "1wiqcwgr9mq81dd68glsnwn57gqmgahcvcchqqqq3ns7bykvdjah"))))
+    (build-system pyproject-build-system)
    (arguments
-     (list #:phases
-           #~(modify-phases %standard-phases
-               (add-before 'build 'pre-build
-                 (lambda* (#:key inputs #:allow-other-keys)
-                   ;; Define path to PETSc installation.
-                   (setenv "PETSC_DIR" (assoc-ref inputs "petsc-openmpi"))
-                   ;; Define path to SLEPc installation.
-                   (setenv "SLEPC_DIR" (assoc-ref inputs "slepc-openmpi"))))
-               (add-before 'check 'mpi-setup
-                 #$%openmpi-setup)
-               (replace 'check
-                 (lambda* (#:key tests? #:allow-other-keys)
-                   (when tests?
-                     (invoke "python" "test/runtests.py")))))))
-    (native-inputs (list python-cython))
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-before 'build 'pre-build
+            (lambda* (#:key inputs #:allow-other-keys)
+              ;; Define path to PETSc installation.
+              (setenv "PETSC_DIR"
+                      (assoc-ref inputs "petsc-openmpi"))
+              ;; Define path to SLEPc installation.
+              (setenv "SLEPC_DIR"
+                      (assoc-ref inputs "slepc-openmpi"))))
+          (add-before 'check 'mpi-setup
+            #$%openmpi-setup)
+          (replace 'check
+            (lambda* (#:key tests? #:allow-other-keys)
+              (when tests?
+                (invoke "python" "test/runtests.py")))))))
+    (native-inputs (list python-cython python-setuptools))
    (inputs (list python-numpy python-petsc4py petsc-openmpi slepc-openmpi))
    (home-page "https://bitbucket.org/slepc/slepc4py/")
    (synopsis "Python bindings for SLEPc")
-    (description "SLEPc, the Scalable Library for Eigenvalue Problem
-Computations, is based on PETSc, the Portable, Extensible Toolkit for
-Scientific Computation.  It employs the MPI standard for all
-message-passing communication.  @code{slepc4py} provides Python
-bindings to almost all functions of SLEPc.")
+    (description
+     "SLEPc, the Scalable Library for Eigenvalue Problem Computations, is
+based on PETSc, the Portable, Extensible Toolkit for Scientific Computation.
+It employs the MPI standard for all message-passing communication.
+@code{slepc4py} provides Python bindings to almost all functions of SLEPc.")
    (license license:bsd-3)))

 (define-public metamath
@@ -100,6 +100,18 @@
  (make-apache-parent-pom
    "29" "0fj078bgzs0r24x66ph5bbwkkc5s9d1qh57hmlpisg4mdi0l48s9"))

+(define-public apache-parent-pom-31
+  (make-apache-parent-pom
+    "31" "1sdjh664gakz5bjawrw4p4bpvkjwsk4wbd1iapl1r38zsfcp5qal"))
+
+(define-public apache-parent-pom-33
+  (make-apache-parent-pom
+    "33" "06qpsnrqf8459aficmbdhad7ldv8k48dqwxivd7r7knlssmlqsww"))
+
+(define-public apache-parent-pom-34
+  (make-apache-parent-pom
+    "34" "0jia7fxl3abvz4d70y144vghy2dq4a258jdyzcpp339hx37lnjm2"))
+
 (define* (make-apache-commons-parent-pom version hash parent
                                         #:key (tag-prefix "commons-parent-"))
  (hidden-package
@@ -131,6 +143,16 @@
      (description "This package contains the Apache Commons parent POM.")
      (license license:asl2.0))))

+(define-public apache-commons-parent-pom-28
+  (make-apache-commons-parent-pom
+    "28" "13zsm6x2cpk9j92bg5v3mg9f4d8928hh6xdx16024bz122y5nb34"
+    apache-parent-pom-13))
+
+(define-public apache-commons-parent-pom-34
+  (make-apache-commons-parent-pom
+    "34" "0r0gim683nsib2x62s1av2hr6agirqjp57vjkd3xh0qlrx36kna1"
+    apache-parent-pom-13))
+
 (define-public apache-commons-parent-pom-39
  (make-apache-commons-parent-pom
    "39" "0mjx48a55ik1h4hsxhifkli1flvkp6d05ab14p4al0fc6rhdxi46"
@@ -162,6 +184,35 @@
    apache-parent-pom-23
    #:tag-prefix "rel/commons-parent-"))

+(define-public apache-commons-parent-pom-73
+  (hidden-package
+   (package
+     (name "apache-commons-parent-pom")
+     (version "73")
+     (source (origin
+               (method git-fetch)
+               (uri (git-reference
+                     (url "https://github.com/apache/commons-parent")
+                     (commit "rel/commons-parent-73")))
+               (file-name (git-file-name name version))
+               (sha256
+                (base32 "0avlf1chqccd6f6y03l9i7p8z5a96c91nvv1rx482yjdr8ic28mf"))))
+     (build-system ant-build-system)
+     (arguments
+      `(#:tests? #f
+        #:phases
+        (modify-phases %standard-phases
+          (delete 'configure)
+          (delete 'build)
+          (replace 'install
+            (install-pom-file "pom.xml")))))
+     (propagated-inputs
+      `(("parent" ,apache-parent-pom-33)))
+     (home-page "https://maven.apache.org/")
+     (synopsis "Apache Commons parent pom")
+     (description "This package contains the Apache Commons parent POM.")
+     (license license:asl2.0))))
+
 (define-public java-weld-parent-pom
  (hidden-package
    (package
@@ -412,6 +463,74 @@ other projects as their parent pom.")
  (make-plexus-parent-pom
    "8" "0ybwdzawa58qg9ag39rxyin24lk9sjcaih6n2yfldfzsbkq6gnww"))

+(define-public plexus-parent-pom-10
+  (hidden-package
+   (package
+     (name "plexus-parent-pom")
+     (version "10")
+     (source (origin
+               (method git-fetch)
+               (uri (git-reference
+                     (url "https://github.com/codehaus-plexus/plexus-pom")
+                     (commit "plexus-10")))
+               (file-name (git-file-name name "10"))
+               (sha256
+                (base32 "10hhmi50ns0cqjiv9xw3dlanil1psm9s1mj2wndfyvn85cz7ia9n"))))
+     (build-system ant-build-system)
+     (arguments
+      `(#:tests? #f
+        #:phases
+        (modify-phases %standard-phases
+          (delete 'configure)
+          (delete 'build)
+          (replace 'install
+            (install-pom-file "pom.xml")))))
+     (home-page "https://codehaus-plexus.github.io/plexus-pom")
+     (synopsis "Plexus parent pom")
+     (description "This package contains the Plexus parent POM.")
+     (license license:asl2.0))))
+
+(define-public plexus-parent-pom-15
+  (hidden-package
+   (package
+     (inherit plexus-parent-pom-10)
+     (version "15")
+     (source (origin
+               (method git-fetch)
+               (uri (git-reference
+                     (url "https://github.com/codehaus-plexus/plexus-pom")
+                     (commit "plexus-15")))
+               (file-name (git-file-name "plexus-parent-pom" "15"))
+               (sha256
+                (base32 "0rjbfy7qpvxa75ak3cx6vgd0agpbgdkc95jsbk3qhm9n0nisylh1")))))))
+
+(define-public plexus-parent-pom-20
+  (hidden-package
+   (package
+     (name "plexus-parent-pom")
+     (version "20")
+     (source (origin
+               (method git-fetch)
+               (uri (git-reference
+                     (url "https://github.com/codehaus-plexus/plexus-pom")
+                     (commit "plexus-20")))
+               (file-name (git-file-name name "20"))
+               (sha256
+                (base32 "1j2n06p5ylijxk2j0iwynxag6dq4bb5jdli7dsnj8hsywrj4jrpg"))))
+     (build-system ant-build-system)
+     (arguments
+      `(#:tests? #f
+        #:phases
+        (modify-phases %standard-phases
+          (delete 'configure)
+          (delete 'build)
+          (replace 'install
+            (install-pom-file "pom.xml")))))
+     (home-page "https://codehaus-plexus.github.io/plexus-pom")
+     (synopsis "Plexus parent pom")
+     (description "This package contains the Plexus parent POM.")
+     (license license:asl2.0))))
+
 (define* (make-maven-parent-pom version hash parent #:key replacements)
  (hidden-package
    (package
@@ -451,6 +570,86 @@ other projects as their parent pom.")
 tool.  This package contains the Maven parent POM.")
      (license license:asl2.0))))

+(define-public maven-parent-pom-44
+  (hidden-package
+    (package
+      (name "maven-parent-pom")
+      (version "44")
+      (source (origin
+                (method git-fetch)
+                (uri (git-reference
+                       (url "https://github.com/apache/maven-parent")
+                       (commit "v44")))
+                (file-name (git-file-name name version))
+                (sha256 (base32 "0l54kjgi5s8n5asaf9swj96bjm26s77z3wk4x9jiljxflf9vdqgf"))))
+      (build-system ant-build-system)
+      (arguments
+       `(#:tests? #f
+         #:phases
+         (modify-phases %standard-phases
+           (delete 'configure)
+           (delete 'build)
+           (add-after 'install 'install-plugins
+             (install-pom-file "maven-plugins/pom.xml"))
+           (add-after 'install 'install-shared
+             (install-pom-file "maven-shared-components/pom.xml"))
+           (replace 'install
+             (install-pom-file "pom.xml")))))
+      (propagated-inputs
+       `(("parent" ,apache-parent-pom-33)))
+      (home-page "https://maven.apache.org/")
+      (synopsis "Maven parent pom")
+      (description "Apache Maven is a software project management and comprehension
+tool.  This package contains the Maven parent POM.")
+      (license license:asl2.0))))
+
+(define-public maven-parent-pom-43
+  (let ((base (make-maven-parent-pom
+                "43" "1f2w7nlkd97gq8bbddl9n0dgm7v5hkpjxrrhzln8szhm4d9wxrfa"
+                apache-parent-pom-33
+                #:replacements
+                (delay
+                  `(("org.codehaus.plexus"
+                     ("plexus-component-annotations" .
+                      ,(package-version java-plexus-component-annotations))))))))
+    (package
+      (inherit base)
+      (arguments
+        (substitute-keyword-arguments (package-arguments base)
+          ((#:phases phases)
+           `(modify-phases ,phases
+              (add-before 'install 'fix-versions
+                (lambda _
+                  ;; Use the junit-bom version we have available
+                  (substitute* "pom.xml"
+                    (("5\\.11\\.3")
+                     ,(package-version junit-bom-5.11))))))))))))
+
+(define-public maven-parent-pom-41
+  (let ((base (make-maven-parent-pom
+                "41" "0glhr3s77g80yc20ajpwmpqgqn3i2ap7mj1wqs1vnk2fp2s0lvsj"
+                apache-parent-pom-31
+                #:replacements
+                (delay
+                  `(("org.codehaus.plexus"
+                     ("plexus-component-annotations" .
+                      ,(package-version java-plexus-component-annotations))))))))
+    (package
+      (inherit base)
+      (arguments
+        (substitute-keyword-arguments (package-arguments base)
+          ((#:phases phases)
+           ;; FIXME: Version downgrades; upgrade sisu and plexus-utils instead.
+           `(modify-phases ,phases
+              (add-before 'install 'fix-versions
+                (lambda _
+                  (substitute* "pom.xml"
+                    (("0\\.9\\.0\\.M2")
+                     ,(package-version java-eclipse-sisu-plexus))
+                    (("version\\.plexus-utils>4\\.0\\.0")
+                     ,(string-append "version.plexus-utils>"
+                        (package-version java-plexus-utils)))))))))))))
+
 (define-public maven-parent-pom-39
  (make-maven-parent-pom
    "39" "1123nmm63nrsfy9i35zn12glswc2sy9bsj4fir2z9yh93kraky1y"
@@ -459,7 +658,9 @@ tool.  This package contains the Maven parent POM.")
    (delay
      `(("org.codehaus.plexus"
         ("plexus-component-annotations" .
-          ,(package-version java-plexus-component-annotations)))))))
+          ,(package-version java-plexus-component-annotations))
+         ("plexus-utils" .
+          ,(package-version java-plexus-utils)))))))

 (define-public maven-parent-pom-37
  (make-maven-parent-pom
@@ -431,25 +431,23 @@ TCP sessions from existing clients.")
    (source
     (origin
       (method git-fetch)
-       (uri
-        (git-reference
-         (url "https://codeberg.org/poezio/poezio")
-         (commit
-          (string-append "v" version))))
-       (file-name
-        (git-file-name name version))
+       (uri (git-reference
+             (url "https://codeberg.org/poezio/poezio")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
       (sha256
        (base32 "15vlmymqlcf94h1g6dvgzjvj15c47dqsm78qs40wl2dlwspvqkxj"))))
-    (build-system python-build-system)
+    (build-system pyproject-build-system)
    (arguments
-      (list #:tests? #f ; tests fails without the OTR plugin
-            #:phases
-            #~(modify-phases %standard-phases
-                (add-after 'unpack 'patch
-                  (lambda _
-                    (substitute* "setup.py"
-                      (("'CC', 'cc'")
-                       "'CC', 'gcc'")))))))
+     (list
+      #:tests? #f ;tests fails without the OTR plugin
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'patch
+            (lambda _
+              (substitute* "setup.py"
+                (("'CC', 'cc'")
+                 "'CC', 'gcc'")))))))
    (native-inputs
     (list pkg-config python-setuptools python-sphinx))
    (inputs
@@ -404,38 +404,6 @@ monitoring system.  It can configure and display various aspects of Zabbix
 through a text-based interface.")
    (license license:gpl3+)))

-(define-public python-pyzabbix
-  (package
-    (name "python-pyzabbix")
-    (version "1.2.1")
-    (home-page "https://github.com/lukecyca/pyzabbix")
-    ;; No tests on PyPI, use the git checkout.
-    (source
-     (origin
-       (method git-fetch)
-       (uri (git-reference (url home-page) (commit version)))
-       (file-name (git-file-name name version))
-       (sha256
-        (base32
-         "0ad5xac67brmwc3wd0f87pjplly3cqyrz1dp725lzz2hrjgiaqi8"))))
-    (build-system python-build-system)
-    (arguments
-     '(#:phases (modify-phases %standard-phases
-                  (replace 'check
-                    (lambda* (#:key tests? #:allow-other-keys)
-                      (if tests?
-                          (invoke "pytest" "-vv" "tests")
-                          (format #t "test suite not run~%")))))))
-    (native-inputs
-     ;; For tests.
-     (list python-requests-mock python-pytest))
-    (propagated-inputs
-     (list python-packaging python-requests))
-    (synopsis "Python interface to the Zabbix API")
-    (description
-     "@code{pyzabbix} is a Python module for working with the Zabbix API.")
-    (license license:lgpl2.1+)))
-
 (define-public darkstat
  (package
    (name "darkstat")
@@ -521,16 +489,30 @@ network/disk rates.")
 (define-public python-whisper
  (package
    (name "python-whisper")
-    (version "1.1.8")
+    (version "1.1.10")
    (source
     (origin
-       (method url-fetch)
-       (uri (pypi-uri "whisper" version))
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://github.com/graphite-project/whisper")
+              (commit version)))
+       (file-name (git-file-name name version))
       (sha256
        (base32
-         "1bk29w09zcpsv8hp0g0al7nwrxa07z0ycls3mbh83wfavk83aprl"))))
-    (build-system python-build-system)
-    (native-inputs (list python-six))
+         "182phj3z3mxpbla6m2f0pahyvqfn0jdblprvk6xwx39nc939nw0a"))))
+    (build-system pyproject-build-system)
+    (arguments
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'remove-python-six-dependency
+            (lambda _
+              (substitute* (find-files "." "\\.py$")
+                (("'six'") "")          ; dependency in setup.py
+                (("six\\.moves") "io")
+                (("from six import assertRegex") "")
+                (("assertRegex") ""))))))) ; effectively disable test
+    (native-inputs (list python-pytest python-setuptools))
    (home-page "https://graphiteapp.org/")
    (synopsis "Fixed size round-robin style database for Graphite")
    (description "Whisper is one of three components within the Graphite
@@ -758,6 +740,8 @@ written in Go with pluggable metric collectors.")
    (license license:asl2.0)))

 (define-public temper-exporter
+  ;; XXX: No release or updates since 2020, consider to remove when starts
+  ;; failing, it might be abandoned project.
  (let ((commit "a87bbab19c05609d62d9e4c7941178700c1ef84d")
        (revision "0"))
    (package
@@ -772,7 +756,7 @@ written in Go with pluggable metric collectors.")
                (sha256
                 (base32
                  "0jk3ydi8s14q5kyl9j3gm2zrnwlb1jwjqpg5vqrgkbm9jrldrabc"))))
-      (build-system python-build-system)
+      (build-system pyproject-build-system)
      (arguments
       '(#:tests? #f                    ; One test failure:
                                        ; test/test_exporter.py:33:
@@ -793,7 +777,7 @@ written in Go with pluggable metric collectors.")
      (inputs
       (list python-prometheus-client python-pyudev))
      (native-inputs
-       (list python-pytest python-pytest-mock python-pytest-runner))
+       (list python-setuptools))
      (home-page "https://github.com/yrro/temper-exporter")
      (synopsis "Prometheus exporter for PCSensor TEMPer sensor devices")
      (description
@@ -61,6 +61,7 @@
  #:use-module (gnu packages xiph)
  #:use-module (gnu packages pulseaudio)
  #:use-module (gnu packages linux)               ;alsa-lib
+  #:use-module (gnu packages textutils)           ;utfcpp
  #:use-module (gnu packages video)               ;ffmpeg
  #:use-module (guix packages)
  #:use-module (guix download)
@@ -281,6 +282,24 @@ Speex, WavPack TrueAudio, WAV, AIFF, MP4 and ASF files.")
    ;; Dual-licensed: user may choose between LGPLv2.1 or MPLv1.1.
    (license (list license:lgpl2.1 license:mpl1.1))))

+(define-public taglib-next
+  (package
+    (inherit taglib)
+    (name "taglib")
+    (version "2.1.1")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://github.com/taglib/taglib")
+              (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "0m1xyjsg6a8p4prn1xr1g29zsxqr7606cv3cblgjgxkb1dk26fx7"))))
+    (inputs
+     (list utfcpp
+           zlib))))
+
 (define-public minimp3
  ;; The latest commit is used as there is no release.
  (let ((commit   "afb604c06bc8beb145fecd42c0ceb5bda8795144")
@@ -708,29 +727,31 @@ FFmpeg, etc.")
 (define-public python-pyacoustid
  (package
    (name "python-pyacoustid")
-    (version "1.2.2")
+    (version "1.3.0")
    (source
     (origin
       (method url-fetch)
       (uri (pypi-uri "pyacoustid" version))
       (sha256
        (base32
-         "0ha15m41r8ckmanc4k9nrlb9hprvhdjxndzw40a1yj3z1b1xjyf2"))))
-    (build-system python-build-system)
+         "0xyikq3lqmqlm6b8nmmi6aijs4vz56svgcbhha8bp7n1j5qlhksz"))))
+    (build-system pyproject-build-system)
    (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (add-after 'unpack 'chromaprint-path
-           (lambda* (#:key inputs #:allow-other-keys)
-             (substitute* "chromaprint.py"
-               (("libchromaprint.so.1")
-                (string-append (assoc-ref inputs "chromaprint")
-                               "/lib/libchromaprint.so.1")))
-             (substitute* "acoustid.py"
-               (("'fpcalc'")
-                (string-append "'" (assoc-ref inputs "chromaprint")
-                               "/bin/fpcalc'")))
-             #t)))))
+     (list
+      #:tests? #f                      ;No tests.
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'chromaprint-path
+            (lambda* (#:key inputs #:allow-other-keys)
+              (substitute* "chromaprint.py"
+                (("libchromaprint.so.1")
+                 (search-input-file inputs "/lib/libchromaprint.so.1")))
+              (substitute* "acoustid.py"
+                (("(FPCALC_COMMAND.+)fpcalc" _ prefix)
+                 (string-append
+                  prefix (search-input-file inputs "/bin/fpcalc")))))))))
+    (native-inputs
+     (list python-setuptools))
    (inputs (list chromaprint))
    (propagated-inputs
     (list python-audioread python-requests))
@@ -744,39 +765,36 @@ fingerprinting library and the Acoustid API.")
 (define-public python-pytaglib
  (package
    (name "python-pytaglib")
-    (version "1.4.6")
+    (version "3.1.0")
    (source
     (origin
-       (method url-fetch)
-       (uri (pypi-uri "pytaglib" version))
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://github.com/supermihi/pytaglib")
+              (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
       (sha256
-        (base32
-         "0li970qslfymz4vk1wrij2nfqw3l15cpc3fjjci48mpvg17gbnhn"))
-       ;; Delete file generated by Cython.
-       (modules '((guix build utils)))
-       (snippet
-        '(begin
-           (delete-file "src/taglib.cpp")))))
-    (build-system python-build-system)
+        (base32 "178vvc0rq932w9hmzb1cxlzhzfs5npibrpx41r0zidmhcpv4gr03"))))
+    (build-system pyproject-build-system)
    (arguments
-     '(#:phases
-       (modify-phases %standard-phases
-         ;; Ensure that the Cython file is regenerated.
-         (add-after 'unpack 'setup-environment
-           (lambda _
-             (setenv "PYTAGLIB_CYTHONIZE" "1"))))))
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          ;; Ensure that the Cython file is regenerated.
+          (add-after 'unpack 'setup-environment
+            (lambda _
+              (setenv "PYTAGLIB_CYTHONIZE" "1"))))))
    (native-inputs
-     (list python-cython python-pytest))
+     (list python-cython
+           python-pytest
+           python-setuptools))
    (inputs
-     (list taglib))
-    (home-page
-     "https://github.com/supermihi/pytaglib")
-    (synopsis
-     "Python bindings for taglib")
+     (list taglib-next))
+    (home-page "https://github.com/supermihi/pytaglib")
+    (synopsis "Python bindings for taglib")
    (description
-     "This package is a Python audio tagging library.  It is
-cross-platform, works with all Python versions, and is very
-simple to use yet fully featured.")
+     "This package is a Python audio tagging library.  It is cross-platform,
+ works with all Python versions, and is very simple to use yet fully featured.")
    (license license:gpl3)))

 (define-public wavbreaker
@@ -58,6 +58,7 @@
  #:use-module (gnu packages gnupg)
  #:use-module (gnu packages gtk)
  #:use-module (gnu packages icu4c)
+  #:use-module (gnu packages kde-frameworks)
  #:use-module (gnu packages libusb)
  #:use-module (gnu packages lua)
  #:use-module (gnu packages readline)
@@ -524,16 +525,25 @@ MPRIS 2 support.")
 (define-public cantata
  (package
    (name "cantata")
-    (version "3.3.1")
+    (version "3.4.0")
    (source (origin
              (method git-fetch)
              (uri (git-reference
-                    (url "https://github.com/nullobsi/cantata")
-                    (commit (string-append "v" version))))
+                     (url "https://github.com/nullobsi/cantata")
+                     (commit (string-append "v" version))))
              (file-name (git-file-name name version))
              (sha256
               (base32
-                "0x5bm8s9cl68ybdv37w65kjlxyz40s42ddyf0cv4351vxxiiyng2"))))
+                "1hjq73w5lnh2gj51bnaqym0lds82zzlwjr2ndz2m8xrcv2w2q0lg"))
+              (modules '((guix build utils)))
+              (snippet
+               #~(begin
+                   (with-directory-excursion "3rdparty"
+                     (for-each delete-file-recursively
+                               '("karchive"
+                                 "kcategorizedview"
+                                 "qtsingleapplication")))
+                   (delete-file-recursively "support/fonts")))))
    (build-system cmake-build-system)
    (arguments
     `(#:tests? #f)) ; No test suite
@@ -543,16 +553,13 @@ MPRIS 2 support.")
     (list avahi
           eudev
           ffmpeg
+           karchive
+           kitemviews
           libcddb
           libcdio-paranoia
-           libmusicbrainz
-           libebur128
-           libmtp
-           mpg123
           qtbase
           qtmultimedia
           qtsvg
-           taglib
           zlib))
    (synopsis "Graphical MPD Client")
    (description "Cantata is a graphical client for the Music Player Daemon
@@ -4266,9 +4266,9 @@ MusicBrainz database.")
    ;; 'musicbrainzngs/compat.py' is ISC licensed.
    (license (list license:bsd-2 license:isc))))

-(define-public python-isrcsubmit
+(define-public isrcsubmit
  (package
-    (name "python-isrcsubmit")
+    (name "isrcsubmit")
    (version "2.0.1")
    (source
     (origin
@@ -4277,9 +4277,13 @@ MusicBrainz database.")
       (sha256
        (base32
         "0jh4cni8qhri6dh83cmp0i0m0384vv0vznlygv49wj9xzh1d99qv"))))
-    (build-system python-build-system)
+    (build-system pyproject-build-system)
+    ;; tests: 6 passed
+    (native-inputs
+     (list python-setuptools))
    (propagated-inputs
-     (list python-discid python-musicbrainzngs))
+     (list python-discid
+           python-musicbrainzngs))
    (home-page "https://github.com/JonnyJD/musicbrainz-isrcsubmit")
    (synopsis "Submit ISRCs from CDs to MusicBrainz")
    (description "@code{isrcsubmit} is a tool to extract @dfn{International
@@ -4287,6 +4291,9 @@ Standard Recording Code} (ISRCs) from audio CDs and submit them to
@url{https://musicbrainz.org/, MusicBrainz}.")
    (license license:gpl3+)))

+ ;; May be removed after 2026-01-31
+(define-deprecated-package python-isrcsubmit isrcsubmit)
+
 (define-public python-pylast
  (package
    (name "python-pylast")
@@ -4372,26 +4379,24 @@ websites such as Libre.fm.")
    (build-system pyproject-build-system)
    (arguments
     (list
+      ;; tests: 1083 passed, 99 skipped, 1 deselected, 1828 warnings
+      #:test-flags
+      ;; Network access is required.
+      #~(list "-k" "not test_merge_duplicate_album")
      #:phases
      #~(modify-phases %standard-phases
          (add-after 'unpack 'set-HOME
            (lambda _
              (setenv "HOME" (string-append (getcwd) "/tmp"))))
-          (add-after 'unpack 'skip-tests-that-need-internet
-            (lambda _
-              (substitute* "test/test_importer.py"
-                (("^([ \t]+)(def test_merge_duplicate_album\\(self\\):)" _ indentation rest)
-                  (string-append indentation "@pytest.mark.skip()\n" indentation rest)))))
          ;; Wrap the executable, so it can find python-gi (aka
          ;; pygobject) and gstreamer plugins.
          (add-after 'wrap 'wrap-typelib
-            (lambda* (#:key outputs #:allow-other-keys)
-              (let ((prog (string-append #$output "/bin/beet"))
-                    (plugins (getenv "GST_PLUGIN_SYSTEM_PATH"))
-                    (types (getenv "GI_TYPELIB_PATH")))
-                (wrap-program prog
-                  `("GST_PLUGIN_SYSTEM_PATH" ":" prefix (,plugins))
-                  `("GI_TYPELIB_PATH" ":" prefix (,types))))))
+            (lambda _
+              (wrap-program (string-append #$output "/bin/beet")
+                `("GST_PLUGIN_SYSTEM_PATH" ":" prefix
+                  (,(getenv "GST_PLUGIN_SYSTEM_PATH")))
+                `("GI_TYPELIB_PATH" ":" prefix
+                  (,(getenv "GI_TYPELIB_PATH"))))))
          (add-after 'wrap 'install-completion
            (lambda _
              (let ((completion-path
@@ -4408,11 +4413,9 @@ websites such as Libre.fm.")
           python-poetry-core
           python-py7zr
           python-pytest
-           python-pytest-cov
           python-pytest-flask
           python-setuptools
-           python-responses
-           python-wheel))
+           python-responses))
    (inputs
     (list bash-minimal
           gst-plugins-base
@@ -70,6 +70,7 @@
 ;;; Copyright © 2024 Janneke Nieuwenhuizen <janneke@gnu.org>
 ;;; Copyright © 2024, 2025 Janneke Nieuwenhuizen <janneke@gnu.org>
 ;;; Copyright © 2025 Ashish SHUKLA <ashish.is@lostca.se>
+;;; Copyright © 2025 Jared Klingenberger <jkling@noreply.codeberg.org>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -140,6 +141,7 @@
  #:use-module (gnu packages glib)
  #:use-module (gnu packages gnome)
  #:use-module (gnu packages gnupg)
+  #:use-module (gnu packages golang)
  #:use-module (gnu packages golang-build)
  #:use-module (gnu packages golang-check)
  #:use-module (gnu packages golang-crypto)
@@ -783,29 +785,34 @@ It also includes some SCTP-related helper utilities.")
 (define-public python-pysctp
  (package
    (name "python-pysctp")
-    (version "0.6.1")
+    (version "0.7.2")
    (source
     (origin
-       (method url-fetch)
-       (uri (pypi-uri "pysctp" version))
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://github.com/p1sec/pysctp")
+              (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
       (sha256
-        (base32 "14h2qlmfi24bizhvvqkfqfa78pzm3911ibrzy9k94i97xy1978dy"))))
-    (build-system python-build-system)
-    (inputs
-     (list lksctp-tools))
+        (base32 "03nw6szak7xdcndyg0m62l4lmkv2bl8ixl7pa0ximwlk4v26wc2w"))))
+    (build-system pyproject-build-system)
    (arguments
-     `(#:tests? #f  ;; tests require network
-       #:phases
-       (modify-phases %standard-phases
-         (add-after 'unpack 'patch-setup.py
-           (lambda _
-             (substitute* "setup.py"
-               (("include_dirs\\s*=.*")
-                (string-append "include_dirs = ['.'] + '"
-                               (getenv "C_INCLUDE_PATH") "'.split(':'),"))
-               (("library_dirs\\s*=.*")
-                (string-append "library_dirs = '"
-                               (getenv "LIBRARY_PATH") "'.split(':'),"))))))))
+     (list
+      #:tests? #f ;tests require network
+      #:test-backend #~'unittest
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'patch-setup.py
+            (lambda _
+              (substitute* "setup.py"
+                (("include_dirs\\s*=.*")
+                 (string-append "include_dirs = ['.'] + '"
+                                (getenv "C_INCLUDE_PATH") "'.split(':'),"))
+                (("library_dirs\\s*=.*")
+                 (string-append "library_dirs = '"
+                                (getenv "LIBRARY_PATH") "'.split(':'),"))))))))
+    (native-inputs (list python-setuptools))
+    (inputs (list lksctp-tools))
    (home-page "https://github.com/p1sec/pysctp")
    (synopsis "Python module for the SCTP protocol stack and library")
    (description "@code{pysctp} implements the SCTP socket API.  You need a
@@ -1289,26 +1296,29 @@ useful for making transparent firewalls.")
 (define-public pproxy
  (package
    (name "pproxy")
-    (version "2.7.8")
-    (source (origin
-              (method url-fetch)
-              (uri (pypi-uri "pproxy" version))
-              (sha256
-               (base32
-                "1j4nv72i77i2j5nl9ymzpk4m98qih3naihfrqjghrc9b7g0krdzs"))))
-    (build-system python-build-system)
+    (version "2.7.9")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference (url "https://github.com/qwj/python-proxy")
+                           (commit version)))
+       (file-name (git-file-name name version))
+       (sha256 (base32 "0crr6b9v5fvy2js1fqjngj3axr962p1yayrxsnf3fpzdc99mnv0d"))))
+    (build-system pyproject-build-system)
    (arguments
-     (list #:phases
-           #~(modify-phases %standard-phases
-               (replace 'check
-                 (lambda* (#:key tests? #:allow-other-keys)
-                   (when tests?
-                     (with-directory-excursion "tests"
-                       (for-each (lambda (file)
-                                   (invoke "python" file))
-                                 ;; XXX: The api_ tests require network access
-                                 ;; so we only run the cipher tests for now.
-                                 (find-files "." "^cipher_.*\\.py$")))))))))
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (replace 'check
+            (lambda* (#:key tests? #:allow-other-keys)
+              (when tests?
+                (with-directory-excursion "tests"
+                  (for-each (lambda (file)
+                              (invoke "python" file))
+                            ;; XXX: The api_ tests require network access
+                            ;; so we only run the cipher tests for now.
+                            (find-files "." "^cipher_.*\\.py$")))))))))
+    (native-inputs (list python-setuptools))
    (inputs
     (list python-asyncssh
           python-daemon
@@ -1569,6 +1579,50 @@ between different versions of ØMQ.")
 files contain direct mappings of the abstractions provided by the ØMQ C API.")
    (license license:expat)))

+(define-public libcoap
+  (package
+    (name "libcoap")
+    (version "4.3.5a")
+    (source (origin
+                (method git-fetch)
+                (uri (git-reference
+                      (url "https://github.com/obgm/libcoap")
+                      (commit (string-append "v" version))))
+                (file-name (git-file-name name version))
+                (sha256
+                 (base32
+                  "078bi6i6115wyhx9qssh30kf5ziv8sn7ch5fg31rf7qr7pypbfxa"))))
+    (outputs (list "out" "doc"))
+    (build-system gnu-build-system)
+    (arguments
+     (list
+       #:configure-flags
+       #~(list "--enable-tests"
+               "--with-openssl")
+       #:phases
+       #~(modify-phases %standard-phases
+         (replace 'check
+           (lambda* (#:key tests? #:allow-other-keys)
+             (when tests?
+               (invoke "./tests/testdriver")))))))
+    (native-inputs (list asciidoc
+                         autoconf
+                         automake
+                         doxygen
+                         libtool
+                         pkg-config
+                         which))
+    (inputs (list cunit openssl))
+    (home-page "https://libcoap.net/")
+    (synopsis "Implementation of the CoAP application protocol")
+    (description
+      "This package provides a C implementation of a lightweight
+application-protocol for devices that are constrained their resources such as
+computing power, RF range, memory, bandwidth, or network packet sizes.  This
+protocol, @acronym{CoAP, Constrained Application Protocol}, is standardized by
+the IETF as @url{https://www.rfc-editor.org/rfc/rfc7252, RFC 7252}.")
+    (license license:bsd-2)))
+
 (define-public libnatpmp
  ;; Install the latest commit as it provides a pkg-config (.pc) file.
  (let ((base-version "20230423")
@@ -2142,7 +2196,7 @@ application stack itself.")
 (define-public httpstat
  (package
    (name "httpstat")
-    (version "1.3.1")
+    (version "1.3.2")
    (source
     (origin
       (method git-fetch)
@@ -2151,23 +2205,29 @@ application stack itself.")
             (commit version)))
       (file-name (git-file-name name version))
       (sha256
-        (base32 "0cw8299a080m42slsimz31xs0gjnh833gpbj2dsr4hkcinrn4iyd"))))
-    (build-system python-build-system)
-    (inputs (list curl))
+        (base32 "1z0m00wzbd1y9knypvw425h4qjqyp4x162j7crpgmfic1wpwbqbl"))))
+    (build-system pyproject-build-system)
    (arguments
-     '(#:phases
-       (modify-phases %standard-phases
-         (add-before 'build 'fix-curl-path
-           (lambda* (#:key inputs #:allow-other-keys)
-             (substitute* "httpstat.py"
-               (("ENV_CURL_BIN.get\\('curl'\\)")
-                (string-append "ENV_CURL_BIN.get('"
-                               (assoc-ref inputs "curl")
-                               "/bin/curl')"))
-               ;; "curl -w time_*" units seems to have
-               ;; changed from seconds to nanoseconds.
-               (("d\\[k\\] \\* 1000") "d[k] / 1000"))
-             #t)))))
+     (list
+      #:tests? #f ; Tests require network access.
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-before 'build 'fix-curl-path
+            (lambda* (#:key inputs #:allow-other-keys)
+              (substitute* "httpstat.py"
+                (("ENV_CURL_BIN.get\\('curl'\\)")
+                 (format #f "ENV_CURL_BIN.get(~s)"
+                         (search-input-file inputs "/bin/curl")))
+                ;; "curl -w time_*" units seems to have
+                ;; changed from seconds to nanoseconds.
+                (("d\\[k\\] \\* 1000")
+                 "d[k] / 1000")) #t))
+          (replace 'check
+            (lambda* (#:key tests? #:allow-other-keys)
+              (when tests?
+                (invoke "bash" "httpstat_test.sh")))))))
+    (native-inputs (list python-setuptools))
+    (inputs (list curl))
    (home-page "https://github.com/reorx/httpstat")
    (synopsis "Visualize curl statistics")
    (description
@@ -3229,18 +3289,22 @@ IPFIX, RSPAN, CLI, LACP, 802.1ag).")
  (package
    (name "python-ipy")
    (version "1.01")
-    (source (origin
-              (method url-fetch)
-              (uri (pypi-uri "IPy" version))
-              (sha256
-               (base32
-                "06nclwafzsbi8ls019ry1xnfhgwc5103g8lgav54mmd2vr0sgv7d"))))
-    (build-system python-build-system)
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/autocracy/python-ipy/")
+             (commit (string-append "IPy-" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "106rirmirlpb5ppznn3fd8189a8z02zf99jvk6j4hcq05ajclfc6"))))
+    (build-system pyproject-build-system)
+    (native-inputs (list python-pytest python-setuptools))
    (home-page "https://github.com/autocracy/python-ipy/")
    (synopsis "Python class and tools for handling IP addresses and networks")
-    (description "The @code{IP} class allows a comfortable parsing and
-handling for most notations in use for IPv4 and IPv6 addresses and
-networks.")
+    (description
+     "The @code{IP} class allows a comfortable parsing and handling for most
+notations in use for IPv4 and IPv6 addresses and networks.")
    (license license:bsd-3)))

 (define-public speedtest-cli
@@ -4586,18 +4650,23 @@ module @code{batman-adv}, for Layer 2.")
       (file-name (git-file-name name version))
       (sha256
        (base32 "1v14pafdd2nzd63kpf7aijpqf5dribxij3ynx5q1232y1ci4wf14"))))
-    (build-system python-build-system)
+    (build-system pyproject-build-system)
    (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (add-after 'install 'install-man-page
-           (lambda* (#:key inputs outputs #:allow-other-keys)
-             (let* ((out (assoc-ref outputs "out"))
-                    (man (string-append out "/share/man")))
-               (invoke "make" "doc/pagekite.1")
-               (install-file "doc/pagekite.1" (string-append man "/man1"))))))))
-    (inputs
-     (list python-six python-socksipychain))
+     (list
+      #:tests? #f                     ; Tests require extensive configuration.
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'install 'install-man-page
+            (lambda _
+              (invoke "make" "doc/pagekite.1")
+              (install-file "doc/pagekite.1"
+                            (string-append #$output "/share/man/man1"))))
+          (replace 'check
+            (lambda* (#:key tests? #:allow-other-keys)
+              (when tests?
+                (invoke "make" "test")))))))
+    (native-inputs (list perl python-setuptools))
+    (inputs (list python-six python-socksipychain))
    (home-page "https://pagekite.net/")
    (synopsis "Make localhost servers publicly visible")
    (description
@@ -5083,7 +5152,7 @@ daemon.")
 (define-public nebula
  (package
    (name "nebula")
-    (version "1.9.6")
+    (version "1.10.0")
    (source (origin
              (method git-fetch)
              (uri (git-reference
@@ -5092,7 +5161,7 @@ daemon.")
              (file-name (git-file-name name version))
              (sha256
               (base32
-                "0mcyakwr0r5lw6qgzib54v73a1j6ccaxrz3jf6dsh8daqwp5nmcj"))
+                "1x4r8b3ny0vxipf404l8z00m5cs7cfy810670gmznl61jkaq1zd7"))
              ;; Remove windows-related binary blobs and files
              (snippet
               #~(begin
@@ -5102,6 +5171,7 @@ daemon.")
    (build-system go-build-system)
    (arguments
     (list
+      #:go go-1.25
      #:install-source? #f
      #:import-path "github.com/slackhq/nebula"
      #:build-flags
@@ -5129,14 +5199,16 @@ daemon.")
           go-github-com-google-gopacket
           go-github-com-kardianos-service
           go-github-com-miekg-dns
+           go-github-com-miekg-pkcs11
           go-github-com-nbrownus-go-metrics-prometheus
           go-github-com-prometheus-client-golang
           go-github-com-rcrowley-go-metrics
           go-github-com-sirupsen-logrus
           go-github-com-skip2-go-qrcode
-           go-github-com-songgao-water
+           go-github-com-stefanberger-go-pkcs11uri
           go-github-com-stretchr-testify
           go-github-com-vishvananda-netlink
+           go-go-yaml-in-yaml-v3
           go-golang-org-x-crypto
           go-golang-org-x-exp
           go-golang-org-x-net
@@ -5145,7 +5217,7 @@ daemon.")
           go-golang-org-x-term
           go-golang-zx2c4-com-wireguard
           go-google-golang-org-protobuf
-           go-gopkg-in-yaml-v2
+           go-gopkg-in-yaml-v3
           go-gvisor-dev-gvisor))
    (home-page "https://github.com/slackhq/nebula")
    (synopsis "Scalable, peer-to-peer overlay networking tool")
@@ -27,6 +27,7 @@
  #:use-module (guix licenses)
  #:use-module (guix gexp)
  #:use-module (guix git-download)
+  #:use-module (guix build-system pyproject)
  #:use-module (guix build-system python)
  #:use-module (gnu packages)
  #:use-module (gnu packages check)
@@ -48,30 +49,28 @@
 (define-public python-scrape-schema-recipe
  (package
    (name "python-scrape-schema-recipe")
-    (version "0.2.0")
-    ;; The PyPI archive lacks a VERSION file as well as the test suite.
-    (source (origin
-              (method git-fetch)
-              (uri (git-reference
-                    (url "https://github.com/micahcochran/scrape-schema-recipe")
-                    (commit (string-append "v" version))))
-              (file-name (git-file-name name version))
-              (sha256
-               (base32
-                "044c6qwhb4c710ksgiw29cd0qcp84h1m4y8yr2g4c8vdlm3kkqh5"))))
-    (build-system python-build-system)
+    (version "0.2.2")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+              (url "https://github.com/micahcochran/scrape-schema-recipe")
+              (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "1yrqawnxp1k9ps0c920qjbbaxpmz3cf8bzyjs1kimvlxym78b614"))))
+    (build-system pyproject-build-system)
    (arguments
     (list
      #:phases
      #~(modify-phases %standard-phases
-          (replace 'check
+          (add-before 'check 'configure-tests
            (lambda* (#:key tests? #:allow-other-keys)
              (when tests?
                (substitute* "test_scrape.py"
                  (("DISABLE_NETWORK_TESTS = False")
-                   "DISABLE_NETWORK_TESTS = True"))
-                (invoke "pytest" "-vv")))))))
-    (native-inputs (list python-pytest))
+                   "DISABLE_NETWORK_TESTS = True"))))))))
+    (native-inputs (list python-pytest python-setuptools))
    (propagated-inputs
     (list python-extruct
           python-importlib-resources
@@ -101,32 +100,20 @@ in the @url{https://schema.org/Recipe} format.")
          (base32
           "08fbw6zp32ws6w9czwy2sqc9c9izlkglsskshj2114d0l79z4gj8"))
         (patches (search-patches "gourmet-sqlalchemy-compat.patch"))))
-      (build-system python-build-system)
+      (build-system pyproject-build-system)
      (arguments
       (list
-        #:modules `((guix build utils)
-                    (guix build python-build-system)
-                    (ice-9 ftw)
-                    (srfi srfi-26))
+        #:test-flags
+        ;; XXX: Some tests in deeper directories or otherwise discovered by
+        ;; Pytest are broken.
+        #~(list "--ignore-glob=gourmet/tests/**/*.py")
        #:phases
        #~(modify-phases %standard-phases
-            (add-before 'check 'prepare-x
-              ;; Both the tests and the sanity-check phase need an X server to
-              ;; succeed.
+            (add-before 'check 'configure-tests
              (lambda _
+                (setenv "HOME" "/tmp") ;needed by tests
                (system "Xvfb &")
                (setenv "DISPLAY" ":0")))
-            (replace 'check
-              (lambda* (#:key tests? #:allow-other-keys)
-                (when tests?
-                  (setenv "HOME" "/tmp") ;needed by tests
-                  (apply invoke "pytest" "-vv"
-                         ;; XXX: This is needed because some tests in deeper
-                         ;; directories or otherwise discovered by Pytest are
-                         ;; broken.
-                         (map (cut string-append "gourmet/tests/" <>)
-                              (scandir "gourmet/tests"
-                                       (cut string-prefix? "test_" <>)))))))
            (add-after 'install 'install-dekstop-file-and-icons
              (lambda _
                (define share (string-append #$output "/share"))
@@ -138,6 +125,7 @@ in the @url{https://schema.org/Recipe} format.")
       (list python-dogtail
             python-pytest
             python-selenium
+             python-setuptools
             xorg-server-for-tests))
      (inputs
       (list gtk+
@@ -190,7 +190,7 @@ default.  To add support for more languages, the
 (define-public gimagereader
  (package
    (name "gimagereader")
-    (version "3.4.2")
+    (version "3.4.3")
    (source
     (origin
       (method url-fetch)
@@ -199,7 +199,7 @@ default.  To add support for more languages, the
             "/download/v" version "/"
             "gimagereader-" version ".tar.xz"))
       (sha256
-        (base32 "0r52j5q2d0mvzw6qkds6vrapcqhdgyj2jvp7bh8w9zw6gpjsyk0q"))))
+        (base32 "09f4njwhw7xkyq4pjzjrmypzczijckcbimwq8776hb4milzba126"))))
    (build-system cmake-build-system)
    (arguments
     (list
@@ -212,11 +212,12 @@ default.  To add support for more languages, the
           djvulibre
           leptonica
           podofo
-           poppler-qt5
+           poppler-qt6
           sane
-           qtbase-5
+           qtbase
+           qt5compat
           qtspell
-           quazip-5
+           quazip
           tesseract-ocr))
    (home-page "https://github.com/manisandro/gImageReader")
    (synopsis "Qt front-end to tesseract-ocr")
@@ -42,6 +42,7 @@
  #:use-module (gnu packages ncurses)
  #:use-module (gnu packages pkg-config)
  #:use-module (gnu packages python)
+  #:use-module (gnu packages python-build)
  #:use-module (gnu packages python-science)
  #:use-module (gnu packages python-xyz)
  #:use-module (gnu packages ruby)
@@ -268,18 +269,22 @@ pocl.")
 (define-public python-pytools
  (package
    (name "python-pytools")
-    (version "2021.2.7")
+    (version "2025.2.5")
    (source
     (origin
-       (method url-fetch)
-       (uri (pypi-uri "pytools" version))
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/inducer/pytools")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
       (sha256
-        (base32 "1yyr4k6sqx859gjhc02633l2vxwdnj6m2f5blmf7dgq0gzzgcf05"))))
-    (build-system python-build-system)
-    (arguments `(#:tests? #f)) ; Tests depend on packages not present in Guix.
-    (propagated-inputs
-     (list python-appdirs python-numpy))
-    (home-page "https://pypi.org/project/pytools/")
+        (base32 "1sym2vbkw068ldkjqi3qj1dkbvd047bk5ir028qqbv0g7z3dwk31"))))
+    (build-system pyproject-build-system)
+    (arguments
+     (list #:tests? #f)) ;Tests depend on packages not present in Guix.
+    (native-inputs (list python-hatchling))
+    (propagated-inputs (list python-appdirs python-numpy))
+    (home-page "https://github.com/inducer/pytools")
    (synopsis "Assorted tools for Python")
    (description
     "Pytools is a bag of things that are ``missing'' from the Python standard
@@ -421,19 +421,31 @@ Other features include:
 (define-public python-bonsai
  (package
    (name "python-bonsai")
-    (version "1.2.0")
+    (version "1.5.4")
    (source
     (origin
-       (method url-fetch)
-       (uri (pypi-uri "bonsai" version))
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/noirello/bonsai")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
       (sha256
-        (base32
-         "013bl6h1m3f7vg1lk89d4vi28wbf31zdcs4f9g8css7ngx63v6px"))))
-    (build-system python-build-system)
-    (inputs
-     (list mit-krb5 cyrus-sasl openldap))
-    ;; disabling tests, since they require docker and extensive setup
-    (arguments `(#:tests? #f))
+        (base32 "1p1330cxaxb2j80zw0vvi2hrnyw3qr5vh8fm2wy8ci745dmrs0nl"))))
+    (build-system pyproject-build-system)
+    (arguments
+     (list
+      #:test-flags
+      #~(list
+         ;; XXX: Require docker and extensive setup.
+         "--ignore=tests/test_asyncio.py"
+         "--ignore=tests/test_ldapclient.py"
+         "--ignore=tests/test_ldapconnection.py"
+         "--ignore=tests/test_ldapentry.py"
+         "--ignore=tests/test_ldapreference.py"
+         "--ignore=tests/test_pool.py"
+         "-k" "not test_set_async_connect")))
+    (native-inputs (list python-pytest python-setuptools))
+    (inputs (list mit-krb5 cyrus-sasl openldap))
    (home-page "https://github.com/noirello/bonsai")
    (synopsis "Access LDAP directory servers from Python")
    (description
@@ -258,9 +258,10 @@ data analysis, data mining and data visualization.")
       (uri (pypi-uri "serverfiles" version))
       (sha256
        (base32 "1qgbzgnaxj4wsp2rdas53qxsh0j7xpibq25w6lviwyaqwwrgq42y"))))
-    (build-system python-build-system)
-    (propagated-inputs
-     (list python-requests))
+    (build-system pyproject-build-system)
+    (arguments (list #:test-backend #~'unittest))
+    (native-inputs (list python-setuptools))
+    (propagated-inputs (list python-requests))
    (home-page "https://github.com/biolab/serverfiles")
    (synopsis "Utility to access files on a HTTP server and store them locally")
    (description
@@ -412,6 +412,19 @@ $(prefix)/etc/openrc\n")))
                          (substitute* "tests/guix-environment-container.sh"
                            (("guix environment --version")
                             "exit 77\n")))))
+                    ,@(if (target-arm32?)
+                          `((add-after
+                                'disable-failing-tests
+                                'disable-failing-tests-on-arm32
+                              ;; XXX FIXME: These tests fail on armhf architecture,
+                              ;; see <https://codeberg.org/guix/guix/issues/5078>.
+                              (lambda _
+                                (substitute* "tests/syscalls.scm"
+                                  (("^\\(test-equal \"safe-clone and unshare succeeds\"" all)
+                                   (string-append "(test-skip 1)\n" all))
+                                  (("^\\(test-equal \"clone and unshare triggers EINVAL\"" all)
+                                   (string-append "(test-skip 1)\n" all))))))
+                          '())
                    (add-before 'check 'set-SHELL
                      (lambda _
                        ;; 'guix environment' tests rely on 'SHELL' having a
@@ -2400,14 +2413,14 @@ the boot loader configuration.")
 (define-public flatpak
  (package
    (name "flatpak")
-    (version "1.16.0")
+    (version "1.16.2")
    (source
     (origin
       (method url-fetch)
       (uri (string-append "https://github.com/flatpak/flatpak/releases/download/"
                           version "/flatpak-" version ".tar.xz"))
       (sha256
-        (base32 "0ajbz8ms4h5nyjr59hv9z8vaimj4f3p51v8idmy14qnbmmjwa2nb"))
+        (base32 "1ss3v25bq0ybks6yl3q13cxxf18virgi3w6xws0qzil51ldjs5v9"))
       (patches
        (search-patches "flatpak-fix-fonts-icons.patch"
                        "flatpak-fix-icon-validation.patch"
@@ -1,43 +0,0 @@
-Disable CPU optimizations not supported by all x86_64 systems.
-
--- a/cmake/modules/SIMDExt.cmake	2017-03-23 22:22:58.254071694 +0100
-+++ b/cmake/modules/SIMDExt.cmake	2017-03-23 22:23:22.446848845 +0100
-@@ -5,11 +5,6 @@
- # HAVE_ARM_NEON
- # HAVE_INTEL_SSE
- # HAVE_INTEL_SSE2
-# HAVE_INTEL_SSE3
-# HAVE_INTEL_SSSE3
-# HAVE_INTEL_PCLMUL
-# HAVE_INTEL_SSE4_1
-# HAVE_INTEL_SSE4_2
- #
- # SIMD_COMPILE_FLAGS
- #
-@@ -85,26 +80,6 @@
-       if(HAVE_INTEL_SSE2)
-         set(SIMD_COMPILE_FLAGS "${SIMD_COMPILE_FLAGS} -msse2")
-       endif()
-      CHECK_C_COMPILER_FLAG(-msse3 HAVE_INTEL_SSE3)
-      if(HAVE_INTEL_SSE3)
-        set(SIMD_COMPILE_FLAGS "${SIMD_COMPILE_FLAGS} -msse3")
-      endif()
-      CHECK_C_COMPILER_FLAG(-mssse3 HAVE_INTEL_SSSE3)
-      if(HAVE_INTEL_SSSE3)
-        set(SIMD_COMPILE_FLAGS "${SIMD_COMPILE_FLAGS} -mssse3")
-      endif()
-      CHECK_C_COMPILER_FLAG(-mpclmul HAVE_INTEL_PCLMUL)
-      if(HAVE_INTEL_PCLMUL)
-        set(SIMD_COMPILE_FLAGS "${SIMD_COMPILE_FLAGS} -mpclmul")
-      endif()
-      CHECK_C_COMPILER_FLAG(-msse4.1 HAVE_INTEL_SSE4_1)
-      if(HAVE_INTEL_SSE4_1)
-        set(SIMD_COMPILE_FLAGS "${SIMD_COMPILE_FLAGS} -msse4.1")
-      endif()
-      CHECK_C_COMPILER_FLAG(-msse4.2 HAVE_INTEL_SSE4_2)
-      if(HAVE_INTEL_SSE4_2)
-        set(SIMD_COMPILE_FLAGS "${SIMD_COMPILE_FLAGS} -msse4.2")
-      endif()
-     endif(CMAKE_SYSTEM_PROCESSOR MATCHES "amd64|x86_64|AMD64")
-   endif(CMAKE_SYSTEM_PROCESSOR MATCHES "i686|amd64|x86_64|AMD64")
- elseif(CMAKE_SYSTEM_PROCESSOR MATCHES "(powerpc|ppc)64le")
@@ -0,0 +1,22 @@
+Upstream-status: Not forwarded yet.
+
+diff -u /tmp/guix-build-ceph-20.3.0.drv-0/source/CMakeLists.txt /tmp/guix-build-ceph-20.3.0.drv-0/source/CMakeLists.txt.orig
+--- a/CMakeLists.txt	2025-12-19 13:14:44.050684729 +0900
+++ b/CMakeLists.txt	2025-12-19 13:15:06.218810041 +0900
+@@ -356,12 +356,12 @@
+   find_package(QatDrv REQUIRED COMPONENTS qat_s usdm_drv_s)
+   set(HAVE_QAT TRUE)
+ elseif(WITH_QATLIB)
+-  if(NOT WITH_SYSTEM_QAT)
+  if(NOT WITH_SYSTEM_QATLIB)
+     include(BuildQAT)
+     build_qat()
+   endif()
+   find_package(QAT REQUIRED)
+-  if(NOT WITH_SYSTEM_QAT)
+  if(NOT WITH_SYSTEM_QATLIB)
+     add_dependencies(QAT::qat qatlib_ext)
+     add_dependencies(QAT::usdm qatlib_ext)
+   endif()
+
+Diff finished.  Fri Dec 19 13:15:39 2025
@@ -1,50 +0,0 @@
-Adjust to newer Boost interface.
-
--- a/src/rgw/rgw_asio_client.cc	1970-01-01 01:00:01.000000000 +0100
-+++ b/src/rgw/rgw_asio_client.cc	2024-09-11 08:33:21.723548804 +0200
-@@ -39,11 +39,11 @@
-     const auto& value = header->value();
- 
-     if (field == beast::http::field::content_length) {
-      env.set("CONTENT_LENGTH", value.to_string());
-+      env.set("CONTENT_LENGTH", std::string(value));
-       continue;
-     }
-     if (field == beast::http::field::content_type) {
-      env.set("CONTENT_TYPE", value.to_string());
-+      env.set("CONTENT_TYPE", std::string(value));
-       continue;
-     }
- 
-@@ -62,26 +62,26 @@
-     }
-     *dest = '\0';
- 
-    env.set(buf, value.to_string());
-+    env.set(buf, std::string(value));
-   }
- 
-   int major = request.version() / 10;
-   int minor = request.version() % 10;
-   env.set("HTTP_VERSION", std::to_string(major) + '.' + std::to_string(minor));
- 
-  env.set("REQUEST_METHOD", request.method_string().to_string());
-+  env.set("REQUEST_METHOD", std::string(request.method_string()));
- 
-   // split uri from query
-   auto uri = request.target();
-   auto pos = uri.find('?');
-   if (pos != uri.npos) {
-     auto query = uri.substr(pos + 1);
-    env.set("QUERY_STRING", query.to_string());
-+    env.set("QUERY_STRING", std::string(query));
-     uri = uri.substr(0, pos);
-   }
-  env.set("SCRIPT_URI", uri.to_string());
-+  env.set("SCRIPT_URI", std::string(uri));
- 
-  env.set("REQUEST_URI", request.target().to_string());
-+  env.set("REQUEST_URI", std::string(request.target()));
- 
-   char port_buf[16];
-   snprintf(port_buf, sizeof(port_buf), "%d", local_endpoint.port());
@@ -0,0 +1,16 @@
+Author: Danny Milosavljevic <dannym@friendly-machines.com>
+Date: Sun Dec 21 04:41:14 AM CET 2025
+Subject: Fail the entire build on error.
+
+--- a/src/mx/_impl/mx.py	2025-12-19 20:15:23.140244258 +0000
+++ b/src/mx/_impl/mx.py	2025-12-19 20:15:23.142739235 +0000
+@@ -15181,6 +15181,9 @@
+             joinTasks()
+         showProgress()
+ 
+        if len(failed) > 0:
+            abort(f'{len(failed)} build tasks failed')
+
+         def dump_task_stats(f):
+             """
+             Dump task statistics CSV. Use R with following commands for visualization:
@@ -77,7 +77,7 @@ index 0000000..cf9a70d
 +[project]
 +name = 'mc2mt'
 +version = '0.1'
-+dependencies = ['anvil-parser']
+dependencies = ['anvil-parser2']
 +
 +[project.scripts]
 +mc2mt = 'mc2mtlib:mc2mt.mc2mt'
@@ -1,40 +0,0 @@
-Patch obtained from https://github.com/mpv-player/mpv/commit/26b29fba02a2782f68e2906f837d21201fc6f1b9
-See https://github.com/mpv-player/mpv/issues/16176 for discussion. Next version
-of mpv will have this fixed, but upstream is not planning to release a patch
-release.
-
-From 26b29fba02a2782f68e2906f837d21201fc6f1b9 Mon Sep 17 00:00:00 2001
-From: =?UTF-8?q?Kacper=20Michaj=C5=82ow?= <kasper93@gmail.com>
-Date: Fri, 28 Mar 2025 19:12:01 +0100
-Subject: [PATCH] demux_mkv: fix compilation after deprecated definitions
- removal
-
-See: https://github.com/FFmpeg/FFmpeg/commit/822432769868da325ba03774df1084aa78b9a5a0
---
- demux/demux_mkv.c | 6 +++---
- 1 file changed, 3 insertions(+), 3 deletions(-)
-
-diff --git a/demux/demux_mkv.c b/demux/demux_mkv.c
-index 135edcc23d82b..cc7ce3e98f4f6 100644
--- a/demux/demux_mkv.c
-+++ b/demux/demux_mkv.c
-@@ -2200,16 +2200,16 @@ static int demux_mkv_open_sub(demuxer_t *demuxer, mkv_track_t *track)
-             // [0x30..0x37] are component tags utilized for
-             // non-mobile captioning service ("profile A").
-             if (component_tag >= 0x30 && component_tag <= 0x37)
-                lav->profile = FF_PROFILE_ARIB_PROFILE_A;
-+                lav->profile = AV_PROFILE_ARIB_PROFILE_A;
-             break;
-         case 0x0012:
-             // component tag 0x87 signifies a mobile/partial reception
-             // (1seg) captioning service ("profile C").
-             if (component_tag == 0x87)
-                lav->profile = FF_PROFILE_ARIB_PROFILE_C;
-+                lav->profile = AV_PROFILE_ARIB_PROFILE_C;
-             break;
-         }
-        if (lav->profile == FF_PROFILE_UNKNOWN)
-+        if (lav->profile == AV_PROFILE_UNKNOWN)
-             MP_WARN(demuxer, "ARIB caption profile %02x / %04x not supported.\n",
-                     component_tag, data_component_id);
-     }
@@ -1,34 +0,0 @@
-Upstream-status: https://github.com/mpv-player/mpv/pull/16140
-
-From d20ded876d27497d3fe6a9494add8106b507a45c Mon Sep 17 00:00:00 2001
-From: llyyr <llyyr.public@gmail.com>
-Date: Fri, 28 Mar 2025 15:34:33 +0530
-Subject: [PATCH] clipboard-wayland: prevent reading from hung up fd
-
-This causes mpv to use up 100% of a core if there's an offer for a
-mime_type that mpv doesn't accept with ext_data_control clipboard
-backend.
---
- player/clipboard/clipboard-wayland.c | 6 ++++++
- 1 file changed, 6 insertions(+)
-
-diff --git a/player/clipboard/clipboard-wayland.c b/player/clipboard/clipboard-wayland.c
-index c4a5e50472..bd8ac35af2 100644
--- a/player/clipboard/clipboard-wayland.c
-+++ b/player/clipboard/clipboard-wayland.c
-@@ -348,6 +348,12 @@ static bool clipboard_wayland_dispatch_events(struct clipboard_wayland_priv *wl,
-     if (fds[1].revents & POLLIN)
-         return false;
- 
-+    if (fds[2].revents & (POLLERR | POLLHUP | POLLNVAL))
-+        destroy_offer(wl->selection_offer);
-+
-+    if (fds[3].revents & (POLLERR | POLLHUP | POLLNVAL))
-+        destroy_offer(wl->primary_selection_offer);
-+
-     if (fds[2].revents & POLLIN)
-         get_selection_data(wl, wl->selection_offer, false);
- 
-- 
-2.51.0
-
@@ -1,26 +0,0 @@
-Unbundle spng, miniz
-*** a/third-party/CMakeLists.txt
--- b/third-party/CMakeLists.txt
-@@ -4,20 +4,13 @@
- target_woof_settings(md5)
- target_include_directories(md5 INTERFACE md5)
- 
-add_library(miniz STATIC miniz/miniz.c)
-target_woof_settings(miniz)
-target_compile_definitions(miniz PRIVATE MINIZ_NO_TIME)
-target_include_directories(miniz INTERFACE miniz)
-+find_package(miniz)
- 
- add_library(pffft STATIC pffft/pffft.c)
- target_woof_settings(pffft)
- target_include_directories(pffft INTERFACE pffft)
- 
-add_library(spng STATIC spng/spng.c)
-target_woof_settings(spng)
-target_compile_definitions(spng PRIVATE SPNG_USE_MINIZ INTERFACE SPNG_STATIC)
-target_include_directories(spng INTERFACE spng)
-target_link_libraries(spng miniz)
-+find_package(spng)
- 
- if(NOT yyjson_FOUND)
-     add_library(yyjson STATIC yyjson/yyjson.c)
@@ -1248,18 +1248,20 @@ optimize toolbar for portrait / landscape
 (define-public python-reportlab
  (package
    (name "python-reportlab")
-    (version "4.0.8")
+    (version "4.4.7")
    (source (origin
              (method url-fetch)
              (uri (pypi-uri "reportlab" version))
              (sha256
               (base32
-                "0lq8fibbgp7bfasxjf33s4hzqr405y655bkxggxmjxqsga0lb68n"))))
-    (build-system python-build-system)
+                "0w5isxc1ds19jhpigfjjyavc6qzkwxskwgwkcikrkrb5z5x2is21"))))
+    (build-system pyproject-build-system)
    (arguments
     (list
-      #:test-target "tests"
-      #:configure-flags '(list "--no-download-t1-files")
+      ;; tests: 386 passed
+      #:test-backend #~'custom
+      #:test-flags #~(list "runAll.py")
+      #:configure-flags #~'(("--no-download-t1-files" . ""))
      #:phases
      #~(modify-phases %standard-phases
         (add-after 'unpack 'find-libraries
@@ -1267,7 +1269,14 @@ optimize toolbar for portrait / landscape
             (let ((dlt1 (assoc-ref inputs "font-curve-files")))
               (substitute* "setup.py"
                 (("http://www.reportlab.com/ftp/pfbfer-20180109.zip")
-                  (string-append "file://" dlt1)))))))))
+                  (string-append "file://" dlt1))))))
+         (replace 'check
+           (lambda args
+             ;; KeyError: 'Vera'
+             (delete-file "tests/test_graphics_charts.py")
+             (with-directory-excursion "tests"
+               (apply (assoc-ref %standard-phases 'check) args)))))))
+    (native-inputs (list python-setuptools))
    (inputs
     `(("font-curve-files"
        ,(origin
@@ -1277,7 +1286,7 @@ optimize toolbar for portrait / landscape
            (base32
             "1v0gy4mbx02ys96ssx89420y0njknlrxs2bx64bv4rp8a0al66w5"))))))
    (propagated-inputs
-     (list python-chardet python-pillow))
+     (list python-charset-normalizer python-pillow))
    (home-page "https://www.reportlab.com")
    (synopsis "Python library for generating PDFs and graphics")
    (description "This is the ReportLab PDF Toolkit.  It allows rapid creation
@@ -1299,26 +1308,28 @@ vector formats.")
        (base32
         ;; "0d1d2jxfl9vmy4swcdz660xd4wx91w1i3n07k522pccapwxig294"))))
         "0g15q67f992prkjndrk75hhd601iypfmkafhdx7hijs2byr26c83"))))
-    (build-system python-build-system)
+    (build-system pyproject-build-system)
    (arguments
     (list
-      #:phases #~(modify-phases %standard-phases
-                   (delete 'build)
-                   (delete 'configure)
-                   (delete 'check)
-                   (replace 'install
-                     (lambda* (#:key inputs #:allow-other-keys)
-                       ;; There's no 'setup.py' so install things manually.
-                       (let* ((bin (string-append #$output "/bin"))
-                              (impressive (string-append bin "/impressive"))
-                              (man1 (string-append #$output "/share/man/man1")))
-                         (mkdir-p bin)
-                         (copy-file "impressive.py" impressive)
-                         (chmod impressive #o755)
-                         (wrap-program (string-append bin "/impressive")
-                           `("PATH" ":" prefix ;for pdftoppm
-                             (,(search-input-file inputs "bin/xpdf"))))
-                         (install-file "impressive.1" man1)))))))
+      #:tests? #f                       ;No tests.
+      #:phases
+      #~(modify-phases %standard-phases
+          (delete 'build)
+          (delete 'configure)
+          (replace 'install
+            (lambda* (#:key inputs #:allow-other-keys)
+              ;; There's no 'setup.py' so install things manually.
+              (let* ((bin (string-append #$output "/bin"))
+                     (impressive (string-append bin "/impressive"))
+                     (man1 (string-append #$output "/share/man/man1")))
+                (mkdir-p bin)
+                (copy-file "impressive.py" impressive)
+                (chmod impressive #o755)
+                (wrap-program (string-append bin "/impressive")
+                  `("PATH" ":" prefix ;for pdftoppm
+                    (,(search-input-file inputs "bin/xpdf"))))
+                (install-file "impressive.1" man1)))))))
+    (native-inputs (list python-setuptools))
    ;; TODO: Add dependency on pdftk.
    (inputs (list bash-minimal python-pygame python-pillow sdl xpdf))
    (home-page "https://impressive.sourceforge.net")
--- a/Show More
+++ b/Show More