gnu: stgit-2: Update to 2.4.12.

* gnu/packages/version-control.scm (stgit-2): Update to 2.4.12.

Change-Id: I2ec0bd92910a051edbe7f2f847c15efbfcd856c7

gnu/local.mk

@@ -2102,6 +2102,7 @@ dist_patch_DATA =						\
   %D%/packages/patches/rustc-1.54.0-src.patch			\
   %D%/packages/patches/rust-1.64-fix-riscv64-bootstrap.patch	\
   %D%/packages/patches/rust-1.70-fix-rustix-build.patch	\
+  %D%/packages/patches/rust-1.78-unwinding-fix.patch		\
   %D%/packages/patches/rust-cargo-edit-remove-ureq.patch	\
   %D%/packages/patches/rust-ring-0.17-ring-core.patch		\
   %D%/packages/patches/rust-ndarray-remove-blas-src-dep.patch	\

gnu/packages/crates-crypto.scm

@@ -3345,6 +3345,42 @@ secp384r1) elliptic curve as defined in SP 800-186 with support for ECDH, ECDSA
 signing/verification, and general purpose curve arithmetic support.")
     (license (list license:asl2.0 license:expat))))
 
+(define-public rust-p521-0.13
+  (package
+    (name "rust-p521")
+    (version "0.13.3")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "p521" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "1cl5y2aypa1vxg181a0na3abndz1981pfdp2zkyml88z3wbf5j8g"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-base16ct" ,rust-base16ct-0.2)
+                       ("rust-ecdsa" ,rust-ecdsa-0.16)
+                       ("rust-elliptic-curve" ,rust-elliptic-curve-0.13)
+                       ("rust-hex-literal" ,rust-hex-literal-0.4)
+                       ("rust-primeorder" ,rust-primeorder-0.13)
+                       ("rust-rand-core" ,rust-rand-core-0.6)
+                       ("rust-serdect" ,rust-serdect-0.2)
+                       ("rust-sha2" ,rust-sha2-0.10))
+       #:cargo-development-inputs (("rust-blobby" ,rust-blobby-0.3)
+                                   ("rust-ecdsa" ,rust-ecdsa-0.16)
+                                   ("rust-hex-literal" ,rust-hex-literal-0.4)
+                                   ("rust-primeorder" ,rust-primeorder-0.13)
+                                   ("rust-proptest" ,rust-proptest-1)
+                                   ("rust-rand-core" ,rust-rand-core-0.6))))
+    (home-page
+     "https://github.com/RustCrypto/elliptic-curves/tree/master/p521")
+    (synopsis
+     "Pure Rust implementation of the NIST P-521 (a.k.a. secp521r1) elliptic curve")
+    (description
+     "This package provides Pure Rust implementation of the NIST P-521 (a.k.a.
+secp521r1) elliptic curve as defined in SP 800-186.")
+    (license (list license:asl2.0 license:expat))))
+
 (define-public rust-pbkdf2-0.12
   (package
     (name "rust-pbkdf2")
@@ -4010,7 +4046,7 @@ for constructing a Message Authentication Code (MAC).")
 (define-public rust-ppv-lite86-0.2
   (package
     (name "rust-ppv-lite86")
-    (version "0.2.17")
+    (version "0.2.20")
     (source
       (origin
         (method url-fetch)
@@ -4018,8 +4054,10 @@ for constructing a Message Authentication Code (MAC).")
         (file-name (string-append name "-" version ".tar.gz"))
         (sha256
          (base32
-          "1pp6g52aw970adv3x2310n7glqnji96z0a9wiamzw89ibf0ayh2v"))))
+          "017ax9ssdnpww7nrl1hvqh2lzncpv04nnsibmnw9nxjnaqlpp5bp"))))
     (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-zerocopy" ,rust-zerocopy-0.7))))
     (home-page "https://github.com/cryptocorrosion/cryptocorrosion")
     (synopsis "Implementation of the crypto-simd API for x86")
     (description "This crate provides an implementation of the crypto-simd API
@@ -4029,14 +4067,14 @@ for x86.")
 (define-public rust-primeorder-0.13
   (package
     (name "rust-primeorder")
-    (version "0.13.1")
+    (version "0.13.6")
     (source (origin
               (method url-fetch)
               (uri (crate-uri "primeorder" version))
               (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
-                "1ddz0d0fzzcpdlsj6c6989va8ykf702g3zmf7dszfa0y6rski3fg"))))
+                "1rp16710mxksagcjnxqjjq9r9wf5vf72fs8wxffnvhb6i6hiqgim"))))
     (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs

gnu/packages/crates-graphics.scm

@@ -2628,14 +2628,14 @@ graphics and video games.")
 (define-public rust-palette-0.7
   (package
     (name "rust-palette")
-    (version "0.7.5")
+    (version "0.7.6")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "palette" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "0ynr6q7629gpw6pg8w1wrsl31sq48nxh1bg4awyrhhk6nyj27z7b"))
+        (base32 "1rmn02mv6cb112504qyg7pyfa83c08hxpk5sw7jc5v659hc73gsc"))
        (modules '((guix build utils)))
        (snippet
         '(begin (substitute* "Cargo.toml"
@@ -2702,17 +2702,18 @@ on correctness, flexibility and ease of use.")
 (define-public rust-palette-derive-0.7
   (package
     (name "rust-palette-derive")
-    (version "0.7.5")
+    (version "0.7.6")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "palette_derive" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "0vcxjslri6f24zgv3n6ixhzb21a8z23fa6h42s8ss2zcvc10g2g8"))))
+        (base32 "0c0xhpk1nqyq4jr2m8xnka7w47vqzc7m2vq9ih8wxyjv02phs0zm"))))
     (build-system cargo-build-system)
     (arguments
-     `(#:cargo-inputs (("rust-find-crate" ,rust-find-crate-0.6)
+     `(#:cargo-inputs (("rust-by-address" ,rust-by-address-1)
+                       ("rust-find-crate" ,rust-find-crate-0.6)
                        ("rust-proc-macro2" ,rust-proc-macro2-1)
                        ("rust-quote" ,rust-quote-1)
                        ("rust-syn" ,rust-syn-2))))
@@ -3257,17 +3258,19 @@ in AVIF format (powers the @code{cavif} tool).")
 (define-public rust-raw-window-handle-0.6
   (package
     (name "rust-raw-window-handle")
-    (version "0.6.0")
+    (version "0.6.2")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "raw-window-handle" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "0i5mxxfcgqmvmzg4f0lcz68g4xfd9jybhrdkxd2v37qv1q587aa2"))))
+        (base32 "0ff5c648hncwx7hm2a8fqgqlbvbl4xawb6v3xxv9wkpjyrr5arr0"))))
     (build-system cargo-build-system)
     (arguments
-     `(#:cargo-inputs (("rust-wasm-bindgen" ,rust-wasm-bindgen-0.2))))
+     `(#:cargo-inputs (("rust-wasm-bindgen" ,rust-wasm-bindgen-0.2))
+       #:cargo-development-inputs
+       (("rust-static-assertions" ,rust-static-assertions-1))))
     (home-page "https://github.com/rust-windowing/raw-window-handle")
     (synopsis "Interoperability library for Rust Windowing applications")
     (description
@@ -3310,18 +3313,18 @@ in AVIF format (powers the @code{cavif} tool).")
   (package
     (inherit rust-raw-window-handle-0.4)
     (name "rust-raw-window-handle")
-    (version "0.3.3")
+    (version "0.3.4")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "raw-window-handle" version))
-       (file-name
-        (string-append name "-" version ".tar.gz"))
+       (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32
-         "04c2wir7qq3g2b143yav52a1g5ack8ffqx2bpmrn9bc0dix1li0a"))))
+         "0xisj116xpaz1i2hci9jqfnccyixba1xryxl1gbdlj057la5b3z2"))))
     (arguments
-     `(#:cargo-inputs (("rust-libc" ,rust-libc-0.2))))))
+     `(#:cargo-inputs (("rust-libc" ,rust-libc-0.2)
+                       ("rust-raw-window-handle" ,rust-raw-window-handle-0.4))))))
 
 (define-public rust-raw-window-metal-0.3
   (package
@@ -5525,14 +5528,14 @@ the platform-specific getters provided by winit, or another library.")
 (define-public rust-x11rb-0.13
   (package
     (name "rust-x11rb")
-    (version "0.13.0")
+    (version "0.13.1")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "x11rb" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "06lzpmb67sfw37m0i9zz786hx6fklmykd9j3689blk3yijnmxwpq"))))
+        (base32 "04jyfm0xmc538v09pzsyr2w801yadsgvyl2p0p76hzzffg5gz4ax"))))
     (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs (("rust-as-raw-xcb-connection" ,rust-as-raw-xcb-connection-1)
@@ -5650,14 +5653,14 @@ the platform-specific getters provided by winit, or another library.")
 (define-public rust-x11rb-protocol-0.13
   (package
     (name "rust-x11rb-protocol")
-    (version "0.13.0")
+    (version "0.13.1")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "x11rb-protocol" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "0d3cc2dr5fcx8asgrm31d7lrxpnbqi6kl5v3r71gx7xxp3272gp6"))))
+        (base32 "0gfbxf2k7kbk577j3rjhfx7hm70kmwln6da7xyc4l2za0d2pq47c"))))
     (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs (("rust-serde" ,rust-serde-1))

gnu/packages/crates-gtk.scm

@@ -172,8 +172,37 @@
        #:cargo-development-inputs
        (("rust-gir-format-check" ,rust-gir-format-check-0.1))))))
 
+(define-public rust-cairo-rs-0.19
+  (package
+    (name "rust-cairo-rs")
+    (version "0.19.4")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "cairo-rs" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0qp5rixgipdj9d8yd5458hzfxam1rgpzcxi90vq6q0v91r6jmb5j"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-bitflags" ,rust-bitflags-2)
+                       ("rust-cairo-sys-rs" ,rust-cairo-sys-rs-0.19)
+                       ("rust-freetype-rs" ,rust-freetype-rs-0.35)
+                       ("rust-glib" ,rust-glib-0.19)
+                       ("rust-libc" ,rust-libc-0.2)
+                       ("rust-thiserror" ,rust-thiserror-1))
+       #:cargo-development-inputs (("rust-float-eq" ,rust-float-eq-1)
+                                   ("rust-tempfile" ,rust-tempfile-3))))
+    (native-inputs (list pkg-config))
+    (inputs (list cairo))
+    (home-page "https://gtk-rs.org/")
+    (synopsis "Rust bindings for the Cairo library")
+    (description "This package provides Rust bindings for the Cairo library.")
+    (license license:expat)))
+
 (define-public rust-cairo-rs-0.18
   (package
+    (inherit rust-cairo-rs-0.19)
     (name "rust-cairo-rs")
     (version "0.18.5")
     (source
@@ -183,7 +212,6 @@
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "1qjfkcq3mrh3p01nnn71dy3kn99g21xx3j8xcdvzn8ll2pq6x8lc"))))
-    (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs (("rust-bitflags" ,rust-bitflags-2)
                        ("rust-cairo-sys-rs" ,rust-cairo-sys-rs-0.18)
@@ -194,13 +222,7 @@
                        ("rust-once-cell" ,rust-once-cell-1)
                        ("rust-thiserror" ,rust-thiserror-1))
        #:cargo-development-inputs (("rust-float-eq" ,rust-float-eq-1)
-                                   ("rust-tempfile" ,rust-tempfile-3))))
-    (native-inputs (list pkg-config))
-    (inputs (list cairo))
-    (home-page "https://gtk-rs.org/")
-    (synopsis "Rust bindings for the Cairo library")
-    (description "Rust bindings for the Cairo library.")
-    (license license:expat)))
+                                   ("rust-tempfile" ,rust-tempfile-3))))))
 
 (define-public rust-cairo-rs-0.17
   (package
@@ -328,8 +350,34 @@
        (("rust-gtk-rs-lgpl-docs" ,rust-gtk-rs-lgpl-docs-0.1)
         ("rust-tempfile" ,rust-tempfile-3))))))
 
+(define-public rust-cairo-sys-rs-0.19
+  (package
+    (name "rust-cairo-sys-rs")
+    (version "0.19.2")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "cairo-sys-rs" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0r0yp0lph77lm4blrn6fvdmz2i3r8ibkkjg6nmwbvvv4jq8v6fzx"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-glib-sys" ,rust-glib-sys-0.19)
+                       ("rust-libc" ,rust-libc-0.2)
+                       ("rust-system-deps" ,rust-system-deps-6)
+                       ("rust-windows-sys" ,rust-windows-sys-0.52)
+                       ("rust-x11" ,rust-x11-2))))
+    (native-inputs (list pkg-config))
+    (inputs (list cairo))
+    (home-page "https://gtk-rs.org/")
+    (synopsis "FFI bindings to libcairo")
+    (description "This package provides FFI bindings to libcairo.")
+    (license license:expat)))
+
 (define-public rust-cairo-sys-rs-0.18
   (package
+    (inherit rust-cairo-sys-rs-0.19)
     (name "rust-cairo-sys-rs")
     (version "0.18.2")
     (source
@@ -339,19 +387,12 @@
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "0lfsxl7ylw3phbnwmz3k58j1gnqi6kc2hdc7g3bb7f4hwnl9yp38"))))
-    (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs (("rust-glib-sys" ,rust-glib-sys-0.18)
                        ("rust-libc" ,rust-libc-0.2)
                        ("rust-system-deps" ,rust-system-deps-6)
                        ("rust-winapi" ,rust-winapi-0.3)
-                       ("rust-x11" ,rust-x11-2))))
-    (native-inputs (list pkg-config))
-    (inputs (list cairo))
-    (home-page "https://gtk-rs.org/")
-    (synopsis "FFI bindings to libcairo")
-    (description "This package provides FFI bindings to libcairo.")
-    (license license:expat)))
+                       ("rust-x11" ,rust-x11-2))))))
 
 (define-public rust-cairo-sys-rs-0.17
   (package
@@ -551,8 +592,36 @@
        #:cargo-development-inputs
        (("rust-gir-format-check" ,rust-gir-format-check-0.1))))))
 
+(define-public rust-gdk-pixbuf-0.19
+  (package
+    (name "rust-gdk-pixbuf")
+    (version "0.19.8")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "gdk-pixbuf" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "16c6kznkh3vi82843ays8awdm37fwjd1fblv6g3h64824shsnkk2"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-gdk-pixbuf-sys" ,rust-gdk-pixbuf-sys-0.19)
+                       ("rust-gio" ,rust-gio-0.19)
+                       ("rust-glib" ,rust-glib-0.19)
+                       ("rust-libc" ,rust-libc-0.2))
+       #:cargo-development-inputs
+       (("rust-gir-format-check" ,rust-gir-format-check-0.1))))
+    (native-inputs (list pkg-config))
+    (inputs (list glib gdk-pixbuf))
+    (home-page "https://gtk-rs.org/")
+    (synopsis "Rust bindings for the GdkPixbuf library")
+    (description
+     "This package provides Rust bindings for the @code{GdkPixbuf} library.")
+    (license license:expat)))
+
 (define-public rust-gdk-pixbuf-0.18
   (package
+    (inherit rust-gdk-pixbuf-0.19)
     (name "rust-gdk-pixbuf")
     (version "0.18.5")
     (source
@@ -562,7 +631,6 @@
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "1v7svvl0g7zybndmis5inaqqgi1mvcc6s1n8rkb31f5zn3qzbqah"))))
-    (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs
        (("rust-gdk-pixbuf-sys" ,rust-gdk-pixbuf-sys-0.18)
@@ -571,13 +639,7 @@
         ("rust-libc" ,rust-libc-0.2)
         ("rust-once-cell" ,rust-once-cell-1))
        #:cargo-development-inputs
-       (("rust-gir-format-check" ,rust-gir-format-check-0.1))))
-    (native-inputs (list pkg-config))
-    (inputs (list glib gdk-pixbuf))
-    (home-page "https://gtk-rs.org/")
-    (synopsis "Rust bindings for the GdkPixbuf library")
-    (description "Rust bindings for the @code{GdkPixbuf} library.")
-    (license license:expat)))
+       (("rust-gir-format-check" ,rust-gir-format-check-0.1))))))
 
 (define-public rust-gdk-pixbuf-0.17
   (package
@@ -703,8 +765,37 @@
        #:cargo-development-inputs
        (("rust-gir-format-check" ,rust-gir-format-check-0.1))))))
 
+(define-public rust-gdk-pixbuf-sys-0.19
+  (package
+    (name "rust-gdk-pixbuf-sys")
+    (version "0.19.8")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "gdk-pixbuf-sys" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0y93g24mdgskvyhva46xv3qyb1cvj5xpi0yqnh7cb31wz2j0byjf"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-gio-sys" ,rust-gio-sys-0.19)
+                       ("rust-glib-sys" ,rust-glib-sys-0.19)
+                       ("rust-gobject-sys" ,rust-gobject-sys-0.19)
+                       ("rust-libc" ,rust-libc-0.2)
+                       ("rust-system-deps" ,rust-system-deps-6))
+       #:cargo-development-inputs (("rust-shell-words" ,rust-shell-words-1)
+                                   ("rust-tempfile" ,rust-tempfile-3))))
+    (native-inputs (list pkg-config))
+    (inputs (list gdk-pixbuf gtk+))
+    (home-page "https://gtk-rs.org/")
+    (synopsis "FFI bindings to libgdk_pixbuf-2.0")
+    (description
+     "This package provides FFI bindings to @code{libgdk_pixbuf-2.0}.")
+    (license license:expat)))
+
 (define-public rust-gdk-pixbuf-sys-0.18
   (package
+    (inherit rust-gdk-pixbuf-sys-0.19)
     (name "rust-gdk-pixbuf-sys")
     (version "0.18.0")
     (source
@@ -714,7 +805,6 @@
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "1xya543c4ffd2n7aiwwrdxsyc9casdbasafi6ixcknafckm3k61z"))))
-    (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs
        (("rust-gio-sys" ,rust-gio-sys-0.18)
@@ -724,13 +814,7 @@
         ("rust-system-deps" ,rust-system-deps-6))
        #:cargo-development-inputs
        (("rust-shell-words" ,rust-shell-words-1)
-        ("rust-tempfile" ,rust-tempfile-3))))
-    (native-inputs (list pkg-config))
-    (inputs (list gdk-pixbuf gtk+))
-    (home-page "https://gtk-rs.org/")
-    (synopsis "FFI bindings to libgdk_pixbuf-2.0")
-    (description "This package provides FFI bindings to @code{libgdk_pixbuf-2.0}.")
-    (license license:expat)))
+        ("rust-tempfile" ,rust-tempfile-3))))))
 
 (define-public rust-gdk-pixbuf-sys-0.17
   (package
@@ -1008,8 +1092,48 @@
     (description "This package provides FFI bindings of GDK 4.")
     (license license:expat)))
 
+(define-public rust-gio-0.19
+  (package
+    (name "rust-gio")
+    (version "0.19.8")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "gio" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "1znz5ngfvv3gbndf6lzz3hs27hlb8ysls4axlfccrzvkscbz2jac"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-test-flags
+       '("--release" "--"
+         "--skip=settings::test::bool_set_get"
+         "--skip=settings::test::string_get")
+       #:cargo-inputs (("rust-futures-channel" ,rust-futures-channel-0.3)
+                       ("rust-futures-core" ,rust-futures-core-0.3)
+                       ("rust-futures-io" ,rust-futures-io-0.3)
+                       ("rust-futures-util" ,rust-futures-util-0.3)
+                       ("rust-gio-sys" ,rust-gio-sys-0.19)
+                       ("rust-glib" ,rust-glib-0.19)
+                       ("rust-libc" ,rust-libc-0.2)
+                       ("rust-pin-project-lite" ,rust-pin-project-lite-0.2)
+                       ("rust-smallvec" ,rust-smallvec-1)
+                       ("rust-thiserror" ,rust-thiserror-1))
+       #:cargo-development-inputs
+       (("rust-futures" ,rust-futures-0.3)
+        ("rust-futures-util" ,rust-futures-util-0.3)
+        ("rust-gir-format-check" ,rust-gir-format-check-0.1)
+        ("rust-serial-test" ,rust-serial-test-3))))
+    (native-inputs (list pkg-config))
+    (inputs (list glib))
+    (home-page "https://gtk-rs.org/")
+    (synopsis "Rust bindings for the Gio library")
+    (description "This package provides Rust bindings for the Gio library.")
+    (license license:expat)))
+
 (define-public rust-gio-0.18
   (package
+    (inherit rust-gio-0.19)
     (name "rust-gio")
     (version "0.18.4")
     (source
@@ -1019,7 +1143,6 @@
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "0wsc6mnx057s4ailacg99dwgna38dbqli5x7a6y9rdw75x9qzz6l"))))
-    (build-system cargo-build-system)
     (arguments
      `(#:cargo-test-flags
        '("--release" "--"
@@ -1041,13 +1164,7 @@
        (("rust-futures" ,rust-futures-0.3)
         ("rust-futures-util" ,rust-futures-util-0.3)
         ("rust-gir-format-check" ,rust-gir-format-check-0.1)
-        ("rust-serial-test" ,rust-serial-test-2))))
-    (native-inputs (list pkg-config))
-    (inputs (list glib))
-    (home-page "https://gtk-rs.org/")
-    (synopsis "Rust bindings for the Gio library")
-    (description "Rust bindings for the Gio library.")
-    (license license:expat)))
+        ("rust-serial-test" ,rust-serial-test-2))))))
 
 (define-public rust-gio-0.17
   (package
@@ -1208,8 +1325,48 @@
         ("rust-serial-test" ,rust-serial-test-0.1)
         ("rust-serial-test-derive" ,rust-serial-test-derive-0.1))))))
 
+(define-public rust-gio-sys-0.19
+  (package
+    (name "rust-gio-sys")
+    (version "0.19.8")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "gio-sys" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "1vylsskpipfwl7mvffp1s0227d0k5amyhd32dfnp3mhl8yx47mrc"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(;; XXX: Tests are sensitive to the version of glib, even though
+       ;; the library supports a wide range.  Skip for now.
+       #:tests? #f
+       #:cargo-inputs (("rust-glib-sys" ,rust-glib-sys-0.19)
+                       ("rust-gobject-sys" ,rust-gobject-sys-0.19)
+                       ("rust-libc" ,rust-libc-0.2)
+                       ("rust-system-deps" ,rust-system-deps-6)
+                       ("rust-windows-sys" ,rust-windows-sys-0.52))
+       #:cargo-development-inputs (("rust-shell-words" ,rust-shell-words-1)
+                                   ("rust-tempfile" ,rust-tempfile-3))
+       #:phases (modify-phases %standard-phases
+                  (add-before 'check 'extend-include-path
+                    (lambda* (#:key inputs #:allow-other-keys)
+                      (let ((gio-headers (search-input-directory
+                                          inputs "include/gio-unix-2.0")))
+                        ;; Tests rely on these headers.
+                        (setenv "C_INCLUDE_PATH"
+                                (string-append gio-headers ":"
+                                               (getenv "C_INCLUDE_PATH")))))))))
+    (native-inputs (list pkg-config))
+    (inputs (list glib))
+    (home-page "https://gtk-rs.org/")
+    (synopsis "FFI bindings to libgio-2.0")
+    (description "This package provides FFI bindings to libgio-2.0.")
+    (license license:expat)))
+
 (define-public rust-gio-sys-0.18
   (package
+    (inherit rust-gio-sys-0.19)
     (name "rust-gio-sys")
     (version "0.18.1")
     (source
@@ -1219,7 +1376,6 @@
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "1lip8z35iy9d184x2qwjxlbxi64q9cpayy7v1p5y9xdsa3w6smip"))))
-    (build-system cargo-build-system)
     (arguments
      `(;; XXX: Tests are sensitive to the version of glib, even though
        ;; the library supports a wide range.  Skip for now.
@@ -1242,13 +1398,7 @@
                         ;; Tests rely on these headers.
                         (setenv "C_INCLUDE_PATH"
                                 (string-append gio-headers ":"
-                                               (getenv "C_INCLUDE_PATH")))))))))
-    (native-inputs (list pkg-config))
-    (inputs (list glib))
-    (home-page "https://gtk-rs.org/")
-    (synopsis "FFI bindings to libgio-2.0")
-    (description "This package provides FFI bindings to libgio-2.0.")
-    (license license:expat)))
+                                               (getenv "C_INCLUDE_PATH")))))))))))
 
 (define-public rust-gio-sys-0.17
   (package
@@ -1403,8 +1553,52 @@
     (description "File format checker in Rust.")
     (license license:expat)))
 
+(define-public rust-glib-0.19
+  (package
+    (name "rust-glib")
+    (version "0.19.9")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "glib" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0i2ak1scmzfmfxbm2dr146jl4y9mafxf1ald05jr8iimy5wh4r9r"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-test-flags
+       '("--release" "--"
+         "--skip=structured_log")
+       #:cargo-inputs (("rust-bitflags" ,rust-bitflags-2)
+                       ("rust-futures-channel" ,rust-futures-channel-0.3)
+                       ("rust-futures-core" ,rust-futures-core-0.3)
+                       ("rust-futures-executor" ,rust-futures-executor-0.3)
+                       ("rust-futures-task" ,rust-futures-task-0.3)
+                       ("rust-futures-util" ,rust-futures-util-0.3)
+                       ("rust-gio-sys" ,rust-gio-sys-0.19)
+                       ("rust-glib-macros" ,rust-glib-macros-0.19)
+                       ("rust-glib-sys" ,rust-glib-sys-0.19)
+                       ("rust-gobject-sys" ,rust-gobject-sys-0.19)
+                       ("rust-libc" ,rust-libc-0.2)
+                       ("rust-log" ,rust-log-0.4)
+                       ("rust-memchr" ,rust-memchr-2)
+                       ("rust-smallvec" ,rust-smallvec-1)
+                       ("rust-thiserror" ,rust-thiserror-1))
+       #:cargo-development-inputs
+       (("rust-criterion" ,rust-criterion-0.5)
+        ("rust-gir-format-check" ,rust-gir-format-check-0.1)
+        ("rust-tempfile" ,rust-tempfile-3)
+        ("rust-trybuild2" ,rust-trybuild2-1))))
+    (native-inputs (list pkg-config))
+    (inputs (list glib))
+    (home-page "https://gtk-rs.org/")
+    (synopsis "Rust bindings for the GLib library")
+    (description "This package provides Rust bindings for the GLib library.")
+    (license license:expat)))
+
 (define-public rust-glib-0.18
   (package
+    (inherit rust-glib-0.19)
     (name "rust-glib")
     (version "0.18.5")
     (source
@@ -1414,7 +1608,6 @@
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "1r8fw0627nmn19bgk3xpmcfngx3wkn7mcpq5a8ma3risx3valg93"))))
-    (build-system cargo-build-system)
     (arguments
      `(#:cargo-test-flags
        '("--release" "--"
@@ -1440,13 +1633,7 @@
        (("rust-criterion" ,rust-criterion-0.5)
         ("rust-gir-format-check" ,rust-gir-format-check-0.1)
         ("rust-tempfile" ,rust-tempfile-3)
-        ("rust-trybuild2" ,rust-trybuild2-1))))
-    (native-inputs (list pkg-config))
-    (inputs (list glib))
-    (home-page "https://gtk-rs.org/")
-    (synopsis "Rust bindings for the GLib library")
-    (description "Rust bindings for the GLib library.")
-    (license license:expat)))
+        ("rust-trybuild2" ,rust-trybuild2-1))))))
 
 (define-public rust-glib-0.17
   (package
@@ -1609,8 +1796,37 @@
        #:cargo-development-inputs
        (("rust-tempfile" ,rust-tempfile-3))))))
 
+(define-public rust-glib-macros-0.19
+  (package
+    (name "rust-glib-macros")
+    (version "0.19.9")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "glib-macros" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "1mzsh8jkg8vldvgvr9gsaidvn2myn5cbdn8a6m8rgbhlg8kv0aa4"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-heck" ,rust-heck-0.5)
+                       ("rust-proc-macro-crate" ,rust-proc-macro-crate-3)
+                       ("rust-proc-macro2" ,rust-proc-macro2-1)
+                       ("rust-quote" ,rust-quote-1)
+                       ("rust-syn" ,rust-syn-2))
+       #:cargo-development-inputs (("rust-glib" ,rust-glib-0.19)
+                                   ("rust-trybuild2" ,rust-trybuild2-1))))
+    (native-inputs (list pkg-config))
+    (inputs (list glib))
+    (home-page "https://gtk-rs.org/")
+    (synopsis "Rust bindings for the GLib library, proc macros crate")
+    (description
+     "This package provides Rust bindings for the GLib library, proc macros crate.")
+    (license license:expat)))
+
 (define-public rust-glib-macros-0.18
   (package
+    (inherit rust-glib-macros-0.19)
     (name "rust-glib-macros")
     (version "0.18.5")
     (source
@@ -1620,7 +1836,6 @@
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "1p5cla53fcp195zp0hkqpmnn7iwmkdswhy7xh34002bw8y7j5c0b"))))
-    (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs
        (("rust-heck" ,rust-heck-0.4)
@@ -1632,13 +1847,7 @@
        #:cargo-development-inputs
        (("rust-glib" ,rust-glib-0.18)
         ("rust-once-cell" ,rust-once-cell-1)
-        ("rust-trybuild2" ,rust-trybuild2-1))))
-    (native-inputs (list pkg-config))
-    (inputs (list glib))
-    (home-page "https://gtk-rs.org/")
-    (synopsis "Rust bindings for the GLib library, proc macros crate")
-    (description "Rust bindings for the GLib library, proc macros crate.")
-    (license license:expat)))
+        ("rust-trybuild2" ,rust-trybuild2-1))))))
 
 (define-public rust-glib-macros-0.17
   (package
@@ -1739,8 +1948,36 @@
         ("rust-quote" ,rust-quote-1)
         ("rust-syn" ,rust-syn-1))))))
 
+(define-public rust-glib-sys-0.19
+  (package
+    (name "rust-glib-sys")
+    (version "0.19.8")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "glib-sys" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "19f4q8x77vd7c1d9ikw492yskq5kpd7k04qb8xnh1c427a6w2baw"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(;; XXX: Tests are sensitive to the version of glib, even though
+       ;; the library supports a wide range.  Skip for now.
+       #:tests? #f
+       #:cargo-inputs (("rust-libc" ,rust-libc-0.2)
+                       ("rust-system-deps" ,rust-system-deps-6))
+       #:cargo-development-inputs (("rust-shell-words" ,rust-shell-words-1)
+                                   ("rust-tempfile" ,rust-tempfile-3))))
+    (native-inputs (list pkg-config))
+    (inputs (list glib))
+    (home-page "https://gtk-rs.org/")
+    (synopsis "FFI bindings to libglib-2.0")
+    (description "This package provides FFI bindings to libglib-2.0.")
+    (license license:expat)))
+
 (define-public rust-glib-sys-0.18
   (package
+    (inherit rust-glib-sys-0.19)
     (name "rust-glib-sys")
     (version "0.18.1")
     (source
@@ -1750,7 +1987,6 @@
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "164qhsfmlzd5mhyxs8123jzbdfldwxbikfpq5cysj3lddbmy4g06"))))
-    (build-system cargo-build-system)
     (arguments
      `(;; XXX: Tests are sensitive to the version of glib, even though
        ;; the library supports a wide range.  Skip for now.
@@ -1760,13 +1996,7 @@
         ("rust-system-deps" ,rust-system-deps-6))
        #:cargo-development-inputs
        (("rust-shell-words" ,rust-shell-words-1)
-        ("rust-tempfile" ,rust-tempfile-3))))
-    (native-inputs (list pkg-config))
-    (inputs (list glib))
-    (home-page "https://gtk-rs.org/")
-    (synopsis "FFI bindings to libglib-2.0")
-    (description "This package provides FFI bindings to libglib-2.0.")
-    (license license:expat)))
+        ("rust-tempfile" ,rust-tempfile-3))))))
 
 (define-public rust-glib-sys-0.17
   (package
@@ -1871,8 +2101,34 @@
        (("rust-shell-words" ,rust-shell-words-0.1)
         ("rust-tempfile" ,rust-tempfile-3))))))
 
+(define-public rust-gobject-sys-0.19
+  (package
+    (name "rust-gobject-sys")
+    (version "0.19.8")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "gobject-sys" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "17lb7dfbpcg8zchwlfbc08kckwf0a7d9n5ly3pyic13f5ljpws9f"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-glib-sys" ,rust-glib-sys-0.19)
+                       ("rust-libc" ,rust-libc-0.2)
+                       ("rust-system-deps" ,rust-system-deps-6))
+       #:cargo-development-inputs (("rust-shell-words" ,rust-shell-words-1)
+                                   ("rust-tempfile" ,rust-tempfile-3))))
+    (native-inputs (list pkg-config))
+    (inputs (list glib))
+    (home-page "https://gtk-rs.org/")
+    (synopsis "FFI bindings to libgobject-2.0")
+    (description "This package provides FFI bindings to libgobject-2.0.")
+    (license license:expat)))
+
 (define-public rust-gobject-sys-0.18
   (package
+    (inherit rust-gobject-sys-0.19)
     (name "rust-gobject-sys")
     (version "0.18.0")
     (source
@@ -1882,7 +2138,6 @@
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "0i6fhp3m6vs3wkzyc22rk2cqj68qvgddxmpaai34l72da5xi4l08"))))
-    (build-system cargo-build-system)
     (arguments
      `(#:tests? #f ; `G_TYPE_FUNDAMENTAL_MAX` constant mismatch with gcc
        #:cargo-inputs
@@ -1891,13 +2146,7 @@
         ("rust-system-deps" ,rust-system-deps-6))
        #:cargo-development-inputs
        (("rust-shell-words" ,rust-shell-words-1)
-        ("rust-tempfile" ,rust-tempfile-3))))
-    (native-inputs (list pkg-config))
-    (inputs (list glib))
-    (home-page "https://gtk-rs.org/")
-    (synopsis "FFI bindings to libgobject-2.0")
-    (description "This package provides FFI bindings to libgobject-2.0.")
-    (license license:expat)))
+        ("rust-tempfile" ,rust-tempfile-3))))))
 
 (define-public rust-gobject-sys-0.17
   (package
@@ -2766,8 +3015,35 @@ library.")
     (description "FFI bindings for libadwaita.")
     (license license:expat)))
 
+(define-public rust-pango-0.19
+  (package
+    (name "rust-pango")
+    (version "0.19.8")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "pango" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "1kffxkk7730csly86fkgja50k1184zj9lz49sv7qb0059233439z"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-gio" ,rust-gio-0.19)
+                       ("rust-glib" ,rust-glib-0.19)
+                       ("rust-libc" ,rust-libc-0.2)
+                       ("rust-pango-sys" ,rust-pango-sys-0.19))
+       #:cargo-development-inputs
+       (("rust-gir-format-check" ,rust-gir-format-check-0.1))))
+    (native-inputs (list pkg-config))
+    (inputs (list pango))
+    (home-page "https://gtk-rs.org/")
+    (synopsis "Rust bindings for the Pango library")
+    (description "This package provides Rust bindings for the Pango library.")
+    (license license:expat)))
+
 (define-public rust-pango-0.18
   (package
+    (inherit rust-pango-0.19)
     (name "rust-pango")
     (version "0.18.3")
     (source
@@ -2777,7 +3053,6 @@ library.")
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "1r5ygq7036sv7w32kp8yxr6vgggd54iaavh3yckanmq4xg0px8kw"))))
-    (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs (("rust-gio" ,rust-gio-0.18)
                        ("rust-glib" ,rust-glib-0.18)
@@ -2785,13 +3060,7 @@ library.")
                        ("rust-once-cell" ,rust-once-cell-1)
                        ("rust-pango-sys" ,rust-pango-sys-0.18))
        #:cargo-development-inputs
-       (("rust-gir-format-check" ,rust-gir-format-check-0.1))))
-    (native-inputs (list pkg-config))
-    (inputs (list pango))
-    (home-page "https://gtk-rs.org/")
-    (synopsis "Rust bindings for the Pango library")
-    (description "This package provides Rust bindings for the Pango library.")
-    (license license:expat)))
+       (("rust-gir-format-check" ,rust-gir-format-check-0.1))))))
 
 (define-public rust-pango-0.17
   (package
@@ -2920,21 +3189,21 @@ library.")
        #:cargo-development-inputs
        (("rust-gir-format-check" ,rust-gir-format-check-0.1))))))
 
-(define-public rust-pango-sys-0.18
+(define-public rust-pango-sys-0.19
   (package
     (name "rust-pango-sys")
-    (version "0.18.0")
+    (version "0.19.8")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "pango-sys" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "1iaxalcaaj59cl9n10svh4g50v8jrc1a36kd7n9yahx8j7ikfrs3"))))
+        (base32 "182bcd6255v5yvnskbhxnb6kwak240z7sn54si2b5h46l17xl0zz"))))
     (build-system cargo-build-system)
     (arguments
-     `(#:cargo-inputs (("rust-glib-sys" ,rust-glib-sys-0.18)
-                       ("rust-gobject-sys" ,rust-gobject-sys-0.18)
+     `(#:cargo-inputs (("rust-glib-sys" ,rust-glib-sys-0.19)
+                       ("rust-gobject-sys" ,rust-gobject-sys-0.19)
                        ("rust-libc" ,rust-libc-0.2)
                        ("rust-system-deps" ,rust-system-deps-6))
        #:cargo-development-inputs (("rust-shell-words" ,rust-shell-words-1)
@@ -2946,6 +3215,26 @@ library.")
     (description "This package provides FFI bindings to @code{libpango-1.0}.")
     (license license:expat)))
 
+(define-public rust-pango-sys-0.18
+  (package
+    (inherit rust-pango-sys-0.19)
+    (name "rust-pango-sys")
+    (version "0.18.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "pango-sys" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "1iaxalcaaj59cl9n10svh4g50v8jrc1a36kd7n9yahx8j7ikfrs3"))))
+    (arguments
+     `(#:cargo-inputs (("rust-glib-sys" ,rust-glib-sys-0.18)
+                       ("rust-gobject-sys" ,rust-gobject-sys-0.18)
+                       ("rust-libc" ,rust-libc-0.2)
+                       ("rust-system-deps" ,rust-system-deps-6))
+       #:cargo-development-inputs (("rust-shell-words" ,rust-shell-words-1)
+                                   ("rust-tempfile" ,rust-tempfile-3))))))
+
 (define-public rust-pango-sys-0.17
   (package
     (inherit rust-pango-sys-0.18)
@@ -3054,24 +3343,24 @@ library.")
        (("rust-shell-words" ,rust-shell-words-0.1)
         ("rust-tempfile" ,rust-tempfile-3))))))
 
-(define-public rust-pangocairo-0.18
+(define-public rust-pangocairo-0.19
   (package
     (name "rust-pangocairo")
-    (version "0.18.0")
+    (version "0.19.8")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "pangocairo" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "199qdgw5mf1vbqmslscy1qzz0szw2dcd21p6z61wzjngm64na0sp"))))
+        (base32 "1n8wrqy260zpfiifb2n10mbsv3kbrvxm1z7pv8b4w77c08yb9j74"))))
     (build-system cargo-build-system)
     (arguments
-     `(#:cargo-inputs (("rust-cairo-rs" ,rust-cairo-rs-0.18)
-                       ("rust-glib" ,rust-glib-0.18)
+     `(#:cargo-inputs (("rust-cairo-rs" ,rust-cairo-rs-0.19)
+                       ("rust-glib" ,rust-glib-0.19)
                        ("rust-libc" ,rust-libc-0.2)
-                       ("rust-pango" ,rust-pango-0.18)
-                       ("rust-pangocairo-sys" ,rust-pangocairo-sys-0.18))
+                       ("rust-pango" ,rust-pango-0.19)
+                       ("rust-pangocairo-sys" ,rust-pangocairo-sys-0.19))
        #:cargo-development-inputs
        (("rust-gir-format-check" ,rust-gir-format-check-0.1))))
     (native-inputs (list pkg-config))
@@ -3082,6 +3371,27 @@ library.")
      "This package provides Rust bindings for the @code{PangoCairo} library.")
     (license license:expat)))
 
+(define-public rust-pangocairo-0.18
+  (package
+    (inherit rust-pangocairo-0.19)
+    (name "rust-pangocairo")
+    (version "0.18.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "pangocairo" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "199qdgw5mf1vbqmslscy1qzz0szw2dcd21p6z61wzjngm64na0sp"))))
+    (arguments
+     `(#:cargo-inputs (("rust-cairo-rs" ,rust-cairo-rs-0.18)
+                       ("rust-glib" ,rust-glib-0.18)
+                       ("rust-libc" ,rust-libc-0.2)
+                       ("rust-pango" ,rust-pango-0.18)
+                       ("rust-pangocairo-sys" ,rust-pangocairo-sys-0.18))
+       #:cargo-development-inputs
+       (("rust-gir-format-check" ,rust-gir-format-check-0.1))))))
+
 (define-public rust-pangocairo-0.17
   (package
     (inherit rust-pangocairo-0.18)
@@ -3133,8 +3443,38 @@ library.")
        #:cargo-development-inputs
        (("rust-gir-format-check" ,rust-gir-format-check-0.1))))))
 
+(define-public rust-pangocairo-sys-0.19
+  (package
+    (name "rust-pangocairo-sys")
+    (version "0.19.8")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "pangocairo-sys" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "1myq3p8qrd63nlacd4sba66c17lfqgvzv8mpyn2rg1rqhi4h86ar"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-cairo-sys-rs" ,rust-cairo-sys-rs-0.19)
+                       ("rust-glib-sys" ,rust-glib-sys-0.19)
+                       ("rust-libc" ,rust-libc-0.2)
+                       ("rust-pango-sys" ,rust-pango-sys-0.19)
+                       ("rust-system-deps" ,rust-system-deps-6))
+       #:cargo-development-inputs (("rust-shell-words" ,rust-shell-words-1)
+                                   ("rust-tempfile" ,rust-tempfile-3))))
+    (native-inputs (list pkg-config))
+    (inputs
+     ;; XXX: Should these be propagated from their respective crates?
+     (list cairo glib pango))
+    (home-page "https://gtk-rs.org/")
+    (synopsis "FFI bindings to PangoCairo")
+    (description "This package provides FFI bindings to @code{PangoCairo}.")
+    (license license:expat)))
+
 (define-public rust-pangocairo-sys-0.18
   (package
+    (inherit rust-pangocairo-sys-0.19)
     (name "rust-pangocairo-sys")
     (version "0.18.0")
     (source
@@ -3144,7 +3484,6 @@ library.")
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "0cw82261ixgr9xw549rx11w74h0wz4lw0pqxxir7lzm3fvv8yg7w"))))
-    (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs (("rust-cairo-sys-rs" ,rust-cairo-sys-rs-0.18)
                        ("rust-glib-sys" ,rust-glib-sys-0.18)
@@ -3152,15 +3491,7 @@ library.")
                        ("rust-pango-sys" ,rust-pango-sys-0.18)
                        ("rust-system-deps" ,rust-system-deps-6))
        #:cargo-development-inputs (("rust-shell-words" ,rust-shell-words-1)
-                                   ("rust-tempfile" ,rust-tempfile-3))))
-    (native-inputs (list pkg-config))
-    (inputs
-     ;; XXX: Should these be propagated from their respective crates?
-     (list cairo glib pango))
-    (home-page "https://gtk-rs.org/")
-    (synopsis "FFI bindings to libgtk-3")
-    (description "This package provides FFI bindings to @code{PangoCairo}.")
-    (license license:expat)))
+                                   ("rust-tempfile" ,rust-tempfile-3))))))
 
 (define-public rust-pangocairo-sys-0.17
   (package

gnu/packages/crates-tls.scm

@@ -753,6 +753,31 @@ targets")
 implementation.")
     (license (list license:expat license:asl2.0))))
 
+(define-public rust-oid-0.2
+  (package
+    (name "rust-oid")
+    (version "0.2.1")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "oid" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "1hh61lx2kr0ca2rvkhf5j94asxxvb6pfwfxm06hdn4w8b4y906cw"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-serde" ,rust-serde-1))
+       #:cargo-development-inputs (("rust-bincode" ,rust-bincode-1)
+                                   ("rust-serde-xml-rs" ,rust-serde-xml-rs-0.4)
+                                   ("rust-serde-derive" ,rust-serde-derive-1))))
+    (home-page "https://labs.unnecessary.engineering/oid")
+    (synopsis
+     "Library for building, parsing, and formating Object Identifiers (OIDs)")
+    (description
+     "This package provides a Rust-native library for building, parsing, and
+formating Object Identifiers (OIDs).")
+    (license (list license:expat license:asl2.0))))
+
 (define-public rust-oid-registry-0.6
   (package
     (name "rust-oid-registry")
@@ -820,6 +845,92 @@ grammars and BER/DER encodings, for example.")
      `(#:skip-build? #t
        #:cargo-inputs (("rust-der-parser" ,rust-der-parser-6))))))
 
+(define-public rust-picky-asn1-0.8
+  (package
+    (name "rust-picky-asn1")
+    (version "0.8.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "picky-asn1" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "04mjb35z1g3dny8hjj6893fh8g6pskyhifcq58gf4sy16c7ylpi9"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:tests? #f      ; use of undeclared crate or module `picky_asn1_der`
+       #:cargo-inputs (("rust-chrono" ,rust-chrono-0.4)
+                       ("rust-oid" ,rust-oid-0.2)
+                       ("rust-serde" ,rust-serde-1)
+                       ("rust-serde-bytes" ,rust-serde-bytes-0.11)
+                       ("rust-time" ,rust-time-0.3)
+                       ("rust-zeroize" ,rust-zeroize-1))))
+    (home-page "https://github.com/Devolutions/picky-rs")
+    (synopsis "Provide ASN.1 simple types")
+    (description "This package provides ASN.1 simple types.")
+    (license (list license:expat license:asl2.0))))
+
+(define-public rust-picky-asn1-der-0.4
+  (package
+    (name "rust-picky-asn1-der")
+    (version "0.4.1")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "picky-asn1-der" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0gvrhb2nx17cnigsvbvjq69xg0zy27iabglknfnjvm1nkqx8gxsx"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-lazy-static" ,rust-lazy-static-1)
+                       ("rust-picky-asn1" ,rust-picky-asn1-0.8)
+                       ("rust-serde" ,rust-serde-1)
+                       ("rust-serde-bytes" ,rust-serde-bytes-0.11))
+       #:cargo-development-inputs
+       (("rust-base64" ,rust-base64-0.21)
+        ("rust-num-bigint-dig" ,rust-num-bigint-dig-0.8)
+        ("rust-oid" ,rust-oid-0.2)
+        ("rust-pretty-assertions" ,rust-pretty-assertions-1)
+        ("rust-serde-bytes" ,rust-serde-bytes-0.11))))
+    (home-page "https://github.com/Devolutions/picky-rs")
+    (synopsis "ASN.1-DER subset for serde")
+    (description "This package provides an ASN.1-DER subset for serde.")
+    (license (list license:expat license:asl2.0))))
+
+(define-public rust-picky-asn1-x509-0.12
+  (package
+    (name "rust-picky-asn1-x509")
+    (version "0.12.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "picky-asn1-x509" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0232vn4i6x2w1hzysn983an6x0fqzak1ix0h4grryjb83bvj0prc"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:tests? #f      ; Not all files included.
+       #:cargo-inputs (("rust-base64" ,rust-base64-0.21)
+                       ("rust-num-bigint-dig" ,rust-num-bigint-dig-0.8)
+                       ("rust-oid" ,rust-oid-0.2)
+                       ("rust-picky-asn1" ,rust-picky-asn1-0.8)
+                       ("rust-picky-asn1-der" ,rust-picky-asn1-der-0.4)
+                       ("rust-serde" ,rust-serde-1)
+                       ("rust-widestring" ,rust-widestring-1)
+                       ("rust-zeroize" ,rust-zeroize-1))
+       #:cargo-development-inputs
+       (("rust-expect-test" ,rust-expect-test-1)
+        ("rust-hex" ,rust-hex-0.4)
+        ("rust-num-bigint-dig" ,rust-num-bigint-dig-0.8)
+        ("rust-pretty-assertions" ,rust-pretty-assertions-1))))
+    (home-page "https://github.com/Devolutions/picky-rs")
+    (synopsis "Provides ASN1 types defined by X.509 related RFCs")
+    (description
+     "This package provides ASN1 types defined by X.509 related RFCs.")
+    (license (list license:expat license:asl2.0))))
+
 (define-public rust-rcgen-0.12
   (package
     (name "rust-rcgen")

gnu/packages/crates-web.scm

@@ -2812,14 +2812,14 @@ transfer coding.")
 (define-public rust-hickory-client-0.24
   (package
     (name "rust-hickory-client")
-    (version "0.24.0")
+    (version "0.24.1")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "hickory-client" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "0bj6g69h86d7mbclrwaj7cgl1plr6pvllv8qn69xmpgh9h90hgkz"))))
+        (base32 "0m8vnqgqg9vaanpphqccm9p8iqc0bm2kc0kvhmx9by6q10xnifds"))))
     (build-system cargo-build-system)
     (arguments
      `(#:cargo-test-flags
@@ -2860,14 +2860,14 @@ into other software that also use those libraries.")
 (define-public rust-hickory-proto-0.24
   (package
     (name "rust-hickory-proto")
-    (version "0.24.0")
+    (version "0.24.1")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "hickory-proto" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "1kxvdzmwwi1d6wsp9bcs91ipmwxcyhpwbvz3an9h0q28ryy6y6h9"))))
+        (base32 "04p5jqp4mb1cp0vxgfwqlgrgpn45xjcsjss3g92ddw724228ns87"))))
     (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs (("rust-async-trait" ,rust-async-trait-0.1)
@@ -2925,14 +2925,14 @@ DNS protocol library for all Hickory DNS projects.")
 (define-public rust-hickory-recursor-0.24
   (package
     (name "rust-hickory-recursor")
-    (version "0.24.0")
+    (version "0.24.1")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "hickory-recursor" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "146ifrml22hjydrw16qgfw32kv3v9wvvl4dqh45pg6fymxvw8xgi"))))
+        (base32 "1a44l02v2ymxj10zkf46iak4y872zgwi9wyjp0710655jp1wgpg2"))))
     (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs (("rust-async-recursion" ,rust-async-recursion-1)
@@ -2968,14 +2968,14 @@ performing recursive lookups.")
 (define-public rust-hickory-resolver-0.24
   (package
     (name "rust-hickory-resolver")
-    (version "0.24.0")
+    (version "0.24.1")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "hickory-resolver" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "1s3486qczv9gaw8dap06c0bwb2bpqm23a0ihj169hsjf2qhz1f1m"))))
+        (base32 "0hzjn5wpchljcsk51c1156rk3f15iinmwh7h9hjqzjbmm8ipyx98"))))
     (build-system cargo-build-system)
     (arguments
      `(#:cargo-test-flags
@@ -2996,25 +2996,25 @@ performing recursive lookups.")
          "--skip=resolver::tests::test_lookup"
          "--skip=system_conf::unix::tests::test_read_resolv_conf")
          #:cargo-inputs (("rust-cfg-if" ,rust-cfg-if-1)
-                       ("rust-futures-util" ,rust-futures-util-0.3)
-                       ("rust-hickory-proto" ,rust-hickory-proto-0.24)
-                       ("rust-ipconfig" ,rust-ipconfig-0.3)
-                       ("rust-lru-cache" ,rust-lru-cache-0.1)
-                       ("rust-once-cell" ,rust-once-cell-1)
-                       ("rust-parking-lot" ,rust-parking-lot-0.12)
-                       ("rust-rand" ,rust-rand-0.8)
-                       ("rust-resolv-conf" ,rust-resolv-conf-0.7)
-                       ("rust-rustls" ,rust-rustls-0.21)
-                       ("rust-rustls-native-certs" ,rust-rustls-native-certs-0.6)
-                       ("rust-serde" ,rust-serde-1)
-                       ("rust-smallvec" ,rust-smallvec-1)
-                       ("rust-thiserror" ,rust-thiserror-1)
-                       ("rust-tokio" ,rust-tokio-1)
-                       ("rust-tokio-native-tls" ,rust-tokio-native-tls-0.3)
-                       ("rust-tokio-openssl" ,rust-tokio-openssl-0.6)
-                       ("rust-tokio-rustls" ,rust-tokio-rustls-0.24)
-                       ("rust-tracing" ,rust-tracing-0.1)
-                       ("rust-webpki-roots" ,rust-webpki-roots-0.25))
+                         ("rust-futures-util" ,rust-futures-util-0.3)
+                         ("rust-hickory-proto" ,rust-hickory-proto-0.24)
+                         ("rust-ipconfig" ,rust-ipconfig-0.3)
+                         ("rust-lru-cache" ,rust-lru-cache-0.1)
+                         ("rust-once-cell" ,rust-once-cell-1)
+                         ("rust-parking-lot" ,rust-parking-lot-0.12)
+                         ("rust-rand" ,rust-rand-0.8)
+                         ("rust-resolv-conf" ,rust-resolv-conf-0.7)
+                         ("rust-rustls" ,rust-rustls-0.21)
+                         ("rust-rustls-native-certs" ,rust-rustls-native-certs-0.6)
+                         ("rust-serde" ,rust-serde-1)
+                         ("rust-smallvec" ,rust-smallvec-1)
+                         ("rust-thiserror" ,rust-thiserror-1)
+                         ("rust-tokio" ,rust-tokio-1)
+                         ("rust-tokio-native-tls" ,rust-tokio-native-tls-0.3)
+                         ("rust-tokio-openssl" ,rust-tokio-openssl-0.6)
+                         ("rust-tokio-rustls" ,rust-tokio-rustls-0.24)
+                         ("rust-tracing" ,rust-tracing-0.1)
+                         ("rust-webpki-roots" ,rust-webpki-roots-0.25))
        #:cargo-development-inputs
        (("rust-futures-executor" ,rust-futures-executor-0.3)
         ("rust-tokio" ,rust-tokio-1)
@@ -3032,14 +3032,14 @@ intended to be a high-level library for any DNS record resolution, see
 (define-public rust-hickory-server-0.24
   (package
     (name "rust-hickory-server")
-    (version "0.24.0")
+    (version "0.24.1")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "hickory-server" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "1dbwsrmxgf9nxkn3cp5fpjw96wywrzihbirjax25dd6wqidv9fsg"))))
+        (base32 "0dqcwk7vy87517l3v7j109fjg8jk46isjwbwdkdkz6vbalyf9q4v"))))
     (build-system cargo-build-system)
     (arguments
      `(#:cargo-test-flags
@@ -3081,7 +3081,7 @@ intended to be a high-level library for any DNS record resolution, see
                        ("rust-hickory-resolver" ,rust-hickory-resolver-0.24)
                        ("rust-http" ,rust-http-0.2)
                        ("rust-openssl" ,rust-openssl-0.10)
-                       ("rust-rusqlite" ,rust-rusqlite-0.29)
+                       ("rust-rusqlite" ,rust-rusqlite-0.31)
                        ("rust-rustls" ,rust-rustls-0.21)
                        ("rust-serde" ,rust-serde-1)
                        ("rust-thiserror" ,rust-thiserror-1)
@@ -4685,14 +4685,14 @@ in the Rust programming language.")
   (package
     (inherit rust-reqwest-0.12)
     (name "rust-reqwest")
-    (version "0.11.23")
+    (version "0.11.27")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "reqwest" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "0hgvzb7r46656r9vqhl5qk1kbr2xzjb91yr2cb321160ka6sxc9p"))))
+        (base32 "0qjary4hpplpgdi62d2m0xvbn6lnzckwffm0rgkm2x51023m6ryx"))))
     (arguments
      `(#:cargo-test-flags
        '("--release" "--"
@@ -4707,8 +4707,8 @@ in the Rust programming language.")
        (("rust-async-compression" ,rust-async-compression-0.4)
         ("rust-base64" ,rust-base64-0.21)
         ("rust-bytes" ,rust-bytes-1)
-        ("rust-cookie" ,rust-cookie-0.16)
-        ("rust-cookie-store" ,rust-cookie-store-0.16)
+        ("rust-cookie" ,rust-cookie-0.17)
+        ("rust-cookie-store" ,rust-cookie-store-0.20)
         ("rust-encoding-rs" ,rust-encoding-rs-0.8)
         ("rust-futures-channel" ,rust-futures-channel-0.3)
         ("rust-futures-core" ,rust-futures-core-0.3)
@@ -4716,6 +4716,7 @@ in the Rust programming language.")
         ("rust-h2" ,rust-h2-0.3)
         ("rust-h3" ,rust-h3-0.0.3)
         ("rust-h3-quinn" ,rust-h3-quinn-0.0.4)
+        ("rust-hickory-resolver" ,rust-hickory-resolver-0.24)
         ("rust-http" ,rust-http-0.2)
         ("rust-http-body" ,rust-http-body-0.4)
         ("rust-hyper" ,rust-hyper-0.14)
@@ -4737,6 +4738,7 @@ in the Rust programming language.")
         ("rust-serde" ,rust-serde-1)
         ("rust-serde-json" ,rust-serde-json-1)
         ("rust-serde-urlencoded" ,rust-serde-urlencoded-0.7)
+        ("rust-sync-wrapper" ,rust-sync-wrapper-0.1)
         ("rust-system-configuration" ,rust-system-configuration-0.5)
         ("rust-tokio" ,rust-tokio-1)
         ("rust-tokio-native-tls" ,rust-tokio-native-tls-0.3)
@@ -4744,18 +4746,18 @@ in the Rust programming language.")
         ("rust-tokio-socks" ,rust-tokio-socks-0.5)
         ("rust-tokio-util" ,rust-tokio-util-0.7)
         ("rust-tower-service" ,rust-tower-service-0.3)
-        ("rust-trust-dns-resolver" ,rust-trust-dns-resolver-0.23)
         ("rust-url" ,rust-url-2)
         ("rust-wasm-bindgen" ,rust-wasm-bindgen-0.2)
         ("rust-wasm-bindgen-futures" ,rust-wasm-bindgen-futures-0.4)
-        ("rust-wasm-streams" ,rust-wasm-streams-0.3)
+        ("rust-wasm-streams" ,rust-wasm-streams-0.4)
         ("rust-web-sys" ,rust-web-sys-0.3)
         ("rust-webpki-roots" ,rust-webpki-roots-0.25)
         ("rust-winreg" ,rust-winreg-0.50))
        #:cargo-development-inputs
        (("rust-brotli" ,rust-brotli-3)
         ("rust-doc-comment" ,rust-doc-comment-0.3)
-        ("rust-env-logger" ,rust-env-logger-0.8)
+        ("rust-env-logger" ,rust-env-logger-0.10)
+        ("rust-futures-util" ,rust-futures-util-0.3)
         ("rust-hyper" ,rust-hyper-0.14)
         ("rust-libflate" ,rust-libflate-1)
         ("rust-serde" ,rust-serde-1)

gnu/packages/crates-windows.scm

@@ -407,6 +407,26 @@ network configuration for Windows.")
 kernel32.")
     (license license:expat)))
 
+(define-public rust-known-folders-1
+  (package
+    (name "rust-known-folders")
+    (version "1.2.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "known-folders" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0z4jlxfqv1jqp9g5m1dr23zpjpl5kpbqgdqfk8jnxd681isa3ndp"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-windows-sys" ,rust-windows-sys-0.59))))
+    (home-page "https://github.com/artichoke/known-folders-rs")
+    (synopsis "Safe wrapper around the Known Folders API on Windows")
+    (description
+     "This package provides a safe wrapper around the Known Folders API on Windows.")
+    (license (list license:asl2.0 license:expat))))
+
 (define-public rust-miow-0.6
   (package
     (name "rust-miow")
@@ -1309,8 +1329,32 @@ for Rust.")
      "Contains function definitions for the Windows API library ws2_32.")
     (license license:expat)))
 
+(define-public rust-windows-0.58
+  (package
+    (name "rust-windows")
+    (version "0.58.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "windows" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "1dkjj94b0gn91nn1n22cvm4afsj98f5qrhcl3112v6f4jcfx816x"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-windows-core" ,rust-windows-core-0.58)
+                       ("rust-windows-targets" ,rust-windows-targets-0.52))))
+    (home-page "https://github.com/microsoft/windows-rs")
+    (synopsis "Rust for Windows")
+    (description "The windows crate lets you call any Windows API past,
+present, and future using code generated on the fly directly from the metadata
+describing the API and right into your Rust package where you can call them as
+if they were just another Rust module.")
+    (license (list license:expat license:asl2.0))))
+
 (define-public rust-windows-0.52
   (package
+    (inherit rust-windows-0.58)
     (name "rust-windows")
     (version "0.52.0")
     (source
@@ -1325,14 +1369,7 @@ for Rust.")
      `(#:cargo-inputs (("rust-windows-core" ,rust-windows-core-0.52)
                        ("rust-windows-implement" ,rust-windows-implement-0.52)
                        ("rust-windows-interface" ,rust-windows-interface-0.52)
-                       ("rust-windows-targets" ,rust-windows-targets-0.52))))
-    (home-page "https://github.com/microsoft/windows-rs")
-    (synopsis "Rust for Windows")
-    (description "The windows crate lets you call any Windows API past,
-present, and future using code generated on the fly directly from the metadata
-describing the API and right into your Rust package where you can call them as
-if they were just another Rust module.")
-    (license (list license:expat license:asl2.0))))
+                       ("rust-windows-targets" ,rust-windows-targets-0.52))))))
 
 (define-public rust-windows-0.48
   (package
@@ -1454,14 +1491,14 @@ if they were just another Rust module.")
 (define-public rust-windows-aarch64-gnullvm-0.52
   (package
     (name "rust-windows-aarch64-gnullvm")
-    (version "0.52.0")
+    (version "0.52.6")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "windows_aarch64_gnullvm" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "1shmn1kbdc0bpphcxz0vlph96bxz0h1jlmh93s9agf2dbpin8xyb"))
+        (base32 "1lrcq38cr2arvmz19v32qaggvj8bh1640mdm9c2fr877h0hn591j"))
        (snippet
         '(delete-file "lib/libwindows.0.52.0.a"))))
     (build-system cargo-build-system)
@@ -1508,14 +1545,14 @@ if they were just another Rust module.")
 (define-public rust-windows-aarch64-msvc-0.52
   (package
     (name "rust-windows-aarch64-msvc")
-    (version "0.52.0")
+    (version "0.52.6")
     (source (origin
               (method url-fetch)
               (uri (crate-uri "windows_aarch64_msvc" version))
               (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
-                "1vvmy1ypvzdvxn9yf0b8ygfl85gl2gpcyvsvqppsmlpisil07amv"))
+                "0sfl0nysnz32yyfh773hpi49b1q700ah6y7sacmjbqjjn5xjmv09"))
               (snippet
                '(delete-file "lib/windows.0.52.0.lib"))))
     (build-system cargo-build-system)
@@ -1616,8 +1653,33 @@ crate.")
                (base32
                 "1hpk0n2z0jzzvwlvs98b75sa4q920953nqfc119rv19nwm0mlsaj"))))))
 
+(define-public rust-windows-bindgen-0.56
+  (package
+    (name "rust-windows-bindgen")
+    (version "0.56.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "windows-bindgen" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0inv2w78qv6375ndrgm9vilkgscwak80igz8vkf7zw8c6fk3x3m2"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-proc-macro2" ,rust-proc-macro2-1)
+                       ("rust-rayon" ,rust-rayon-1)
+                       ("rust-serde" ,rust-serde-1)
+                       ("rust-serde-json" ,rust-serde-json-1)
+                       ("rust-syn" ,rust-syn-2)
+                       ("rust-windows-metadata" ,rust-windows-metadata-0.56))))
+    (home-page "https://github.com/microsoft/windows-rs")
+    (synopsis "Windows metadata compiler")
+    (description "This package provides Windows metadata compiler.")
+    (license (list license:expat license:asl2.0))))
+
 (define-public rust-windows-bindgen-0.52
   (package
+    (inherit rust-windows-bindgen-0.56)
     (name "rust-windows-bindgen")
     (version "0.52.0")
     (source
@@ -1627,16 +1689,11 @@ crate.")
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "071lrbhbvh0l8m1wf5000xxmcry1gjpqdxcqm23qmss9d05zn3lp"))))
-    (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs (("rust-proc-macro2" ,rust-proc-macro2-1)
                        ("rust-rayon" ,rust-rayon-1)
                        ("rust-syn" ,rust-syn-2)
-                       ("rust-windows-metadata" ,rust-windows-metadata-0.52))))
-    (home-page "https://github.com/microsoft/windows-rs")
-    (synopsis "Windows metadata compiler")
-    (description "Windows metadata compiler.")
-    (license (list license:expat license:asl2.0))))
+                       ("rust-windows-metadata" ,rust-windows-metadata-0.52))))))
 
 (define-public rust-windows-bindgen-0.51
   (package
@@ -1656,8 +1713,33 @@ crate.")
                        ("rust-syn" ,rust-syn-2)
                        ("rust-windows-metadata" ,rust-windows-metadata-0.51))))))
 
+(define-public rust-windows-core-0.58
+  (package
+    (name "rust-windows-core")
+    (version "0.58.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "windows-core" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "16czypy425jzmiys4yb3pwsh7cm6grxn9kjp889iqnf2r17d99kb"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:skip-build? #t
+       #:cargo-inputs (("rust-windows-implement" ,rust-windows-implement-0.58)
+                       ("rust-windows-interface" ,rust-windows-interface-0.58)
+                       ("rust-windows-result" ,rust-windows-result-0.2)
+                       ("rust-windows-strings" ,rust-windows-strings-0.1)
+                       ("rust-windows-targets" ,rust-windows-targets-0.52))))
+    (home-page "https://github.com/microsoft/windows-rs")
+    (synopsis "Rust for Windows")
+    (description "This package provides Rust for Windows.")
+    (license (list license:expat license:asl2.0))))
+
 (define-public rust-windows-core-0.52
   (package
+    (inherit rust-windows-core-0.58)
     (name "rust-windows-core")
     (version "0.52.0")
     (source
@@ -1678,14 +1760,14 @@ crate.")
 (define-public rust-windows-i686-gnu-0.52
   (package
     (name "rust-windows-i686-gnu")
-    (version "0.52.0")
+    (version "0.52.6")
     (source (origin
               (method url-fetch)
               (uri (crate-uri "windows_i686_gnu" version))
               (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
-                "04zkglz4p3pjsns5gbz85v4s5aw102raz4spj4b0lmm33z5kg1m2"))
+                "02zspglbykh1jh9pi7gn8g1f97jh1rrccni9ivmrfbl0mgamm6wf"))
               (snippet
                '(delete-file "lib/libwindows.0.52.0.a"))))
     (build-system cargo-build-system)
@@ -1786,17 +1868,36 @@ crate.")
                (base32
                 "12hx7qpsjg9p7jggfcplqa3mf1mzr7k7s5ybzqwg1zmg4fn2aizm"))))))
 
+(define-public rust-windows-i686-gnullvm-0.52
+  (package
+    (name "rust-windows-i686-gnullvm")
+    (version "0.52.6")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "windows_i686_gnullvm" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0rpdx1537mw6slcpqa0rm3qixmsb79nbhqy5fsm3q2q9ik9m5vhf"))
+       (snippet
+        '(delete-file "lib/libwindows.0.52.0.a"))))
+    (build-system cargo-build-system)
+    (home-page "https://github.com/microsoft/windows-rs")
+    (synopsis "Import lib for Windows")
+    (description "This package provides Import lib for Windows.")
+    (license (list license:expat license:asl2.0))))
+
 (define-public rust-windows-i686-msvc-0.52
   (package
     (name "rust-windows-i686-msvc")
-    (version "0.52.0")
+    (version "0.52.6")
     (source (origin
               (method url-fetch)
               (uri (crate-uri "windows_i686_msvc" version))
               (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
-                "16kvmbvx0vr0zbgnaz6nsks9ycvfh5xp05bjrhq65kj623iyirgz"))
+                "0rkcqmp4zzmfvrrrx01260q3xkpzi6fzi2x2pgdcdry50ny4h294"))
               (snippet
                '(delete-file "lib/windows.0.52.0.lib"))))
     (build-system cargo-build-system)
@@ -1896,8 +1997,33 @@ crate.")
                (base32
                 "0r0z8s1wcdwd20azsdfilf2a6bz68xkavl990wy64hyc8f51bmai"))))))
 
+(define-public rust-windows-implement-0.58
+  (package
+    (name "rust-windows-implement")
+    (version "0.58.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "windows-implement" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "16spr5z65z21qyv379rv2mb1s5q2i9ibd1p2pkn0dr9qr535pg9b"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs
+       (("rust-proc-macro2" ,rust-proc-macro2-1)
+         ("rust-quote" ,rust-quote-1)
+         ("rust-syn" ,rust-syn-2))))
+    (home-page "https://github.com/microsoft/windows-rs")
+    (synopsis "The implement macro for the windows crate")
+    (description
+     "This package provides The @code{implement} macro for the
+Windows crate.")
+    (license (list license:expat license:asl2.0))))
+
 (define-public rust-windows-implement-0.52
   (package
+    (inherit rust-windows-implement-0.58)
     (name "rust-windows-implement")
     (version "0.52.0")
     (source
@@ -1911,12 +2037,7 @@ crate.")
     (arguments
      `(#:cargo-inputs (("rust-proc-macro2" ,rust-proc-macro2-1)
                        ("rust-quote" ,rust-quote-1)
-                       ("rust-syn" ,rust-syn-2))))
-    (home-page "https://github.com/microsoft/windows-rs")
-    (synopsis "The implement macro for the windows crate")
-    (description "This package provides the @code{implement} macro for the
-windows crate.")
-    (license (list license:expat license:asl2.0))))
+                       ("rust-syn" ,rust-syn-2))))))
 
 (define-public rust-windows-implement-0.48
   (package
@@ -2007,8 +2128,32 @@ windows crate.")
        (("rust-syn" ,rust-syn-1)
         ("rust-windows-tokens" ,rust-windows-tokens-0.32))))))
 
+(define-public rust-windows-interface-0.58
+  (package
+    (name "rust-windows-interface")
+    (version "0.58.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "windows-interface" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "059mxmfvx3x88q74ms0qlxmj2pnidmr5mzn60hakn7f95m34qg05"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-proc-macro2" ,rust-proc-macro2-1)
+                       ("rust-quote" ,rust-quote-1)
+                       ("rust-syn" ,rust-syn-2))))
+    (home-page "https://github.com/microsoft/windows-rs")
+    (synopsis "The interface macro for the Windows crate")
+    (description
+     "This package provides the interface macro for the Windows 
+crate.")
+    (license (list license:expat license:asl2.0))))
+
 (define-public rust-windows-interface-0.52
   (package
+    (inherit rust-windows-interface-0.58)
     (name "rust-windows-interface")
     (version "0.52.0")
     (source
@@ -2018,16 +2163,10 @@ windows crate.")
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "1la254wzd8qlbxplvb667z5mwdh9jngg1qyhxg6fx9wm00pc73cx"))))
-    (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs (("rust-proc-macro2" ,rust-proc-macro2-1)
                        ("rust-quote" ,rust-quote-1)
-                       ("rust-syn" ,rust-syn-2))))
-    (home-page "https://github.com/microsoft/windows-rs")
-    (synopsis "The interface macro for the windows crate")
-    (description "This package provides the interface macro for the windows
-crate.")
-    (license (list license:expat license:asl2.0))))
+                       ("rust-syn" ,rust-syn-2))))))
 
 (define-public rust-windows-interface-0.48
   (package
@@ -2097,8 +2236,26 @@ crate.")
        (sha256
         (base32 "00h56znmak3p8bh28y3s48m5zv6q7dn40vnvf3dzf0sz5rszrym2"))))))
 
+(define-public rust-windows-metadata-0.56
+  (package
+    (name "rust-windows-metadata")
+    (version "0.56.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "windows-metadata" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0d1vizbp6b1wjh3qnjrh120w1iwqal3lfj52wdac847zgy1gg4rr"))))
+    (build-system cargo-build-system)
+    (home-page "https://github.com/microsoft/windows-rs")
+    (synopsis "Windows metadata reader")
+    (description "This package provides Windows metadata reader.")
+    (license (list license:expat license:asl2.0))))
+
 (define-public rust-windows-metadata-0.52
   (package
+    (inherit rust-windows-metadata-0.56)
     (name "rust-windows-metadata")
     (version "0.52.0")
     (source
@@ -2107,12 +2264,7 @@ crate.")
        (uri (crate-uri "windows-metadata" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "1vz49s2mm74fmjabh3kxxhzbz16ys41b78jgi6xwssp2069db3r1"))))
-    (build-system cargo-build-system)
-    (home-page "https://github.com/microsoft/windows-rs")
-    (synopsis "Windows metadata reader")
-    (description "Windows metadata reader.")
-    (license (list license:expat license:asl2.0))))
+        (base32 "1vz49s2mm74fmjabh3kxxhzbz16ys41b78jgi6xwssp2069db3r1"))))))
 
 (define-public rust-windows-metadata-0.51
   (package
@@ -2127,8 +2279,71 @@ crate.")
        (sha256
         (base32 "03h0c6qs1yyl0z69p4k1hdq636j868qdxnri1dy47nprjvckacbm"))))))
 
+(define-public rust-windows-result-0.2
+  (package
+    (name "rust-windows-result")
+    (version "0.2.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "windows-result" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "03mf2z1xcy2slhhsm15z24p76qxgm2m74xdjp8bihyag47c4640x"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-windows-targets" ,rust-windows-targets-0.52))))
+    (home-page "https://github.com/microsoft/windows-rs")
+    (synopsis "Windows error handling")
+    (description "This package provides Windows error handling.")
+    (license (list license:expat license:asl2.0))))
+
+(define-public rust-windows-strings-0.1
+  (package
+    (name "rust-windows-strings")
+    (version "0.1.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "windows-strings" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "042dxvi3133f7dyi2pgcvknwkikk47k8bddwxbq5s0l6qhjv3nac"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-windows-result" ,rust-windows-result-0.2)
+                       ("rust-windows-targets" ,rust-windows-targets-0.52))))
+    (home-page "https://github.com/microsoft/windows-rs")
+    (synopsis "Rust for Windows strings provides common string types")
+    (description "This package provides common string types when using
+Rust for Windows.")
+    (license (list license:expat license:asl2.0))))
+
+(define-public rust-windows-sys-0.59
+  (package
+    (name "rust-windows-sys")
+    (version "0.59.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "windows-sys" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0fw5672ziw8b3zpmnbp9pdv1famk74f1l9fcbc3zsrzdg56vqf0y"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-windows-targets" ,rust-windows-targets-0.52))))
+    (home-page "https://github.com/microsoft/windows-rs")
+    (synopsis "Rust for Windows")
+    (description "The windows crate lets you call any Windows API past,
+present, and future using code generated on the fly directly from the metadata
+describing the API and right into your Rust package where you can call them as
+if they were just another Rust module.")
+    (license (list license:expat license:asl2.0))))
+
 (define-public rust-windows-sys-0.52
   (package
+    (inherit rust-windows-sys-0.59)
     (name "rust-windows-sys")
     (version "0.52.0")
     (source (origin
@@ -2138,17 +2353,9 @@ crate.")
               (sha256
                (base32
                 "0gd3v4ji88490zgb6b5mq5zgbvwv7zx1ibn8v3x83rwcdbryaar8"))))
-    (build-system cargo-build-system)
     (arguments
      `(#:skip-build? #t
-       #:cargo-inputs (("rust-windows-targets" ,rust-windows-targets-0.52))))
-    (home-page "https://github.com/microsoft/windows-rs")
-    (synopsis "Rust for Windows")
-    (description "The windows crate lets you call any Windows API past,
-present, and future using code generated on the fly directly from the metadata
-describing the API and right into your Rust package where you can call them as
-if they were just another Rust module.")
-    (license (list license:expat license:asl2.0))))
+       #:cargo-inputs (("rust-windows-targets" ,rust-windows-targets-0.52))))))
 
 (define-public rust-windows-sys-0.48
   (package
@@ -2289,20 +2496,21 @@ if they were just another Rust module.")
 (define-public rust-windows-targets-0.52
   (package
     (name "rust-windows-targets")
-    (version "0.52.0")
+    (version "0.52.6")
     (source (origin
               (method url-fetch)
               (uri (crate-uri "windows-targets" version))
               (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
-                "1kg7a27ynzw8zz3krdgy6w5gbqcji27j1sz4p7xk2j5j8082064a"))))
+                "0wwrx625nwlfp7k93r2rra568gad1mwd888h1jwnl0vfg5r4ywlv"))))
     (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs
        (("rust-windows-aarch64-gnullvm" ,rust-windows-aarch64-gnullvm-0.52)
         ("rust-windows-aarch64-msvc" ,rust-windows-aarch64-msvc-0.52)
         ("rust-windows-i686-gnu" ,rust-windows-i686-gnu-0.52)
+        ("rust-windows-i686-gnullvm" ,rust-windows-i686-gnullvm-0.52)
         ("rust-windows-i686-msvc" ,rust-windows-i686-msvc-0.52)
         ("rust-windows-x86-64-gnu" ,rust-windows-x86-64-gnu-0.52)
         ("rust-windows-x86-64-gnullvm" ,rust-windows-x86-64-gnullvm-0.52)
@@ -2415,14 +2623,14 @@ windows crate.")
 (define-public rust-windows-x86-64-gnu-0.52
   (package
     (name "rust-windows-x86-64-gnu")
-    (version "0.52.0")
+    (version "0.52.6")
     (source (origin
               (method url-fetch)
               (uri (crate-uri "windows_x86_64_gnu" version))
               (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
-                "1zdy4qn178sil5sdm63lm7f0kkcjg6gvdwmcprd2yjmwn8ns6vrx"))
+                "0y0sifqcb56a56mvn7xjgs8g43p33mfqkd8wj1yhrgxzma05qyhl"))
               (snippet
                '(delete-file "lib/libwindows.0.52.0.a"))))
     (build-system cargo-build-system)
@@ -2526,14 +2734,14 @@ windows crate.")
 (define-public rust-windows-x86-64-gnullvm-0.52
   (package
     (name "rust-windows-x86-64-gnullvm")
-    (version "0.52.0")
+    (version "0.52.6")
     (source (origin
               (method url-fetch)
               (uri (crate-uri "windows_x86_64_gnullvm" version))
               (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
-                "17lllq4l2k1lqgcnw1cccphxp9vs7inq99kjlm2lfl9zklg7wr8s"))
+                "03gda7zjx1qh8k9nnlgb7m3w3s1xkysg55hkd1wjch8pqhyv5m94"))
               (snippet
                '(delete-file "lib/libwindows.0.52.0.a"))))
     (build-system cargo-build-system)
@@ -2579,14 +2787,14 @@ windows crate.")
 (define-public rust-windows-x86-64-msvc-0.52
   (package
     (name "rust-windows-x86-64-msvc")
-    (version "0.52.0")
+    (version "0.52.6")
     (source (origin
               (method url-fetch)
               (uri (crate-uri "windows_x86_64_msvc" version))
               (file-name (string-append name "-" version ".tar.gz"))
               (sha256
                (base32
-                "012wfq37f18c09ij5m6rniw7xxn5fcvrxbqd0wd8vgnl3hfn9yfz"))
+                "1v7rb5cibyzx8vak29pdrk8nx9hycsjs4w0jgms08qk49jl6v7sq"))
               (snippet
                '(delete-file "lib/windows.0.52.0.lib"))))
     (build-system cargo-build-system)

gnu/packages/gnome.scm

@@ -3576,7 +3576,7 @@ for dealing with different structured file formats.")
 (define-public librsvg
   (package
     (name "librsvg")
-    (version "2.56.4")
+    (version "2.58.4")
     (source (origin
               (method url-fetch)
               (uri (string-append "mirror://gnome/sources/librsvg/"
@@ -3584,7 +3584,7 @@ for dealing with different structured file formats.")
                                   "librsvg-" version ".tar.xz"))
               (sha256
                (base32
-                "1xa0cxdvc6vis5ssh1i0vi2rwgcx3bll6k5i135qyd2ra77zv1za"))))
+                "0yvwjqgp62hmx339hj2wsbnbldmbcb4xx4g2qdkhfz9ls9h3fvi9"))))
     (build-system cargo-build-system)
     (outputs '("out" "doc" "debug"))
     (arguments
@@ -3596,60 +3596,57 @@ for dealing with different structured file formats.")
         ((guix build gnu-build-system) #:prefix gnu:))
       #:cargo-inputs
       `(("rust-anyhow" ,rust-anyhow-1)
-        ("rust-byteorder" ,rust-byteorder-1)
-        ("rust-cairo-rs" ,rust-cairo-rs-0.17)
+        ("rust-cairo-rs" ,rust-cairo-rs-0.19)
         ("rust-cast" ,rust-cast-0.3)
         ("rust-chrono" ,rust-chrono-0.4)
         ("rust-clap" ,rust-clap-4)
         ("rust-clap-complete" ,rust-clap-complete-4)
-        ("rust-cssparser" ,rust-cssparser-0.29)
-        ("rust-data-url" ,rust-data-url-0.2)
+        ("rust-cssparser" ,rust-cssparser-0.31)
+        ("rust-cstr" ,rust-cstr-0.2)
+        ("rust-data-url" ,rust-data-url-0.3)
         ("rust-encoding-rs" ,rust-encoding-rs-0.8)
         ("rust-float-cmp" ,rust-float-cmp-0.9)
-        ("rust-gdk-pixbuf" ,rust-gdk-pixbuf-0.17)
-        ("rust-gio" ,rust-gio-0.17)
-        ("rust-glib" ,rust-glib-0.17)
-        ("rust-itertools" ,rust-itertools-0.10)
+        ("rust-gdk-pixbuf" ,rust-gdk-pixbuf-0.19)
+        ("rust-gio" ,rust-gio-0.19)
+        ("rust-glib" ,rust-glib-0.19)
+        ("rust-image" ,rust-image-0.24)
+        ("rust-itertools" ,rust-itertools-0.12)
         ("rust-language-tags" ,rust-language-tags-0.3)
         ("rust-libc" ,rust-libc-0.2)
         ("rust-locale-config" ,rust-locale-config-0.3)
         ("rust-markup5ever" ,rust-markup5ever-0.11)
         ("rust-nalgebra" ,rust-nalgebra-0.32)
         ("rust-num-traits" ,rust-num-traits-0.2)
-        ("rust-once-cell" ,rust-once-cell-1)
-        ("rust-pango" ,rust-pango-0.17)
-        ("rust-pangocairo" ,rust-pangocairo-0.17)
+        ("rust-pango" ,rust-pango-0.19)
+        ("rust-pangocairo" ,rust-pangocairo-0.19)
         ("rust-rayon" ,rust-rayon-1)
-        ("rust-rctree" ,rust-rctree-0.5)
+        ("rust-rctree" ,rust-rctree-0.6)
         ("rust-regex" ,rust-regex-1)
         ("rust-rgb" ,rust-rgb-0.8)
-        ("rust-selectors" ,rust-selectors-0.24)
+        ("rust-selectors" ,rust-selectors-0.25)
         ("rust-string-cache" ,rust-string-cache-0.8)
         ("rust-system-deps" ,rust-system-deps-6)
         ("rust-thiserror" ,rust-thiserror-1)
         ("rust-tinyvec" ,rust-tinyvec-1)
         ("rust-url" ,rust-url-2)
-        ("rust-xml5ever" ,rust-xml5ever-0.17))
+        ("rust-xml5ever" ,rust-xml5ever-0.17)
+        ("rust-yeslogic-fontconfig-sys" ,rust-yeslogic-fontconfig-sys-5))
       #:cargo-development-inputs
       `(("rust-anyhow" ,rust-anyhow-1)
         ("rust-assert-cmd" ,rust-assert-cmd-2)
-        ("rust-cairo-rs" ,rust-cairo-rs-0.17)
-        ("rust-cast" ,rust-cast-0.3)
         ("rust-chrono" ,rust-chrono-0.4)
-        ("rust-criterion" ,rust-criterion-0.4)
-        ("rust-glib" ,rust-glib-0.17)
-        ("rust-libc" ,rust-libc-0.2)
-        ("rust-lopdf" ,rust-lopdf-0.29)
+        ("rust-criterion" ,rust-criterion-0.5)
+        ("rust-float-cmp" ,rust-float-cmp-0.9)
+        ("rust-lopdf" ,rust-lopdf-0.32)
         ("rust-matches" ,rust-matches-0.1)
-        ("rust-pango" ,rust-pango-0.17)
-        ("rust-pangocairo" ,rust-pangocairo-0.17)
         ("rust-png" ,rust-png-0.17)
-        ("rust-predicates" ,rust-predicates-2)
+        ("rust-predicates" ,rust-predicates-3)
         ("rust-proptest" ,rust-proptest-1)
+        ("rust-quick-error" ,rust-quick-error-2)
         ("rust-serde" ,rust-serde-1)
         ("rust-serde-json" ,rust-serde-json-1)
         ("rust-tempfile" ,rust-tempfile-3)
-        ("rust-yeslogic-fontconfig-sys" ,rust-yeslogic-fontconfig-sys-4))
+        ("rust-url" ,rust-url-2))
       #:phases
       #~(modify-phases %standard-phases
           (add-after 'unpack 'patch-gdk-pixbuf-thumbnailer
@@ -3681,9 +3678,9 @@ for dealing with different structured file formats.")
               ;; Increase reftest tolerance a bit to account for different
               ;; harfbuzz, pango, etc.
               (setenv "RSVG_TEST_TOLERANCE" "20")
-              ;; This test fails even after loosening the tolerance.
-              (substitute* "tests/src/reference.rs"
-                ((".*svg1_1_text_align_03_b_svg.*") ""))))
+              ;; These tests fail even after loosening the tolerance.
+              (substitute* "rsvg/tests/reference.rs"
+                ((".*svg1_1_filters_conv_0[24]_f_svg.*") ""))))
           (add-before 'configure 'pre-configure
             (lambda* (#:key outputs #:allow-other-keys)
               (substitute* "gdk-pixbuf-loader/Makefile.in"

gnu/packages/patches/rust-1.78-unwinding-fix.patch

@@ -0,0 +1,29 @@
+From ce49a9d9e52ca6062fe0894e72d954511fa8820f Mon Sep 17 00:00:00 2001
+From: Shmuel Hazan <ShmuelHazan0@gmail.com>
+Date: Sat, 1 Jun 2024 08:49:44 +0300
+Subject: [PATCH] Add UWTable attr to functions with a personality function
+
+Adding a personality function forces LLVM to generate unwinding info that might be incorrect.
+To solve it, always apply the UWTable attribute when setting a personality function.
+
+Fixes #123733
+---
+ compiler/rustc_codegen_llvm/src/builder.rs | 5 +++++
+ 1 file changed, 5 insertions(+)
+
+diff --git a/compiler/rustc_codegen_llvm/src/builder.rs b/compiler/rustc_codegen_llvm/src/builder.rs
+index 72ff9ea118e28..668f0a33a4e80 100644
+--- a/compiler/rustc_codegen_llvm/src/builder.rs
++++ b/compiler/rustc_codegen_llvm/src/builder.rs
+@@ -1029,6 +1029,11 @@ impl<'a, 'll, 'tcx> BuilderMethods<'a, 'tcx> for Builder<'a, 'll, 'tcx> {
+     }
+ 
+     fn set_personality_fn(&mut self, personality: &'ll Value) {
++        // Work around for https://github.com/rust-lang/rust/issues/123733
++        // add the UWTable attribute to every function with a personality function.
++        let uwtable = attributes::uwtable_attr(self.llcx, None);
++        attributes::apply_to_llfn(self.llfn(), llvm::AttributePlace::Function, &[uwtable]);
++
+         unsafe {
+             llvm::LLVMSetPersonalityFn(self.llfn(), personality);
+         }

gnu/packages/rust-apps.scm

@@ -72,6 +72,7 @@
   #:use-module (gnu packages crates-vcs)
   #:use-module (gnu packages crates-web)
   #:use-module (gnu packages crates-windows)
+  #:use-module (gnu packages crypto)
   #:use-module (gnu packages curl)
   #:use-module (gnu packages documentation)
   #:use-module (gnu packages emacs)
@@ -108,14 +109,14 @@
 (define-public aardvark-dns
   (package
     (name "aardvark-dns")
-    (version "1.10.0")
+    (version "1.12.2")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "aardvark-dns" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "0ldqv9v3v9a1m2kka660d5v15y2zasy5z7m4fh5hif74r089cx6x"))
+        (base32 "1np7n7hiawllrmli4h0m7vvap10pghyr1rzz09gl4fi93janznn6"))
        (modules '((guix build utils)))
        (snippet
         '(begin (substitute* (find-files "." "^Cargo\\.toml$")
@@ -124,20 +125,19 @@
     (build-system cargo-build-system)
     (arguments
      `(#:install-source? #f
-       #:cargo-inputs (("rust-anyhow" ,rust-anyhow-1)
-                       ("rust-async-broadcast" ,rust-async-broadcast-0.6)
+       #:cargo-inputs (("rust-arc-swap" ,rust-arc-swap-1)
                        ("rust-chrono" ,rust-chrono-0.4)
                        ("rust-clap" ,rust-clap-4)
+                       ("rust-flume" ,rust-flume-0.11)
                        ("rust-futures-util" ,rust-futures-util-0.3)
                        ("rust-hickory-client" ,rust-hickory-client-0.24)
                        ("rust-hickory-proto" ,rust-hickory-proto-0.24)
                        ("rust-hickory-server" ,rust-hickory-server-0.24)
                        ("rust-libc" ,rust-libc-0.2)
                        ("rust-log" ,rust-log-0.4)
-                       ("rust-nix" ,rust-nix-0.27)
+                       ("rust-nix" ,rust-nix-0.29)
                        ("rust-resolv-conf" ,rust-resolv-conf-0.7)
-                       ("rust-signal-hook" ,rust-signal-hook-0.3)
-                       ("rust-syslog" ,rust-syslog-6)
+                       ("rust-syslog" ,rust-syslog-7)
                        ("rust-tokio" ,rust-tokio-1))))
     (home-page "https://github.com/containers/aardvark-dns")
     (synopsis "Container-focused DNS A/AAAA record server")
@@ -367,14 +367,14 @@ paging.")
 (define-public cargo-machete
   (package
     (name "cargo-machete")
-    (version "0.6.1")
+    (version "0.6.2")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri name version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "1an8d88njnk8hfsnwnx52zlzdmijscv7m20as1ci986rxz3vgpcl"))))
+        (base32 "0n45j6q36zjw149a84wz2yyygfhcjsnvfaiskwph00684fzlbnbm"))))
     (build-system cargo-build-system)
     (arguments
      `(#:tests? #f ;Error: No such file or directory (os error 2)
@@ -638,27 +638,29 @@ console.")
 (define-public eza
   (package
     (name "eza")
-    (version "0.18.7")
+    (version "0.19.4")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "eza" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "1wnkbzaza0bcw5rld3baikpwwvnajz3j6nbpaic5mhv86rshqlcq"))))
+        (base32 "16zc0j1x7clbjlrg1kc1szy0x1lbsfshij0qhdq8vx0zj6b7dlys"))))
     (build-system cargo-build-system)
     (arguments
      (list
       #:install-source? #f
       #:cargo-inputs `(("rust-ansi-width" ,rust-ansi-width-0.1)
-                       ("rust-ansiterm" ,rust-ansiterm-0.12)
                        ("rust-chrono" ,rust-chrono-0.4)
-                       ("rust-git2" ,rust-git2-0.18)
+                       ("rust-chrono" ,rust-chrono-0.4)
+                       ("rust-dirs" ,rust-dirs-5)
+                       ("rust-git2" ,rust-git2-0.19)
                        ("rust-glob" ,rust-glob-0.3)
                        ("rust-libc" ,rust-libc-0.2)
                        ("rust-locale" ,rust-locale-0.2)
                        ("rust-log" ,rust-log-0.4)
                        ("rust-natord" ,rust-natord-1)
+                       ("rust-nu-ansi-term" ,rust-nu-ansi-term-0.50)
                        ("rust-number-prefix" ,rust-number-prefix-0.4)
                        ("rust-once-cell" ,rust-once-cell-1)
                        ("rust-palette" ,rust-palette-0.7)
@@ -668,12 +670,14 @@ console.")
                        ("rust-plist" ,rust-plist-1)
                        ("rust-proc-mounts" ,rust-proc-mounts-0.3)
                        ("rust-rayon" ,rust-rayon-1)
+                       ("rust-serde" ,rust-serde-1)
+                       ("rust-serde-norway" ,rust-serde-norway-0.9)
                        ("rust-terminal-size" ,rust-terminal-size-0.3)
                        ("rust-timeago" ,rust-timeago-0.4)
                        ("rust-unicode-width" ,rust-unicode-width-0.1)
                        ("rust-uutils-term-grid" ,rust-uutils-term-grid-0.6)
-                       ("rust-uzers" ,rust-uzers-0.11)
-                       ("rust-windows-sys" ,rust-windows-sys-0.52)
+                       ("rust-uzers" ,rust-uzers-0.12)
+                       ("rust-windows-sys" ,rust-windows-sys-0.59)
                        ("rust-zoneinfo-compiled" ,rust-zoneinfo-compiled-0.5))
       #:cargo-development-inputs `(("rust-criterion" ,rust-criterion-0.5)
                                    ("rust-trycmd" ,rust-trycmd-0.15))
@@ -724,7 +728,7 @@ console.")
              (if (supported-package? pandoc)
                  (list pandoc)
                  '())))
-    (inputs (list libgit2-1.7 zlib))
+    (inputs (list libgit2-1.8 zlib))
     (home-page "https://github.com/eza-community/eza")
     (synopsis "Modern replacement for ls")
     (description
@@ -740,16 +744,15 @@ This package is the community maintained fork of @code{exa}.")
 (define-public fd
   (package
     (name "fd")
-    (version "9.0.0")
+    (version "10.2.0")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "fd-find" version))
-       (file-name
-        (string-append name "-" version ".tar.gz"))
+       (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32
-         "1is6xrsnbiy4la3lrmxzl3pzzkygnx9mp8h5k8gfrc29bq8m7891"))))
+         "0d5zv6pmxxsblbvk4pzxjbj072d2bg3byhss57699y2s37xdw26y"))))
     (build-system cargo-build-system)
     (arguments
      (list
@@ -774,10 +777,10 @@ This package is the community maintained fork of @code{exa}.")
         ("rust-ignore" ,rust-ignore-0.4)
         ("rust-jemallocator" ,rust-jemallocator-0.5)
         ("rust-libc" ,rust-libc-0.2)
-        ("rust-lscolors" ,rust-lscolors-0.16)
-        ("rust-nix" ,rust-nix-0.27)
+        ("rust-lscolors" ,rust-lscolors-0.19)
+        ("rust-nix" ,rust-nix-0.29)
         ("rust-normpath" ,rust-normpath-1)
-        ("rust-nu-ansi-term" ,rust-nu-ansi-term-0.49)
+        ("rust-nu-ansi-term" ,rust-nu-ansi-term-0.50)
         ("rust-regex" ,rust-regex-1)
         ("rust-regex-syntax" ,rust-regex-syntax-0.8)
         ("rust-version-check" ,rust-version-check-0.9))
@@ -1247,56 +1250,62 @@ bar.  It is also compatible with sway.")
 (define-public just
   (package
     (name "just")
-    (version "1.23.0")
+    (version "1.35.0")
     (source (origin
               (method url-fetch)
               (uri (crate-uri "just" version))
               (file-name (string-append name "-" version ".tar.gz"))
               (sha256
-               (base32 "0wpjv098a2yymsb41h6104cdia4gb6hwwh05pkwj5fx7b7g41a2q"))))
+               (base32 "0q5a94wrkvb01q0rcz59w0qzsdh7wp698nk0crdqn0j1vwwy7r50"))))
     (build-system cargo-build-system)
     (arguments
      `(#:cargo-test-flags
        '("--release" "--"
+         "--skip=backticks::trailing_newlines_are_stripped"
+         "--skip=completions::bash"
+         "--skip=completions::replacements"
          "--skip=functions::env_var_functions"
          "--skip=string::shebang_backtick")
        #:install-source? #f
        #:cargo-inputs
        (("rust-ansi-term" ,rust-ansi-term-0.12)
-        ("rust-atty" ,rust-atty-0.2)
+        ("rust-blake3" ,rust-blake3-1)
         ("rust-camino" ,rust-camino-1)
-        ("rust-clap" ,rust-clap-2)
+        ("rust-chrono" ,rust-chrono-0.4)
+        ("rust-clap" ,rust-clap-4)
+        ("rust-clap-complete" ,rust-clap-complete-4)
+        ("rust-clap-mangen" ,rust-clap-mangen-0.2)
         ("rust-ctrlc" ,rust-ctrlc-3)
         ("rust-derivative" ,rust-derivative-2)
         ("rust-dirs" ,rust-dirs-5)
         ("rust-dotenvy" ,rust-dotenvy-0.15)
         ("rust-edit-distance" ,rust-edit-distance-2)
-        ("rust-env-logger" ,rust-env-logger-0.10)
-        ("rust-heck" ,rust-heck-0.4)
+        ("rust-heck" ,rust-heck-0.5)
         ("rust-lexiclean" ,rust-lexiclean-0.0.1)
         ("rust-libc" ,rust-libc-0.2)
-        ("rust-log" ,rust-log-0.4)
         ("rust-num-cpus" ,rust-num-cpus-1)
+        ("rust-once-cell" ,rust-once-cell-1)
+        ("rust-percent-encoding" ,rust-percent-encoding-2)
+        ("rust-rand" ,rust-rand-0.8)
         ("rust-regex" ,rust-regex-1)
         ("rust-semver" ,rust-semver-1)
         ("rust-serde" ,rust-serde-1)
         ("rust-serde-json" ,rust-serde-json-1)
         ("rust-sha2" ,rust-sha2-0.10)
+        ("rust-shellexpand" ,rust-shellexpand-3)
         ("rust-similar" ,rust-similar-2)
         ("rust-snafu" ,rust-snafu-0.8)
-        ("rust-strum" ,rust-strum-0.25)
+        ("rust-strum" ,rust-strum-0.26)
         ("rust-target" ,rust-target-2)
         ("rust-tempfile" ,rust-tempfile-3)
         ("rust-typed-arena" ,rust-typed-arena-2)
         ("rust-unicode-width" ,rust-unicode-width-0.1)
         ("rust-uuid" ,rust-uuid-1))
        #:cargo-development-inputs
-       (("rust-cradle" ,rust-cradle-0.2)
-        ("rust-executable-path" ,rust-executable-path-1)
+       (("rust-executable-path" ,rust-executable-path-1)
         ("rust-pretty-assertions" ,rust-pretty-assertions-1)
         ("rust-temptree" ,rust-temptree-0.2)
-        ("rust-which" ,rust-which-5)
-        ("rust-yaml-rust" ,rust-yaml-rust-0.4))
+        ("rust-which" ,rust-which-6))
        #:phases
        (modify-phases %standard-phases
          (add-after 'unpack 'replace-hardcoded-paths
@@ -1317,7 +1326,7 @@ bar.  It is also compatible with sway.")
                     (share (string-append out "/share"))
                     (man1 (string-append share "/man/man1"))
                     (bash-completions-dir
-                     (string-append share "/bash-completion/completions"))
+                     (string-append out "/etc/bash_completion.d/"))
                     (zsh-completions-dir
                      (string-append share "/zsh/site-functions"))
                     (fish-completions-dir
@@ -1327,7 +1336,11 @@ bar.  It is also compatible with sway.")
                     (just (if ,(%current-target-system)
                           (search-input-file native-inputs "/bin/just")
                           (string-append out "/bin/just"))))
+               (mkdir "man")
+               (with-output-to-file "man/just.1"
+                 (lambda _ (invoke just "--man")))
                (install-file "man/just.1" man1)
+
                (mkdir-p bash-completions-dir)
                (with-output-to-file
                  (string-append bash-completions-dir "/just")
@@ -1686,14 +1699,14 @@ container management applications.")
 (define-public ripgrep
   (package
     (name "ripgrep")
-    (version "14.1.0")
+    (version "14.1.1")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "ripgrep" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "1n3zb5jfb8pv65jm4zmrcxlgpppkpd9pmcpg1ifvv13sqhxbrg6p"))))
+        (base32 "1n81lnfzy556f63pgnizay2sgx8fgn4mmailbybjfiaqvhr80yzp"))))
     (build-system cargo-build-system)
     (arguments
      (list
@@ -1718,7 +1731,7 @@ container management applications.")
                        (let* ((out (assoc-ref outputs "out"))
                               (share (string-append out "/share"))
                               (bash-completions-dir
-                                (string-append share "/bash-completion/completions"))
+                                (string-append out "/etc/bash_completion.d/"))
                               (zsh-completions-dir
                                 (string-append share "/zsh/site-functions"))
                               (fish-completions-dir
@@ -2421,7 +2434,8 @@ colorized view to stdout.")
         (base32 "000w549v1bpw7r57xw656p40ywf1gimvxxx5cjnri2js0xg927x4"))))
     (build-system cargo-build-system)
     (arguments
-     `(#:cargo-inputs
+     `(#:install-source? #f
+       #:cargo-inputs
        (("rust-aho-corasick" ,rust-aho-corasick-0.7)
         ("rust-clap" ,rust-clap-2)
         ("rust-crossbeam-channel" ,rust-crossbeam-channel-0.5)
@@ -3211,14 +3225,14 @@ It will then write @code{fixup!} commits for each of those changes.")
 (define-public git-delta
   (package
     (name "git-delta")
-    (version "0.16.5")
+    (version "0.18.2")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "git-delta" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "1pvy5jcpj3xzf2b8k9d5xwwamwlv9pzsx6p2yq61am38igafg9qb"))
+        (base32 "1bmjan13lm1d6vcy8mh0iryl2rnvh39ml5y4alf6s728xdzc2yhj"))
        (modules '((guix build utils)))
        (snippet
         '(begin (substitute* "Cargo.toml"
@@ -3228,26 +3242,40 @@ It will then write @code{fixup!} commits for each of those changes.")
     (arguments
      (list
       #:install-source? #f
+      #:cargo-test-flags
+      '(list "--release" "--"
+             "--skip=ansi::tests::test_measure_text_width"
+             "--skip=features::line_numbers::tests::test_line_numbers_continue_correctly_after_wrapping"
+             "--skip=features::side_by_side::tests::test_two_plus_lines_exact_fit"
+             "--skip=handlers::diff_header::tests::test_diff_header_relative_paths"
+             "--skip=tests::test_example_diffs::tests::test_binary_file_added"
+             "--skip=tests::test_example_diffs::tests::test_binary_file_removed"
+             "--skip=tests::test_example_diffs::tests::test_binary_files_differ"
+             "--skip=tests::test_example_diffs::tests::test_binary_files_differ_after_other"
+             "--skip=wrapping::tests::test_alignment_1_line_vs_3_lines"
+             "--skip=wrapping::tests::test_alignment_2_lines_vs_3_lines"
+             "--skip=wrapping::tests::test_wrap_line_newlines")
       #:cargo-inputs
       `(("rust-ansi-colours" ,rust-ansi-colours-1)
         ("rust-ansi-term" ,rust-ansi-term-0.12)
+        ("rust-anstyle-parse" ,rust-anstyle-parse-0.2)
         ("rust-anyhow" ,rust-anyhow-1)
-        ("rust-atty" ,rust-atty-0.2)
-        ("rust-bat" ,rust-bat-0.22)
+        ("rust-bat" ,rust-bat-0.24)
         ("rust-bitflags" ,rust-bitflags-2)
         ("rust-box-drawing" ,rust-box-drawing-0.1)
         ("rust-bytelines" ,rust-bytelines-2)
         ("rust-chrono" ,rust-chrono-0.4)
         ("rust-chrono-humanize" ,rust-chrono-humanize-0.2)
         ("rust-clap" ,rust-clap-4)
+        ("rust-clap-complete" ,rust-clap-complete-4)
         ("rust-console" ,rust-console-0.15)
         ("rust-ctrlc" ,rust-ctrlc-3)
-        ("rust-dirs" ,rust-dirs-4)
-        ("rust-git2" ,rust-git2-0.16)
+        ("rust-dirs" ,rust-dirs-5)
+        ("rust-git2" ,rust-git2-0.18)
         ("rust-grep-cli" ,rust-grep-cli-0.1)
         ("rust-itertools" ,rust-itertools-0.10)
         ("rust-lazy-static" ,rust-lazy-static-1)
-        ("rust-palette" ,rust-palette-0.6)
+        ("rust-palette" ,rust-palette-0.7)
         ("rust-pathdiff" ,rust-pathdiff-0.2)
         ("rust-regex" ,rust-regex-1)
         ("rust-serde" ,rust-serde-1)
@@ -3255,11 +3283,13 @@ It will then write @code{fixup!} commits for each of those changes.")
         ("rust-shell-words" ,rust-shell-words-1)
         ("rust-smol-str" ,rust-smol-str-0.1)
         ("rust-syntect" ,rust-syntect-5)
-        ("rust-sysinfo" ,rust-sysinfo-0.28)
+        ("rust-sysinfo" ,rust-sysinfo-0.29)
+        ("rust-terminal-colorsaurus" ,rust-terminal-colorsaurus-0.4)
         ("rust-unicode-segmentation" ,rust-unicode-segmentation-1)
         ("rust-unicode-width" ,rust-unicode-width-0.1)
-        ("rust-vte" ,rust-vte-0.11)
         ("rust-xdg" ,rust-xdg-2))
+      #:cargo-development-inputs `(("rust-insta" ,rust-insta-1)
+                                   ("rust-rstest" ,rust-rstest-0.21))
       #:phases
       #~(modify-phases %standard-phases
           (add-after 'install 'install-extras
@@ -3267,7 +3297,7 @@ It will then write @code{fixup!} commits for each of those changes.")
               (let* ((out (assoc-ref outputs "out"))
                      (share (string-append out "/share"))
                      (bash-completions-dir
-                      (string-append share "/bash-completion/completions"))
+                      (string-append out "/etc/bash-completion.d"))
                      (zsh-completions-dir
                       (string-append share "/zsh/site-functions"))
                      (fish-completions-dir
@@ -3282,7 +3312,7 @@ It will then write @code{fixup!} commits for each of those changes.")
                 (copy-file "etc/completion/completion.fish"
                            (string-append fish-completions-dir "/delta.fish"))))))))
     (native-inputs (list git-minimal pkg-config))
-    (inputs (list libgit2 openssl zlib))
+    (inputs (list libgit2-1.7 openssl zlib))
     (home-page "https://github.com/dandavison/delta")
     (synopsis "Syntax-highlighting pager for git")
     (description
@@ -3295,7 +3325,7 @@ advanced keybindings, word-level diff highlighting, syntax highlighting for
 (define-public rust-xremap
   (package
     (name "rust-xremap")
-    (version "0.10.0")
+    (version "0.10.1")
     (source
      (origin
        (method url-fetch)
@@ -3303,7 +3333,7 @@ advanced keybindings, word-level diff highlighting, syntax highlighting for
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32
-         "13pvlc40zha7c9ma30s32x65c8qciqcnsznw43crx3wymlaqc9sn"))))
+         "0a89vdldswd5zawln17gfrfqxjn4pacqlkn4hf5kn8r5znr0ap01"))))
     (build-system cargo-build-system)
     (arguments
      `(#:features '()
@@ -3315,7 +3345,7 @@ advanced keybindings, word-level diff highlighting, syntax highlighting for
         ("rust-derive-where" ,rust-derive-where-1)
         ("rust-env-logger" ,rust-env-logger-0.10)
         ("rust-evdev" ,rust-evdev-0.12)
-        ("rust-fork" ,rust-fork-0.1)
+        ("rust-fork" ,rust-fork-0.2)
         ("rust-indoc" ,rust-indoc-2)
         ("rust-lazy-static" ,rust-lazy-static-1)
         ("rust-log" ,rust-log-0.4)
@@ -3339,19 +3369,19 @@ advanced keybindings, word-level diff highlighting, syntax highlighting for
                     (xremap (string-append out "/bin/xremap")))
                (mkdir-p (string-append share "/bash-completion/completions"))
                (with-output-to-file
-                   (string-append share "/bash-completion/completions/xremap")
+                 (string-append share "/bash-completion/completions/xremap")
                  (lambda _ (invoke xremap "--completions" "bash")))
                (mkdir-p (string-append share "/fish/vendor_completions.d"))
                (with-output-to-file
-                   (string-append share "/fish/vendor_completions.d/xremap.fish")
+                 (string-append share "/fish/vendor_completions.d/xremap.fish")
                  (lambda _ (invoke xremap "--completions" "fish")))
                (mkdir-p (string-append share "/zsh/site-functions"))
                (with-output-to-file
-                   (string-append share "/zsh/site-functions/_xremap")
+                 (string-append share "/zsh/site-functions/_xremap")
                  (lambda _ (invoke xremap "--completions" "zsh")))
                (mkdir-p (string-append share "/elvish/lib"))
                (with-output-to-file
-                   (string-append share "/elvish/lib/xremap")
+                 (string-append share "/elvish/lib/xremap")
                  (lambda _ (invoke xremap "--completions" "elvish")))))))))
     (home-page "https://github.com/k0kubun/xremap")
     (synopsis "Dynamic key remapp for X and Wayland")

gnu/packages/rust.scm

@@ -987,8 +987,15 @@ safety and thread safety guarantees.")
                     "[build]\noptimized-compiler-builtins = false")))))))))))
 
 (define-public rust-1.78
-  (rust-bootstrapped-package
-   rust-1.77 "1.78.0" "1afmj5g3bz7439w4i8zjhd68zvh0gqg7ymr8h5rz49ybllilhm7z"))
+  (let ((base-rust (rust-bootstrapped-package rust-1.77 "1.78.0"
+                    "1afmj5g3bz7439w4i8zjhd68zvh0gqg7ymr8h5rz49ybllilhm7z")))
+    (package
+      (inherit base-rust)
+      (source
+       (origin
+         (inherit (package-source base-rust))
+         ;; see https://github.com/rust-lang/rust/pull/125844
+         (patches (search-patches "rust-1.78-unwinding-fix.patch")))))))
 
 (define-public rust-1.79
   (let ((base-rust (rust-bootstrapped-package rust-1.78 "1.79.0"
@@ -1016,6 +1023,37 @@ safety and thread safety guarantees.")
                (("features = \\[\"fs\"" all)
                 (string-append all ", \"use-libc\""))))))))))
 
+(define-public rust-1.80
+  (let ((base-rust (rust-bootstrapped-package rust-1.79 "1.80.1"
+                    "1i1dbpwnv6ak244lapsxvd26w6sbas9g4l6crc8bip2275j8y2rc")))
+    (package
+      (inherit base-rust)
+      (source
+       (origin
+         (inherit (package-source base-rust))
+         (snippet
+          '(begin
+             (for-each delete-file-recursively
+                       '("src/llvm-project"
+                         "vendor/jemalloc-sys-0.5.3+5.3.0-patched/jemalloc"
+                         "vendor/jemalloc-sys-0.5.4+5.3.0-patched/jemalloc"
+                         "vendor/openssl-src-111.28.2+1.1.1w/openssl"
+                         "vendor/tikv-jemalloc-sys-0.5.4+5.3.0-patched/jemalloc"))
+             ;; Remove vendored dynamically linked libraries.
+             ;; find . -not -type d -executable -exec file {} \+ | grep ELF
+             ;; Also remove the bundled (mostly Windows) libraries.
+             (for-each delete-file
+                       (find-files "vendor" "\\.(a|dll|exe|lib)$"))
+             ;; Adjust vendored dependency to explicitly use rustix with libc backend.
+             (substitute* '("vendor/tempfile-3.7.1/Cargo.toml"
+                            "vendor/tempfile-3.10.1/Cargo.toml")
+               (("features = \\[\"fs\"" all)
+                (string-append all ", \"use-libc\""))))))))))
+
+(define-public rust-1.81
+  (rust-bootstrapped-package rust-1.80 "1.81.0"
+   "19yggj1qivdhf68gx2652cfi7nxjkdgy39wh7h6facpzppz4h947"))
+
 (define (make-ignore-test-list strs)
   "Function to make creating a list to ignore tests a bit easier."
   (map (lambda (str)
@@ -1030,7 +1068,7 @@ safety and thread safety guarantees.")
 ;;; Here we take the latest included Rust, make it public, and re-enable tests
 ;;; and extra components such as rustfmt.
 (define-public rust
-  (let ((base-rust rust-1.77))
+  (let ((base-rust rust-1.81))
     (package
       (inherit base-rust)
       (properties (append
@@ -1044,20 +1082,18 @@ safety and thread safety guarantees.")
           '(begin
              (for-each delete-file-recursively
                        '("src/llvm-project"
-                         "vendor/jemalloc-sys/jemalloc"
-                         "vendor/openssl-src/openssl"
-                         "vendor/tikv-jemalloc-sys/jemalloc"
+                         "vendor/jemalloc-sys-0.5.4+5.3.0-patched/jemalloc"
+                         "vendor/openssl-src-111.28.2+1.1.1w/openssl"
+                         "vendor/tikv-jemalloc-sys-0.5.4+5.3.0-patched/jemalloc"
                          ;; These are referenced by the cargo output
                          ;; so we unbundle them.
-                         "vendor/curl-sys/curl"
-                         "vendor/curl-sys-0.4.63+curl-8.1.2/curl"
-                         "vendor/libffi-sys/libffi"
-                         "vendor/libnghttp2-sys/nghttp2"
-                         "vendor/libz-sys/src/zlib"
-                         "vendor/libz-sys-1.1.9/src/zlib"))
+                         "vendor/curl-sys-0.4.72+curl-8.6.0/curl"
+                         "vendor/libffi-sys-2.3.0/libffi"
+                         "vendor/libnghttp2-sys-0.1.9+1.58.0/nghttp2"
+                         "vendor/libz-sys-1.1.16/src/zlib"))
              ;; Use the packaged nghttp2
-             (delete-file "vendor/libnghttp2-sys/build.rs")
-             (with-output-to-file "vendor/libnghttp2-sys/build.rs"
+             (delete-file "vendor/libnghttp2-sys-0.1.9+1.58.0/build.rs")
+             (with-output-to-file "vendor/libnghttp2-sys-0.1.9+1.58.0/build.rs"
                (lambda _
                  (format #t "fn main() {~@
                          println!(\"cargo:rustc-link-lib=nghttp2\");~@
@@ -1068,7 +1104,8 @@ safety and thread safety guarantees.")
              (for-each delete-file
                        (find-files "vendor" "\\.(a|dll|exe|lib)$"))
              ;; Adjust vendored dependency to explicitly use rustix with libc backend.
-             (substitute* "vendor/tempfile/Cargo.toml"
+             (substitute* '("vendor/tempfile-3.7.1/Cargo.toml"
+                            "vendor/tempfile-3.10.1/Cargo.toml")
                (("features = \\[\"fs\"" all)
                 (string-append all ", \"use-libc\"")))))))
       (arguments
@@ -1095,7 +1132,13 @@ safety and thread safety guarantees.")
                (lambda _
                  (substitute* "src/tools/cargo/tests/testsuite/git.rs"
                    ,@(make-ignore-test-list
-                      '("fn fetch_downloads_with_git2_first_")))))
+                      '("fn fetch_downloads_with_git2_first_")))
+                 (substitute* "src/tools/cargo/tests/testsuite/build.rs"
+                   ,@(make-ignore-test-list
+                      '("fn build_with_symlink_to_path_dependency_with_build_script_in_git")))
+                 (substitute* "src/tools/cargo/tests/testsuite/publish_lockfile.rs"
+                   ,@(make-ignore-test-list
+                      '("fn note_resolve_changes")))))
              (add-after 'unpack 'disable-tests-requiring-mercurial
                (lambda _
                  (with-directory-excursion "src/tools/cargo/tests/testsuite/cargo_init"
@@ -1170,6 +1213,25 @@ safety and thread safety guarantees.")
                    (substitute* "features2.rs"
                      ,@(make-ignore-test-list
                         '("fn dep_with_optional_host_deps_activated"))))))
+             (add-after 'unpack 'disable-tests-requiring-crates.io
+               (lambda _
+                 (substitute* "src/tools/cargo/tests/testsuite/install.rs"
+                   ,@(make-ignore-test-list
+                      '("fn install_global_cargo_config")))))
+             (add-after 'unpack 'disable-miscellaneous-broken-tests
+               (lambda _
+                 (substitute* "src/tools/cargo/tests/testsuite/check_cfg.rs"
+                   ;; These apparently get confused by the fact that
+                   ;; we're building in a directory containing the
+                   ;; string "rustc"
+                   ,@(make-ignore-test-list
+                      '("fn config_fingerprint"
+                        "fn features_fingerprint")))
+                 (substitute* "src/tools/cargo/tests/testsuite/git_auth.rs"
+                   ;; This checks for a specific networking error message
+                   ;; that's different from the one we see in the builder
+                   ,@(make-ignore-test-list
+                      '("fn net_err_suggests_fetch_with_cli")))))
              (add-after 'unpack 'patch-command-exec-tests
                ;; This test suite includes some tests that the stdlib's
                ;; `Command` execution properly handles in situations where
@@ -1228,7 +1290,7 @@ safety and thread safety guarantees.")
                      ((" = rpath.*" all)
                       (string-append all
                                      "                "
-                                     "rustflags.arg(\"-Clink-args=-Wl,-rpath="
+                                     "self.rustflags.arg(\"-Clink-args=-Wl,-rpath="
                                      out "/lib\");\n"))))))
              (add-after 'unpack 'unpack-profiler-rt
                ;; Copy compiler-rt sources to where libprofiler_builtins looks
@@ -1327,7 +1389,7 @@ exec -a \"$0\" \"~a\" \"$@\""
                       (prepend curl libffi `(,nghttp2 "lib") zlib)))
       (native-inputs (cons*
                       ;; Keep in sync with the llvm used to build rust.
-                      `("clang-source" ,(package-source clang-runtime-15))
+                      `("clang-source" ,(package-source clang-runtime-17))
                       ;; Add test inputs.
                       `("gdb" ,gdb/pinned)
                       `("procps" ,procps)
@@ -1356,10 +1418,10 @@ exec -a \"$0\" \"~a\" \"$@\""
           #~(modify-phases #$phases
               (add-after 'unpack 'unbundle-xz
                 (lambda _
-                  (delete-file-recursively "vendor/lzma-sys/xz-5.2")
+                  (delete-file-recursively "vendor/lzma-sys-0.1.20/xz-5.2")
                   ;; Remove the option of using the static library.
                   ;; This is necessary for building the sysroot.
-                  (substitute* "vendor/lzma-sys/build.rs"
+                  (substitute* "vendor/lzma-sys-0.1.20/build.rs"
                     (("!want_static && ") ""))))
               #$@(if (target-mingw? target)
                      `((add-after 'set-env 'patch-for-mingw
@@ -1384,7 +1446,9 @@ exec -a \"$0\" \"~a\" \"$@\""
                                     ":"))
                            ;; When building a rust-sysroot this crate is only used for
                            ;; the rust-installer.
-                           (substitute* "vendor/num_cpus/src/linux.rs"
+                           (substitute* '("vendor/num_cpus-1.13.0/src/linux.rs"
+                                          "vendor/num_cpus-1.13.1/src/linux.rs"
+                                          "vendor/num_cpus-1.16.0/src/linux.rs")
                              (("\\.ceil\\(\\)") ""))
                            ;; gcc doesn't recognize this flag.
                            (substitute*
@@ -1474,6 +1538,7 @@ ar = \"" (search-input-file inputs (string-append "/bin/" #$(ar-for-target targe
               (replace 'install
                 (lambda _
                   (invoke "./x.py" "install" "library/std")))
+              (delete 'enable-profiling)
               (delete 'install-rust-src)
               (delete 'wrap-rust-analyzer)
               (delete 'wrap-rustc)))))

gnu/packages/sequoia.scm

@@ -32,25 +32,106 @@
   #:use-module (gnu packages crates-tls)
   #:use-module (gnu packages crates-web)
   #:use-module (gnu packages crates-windows)
+  #:use-module (gnu packages gnupg)
+  #:use-module (gnu packages hardware)
   #:use-module (gnu packages llvm)
   #:use-module (gnu packages multiprecision)
   #:use-module (gnu packages nettle)
   #:use-module (gnu packages pkg-config)
+  #:use-module (gnu packages security-token)
   #:use-module (gnu packages serialization)
   #:use-module (gnu packages sqlite)
   #:use-module (gnu packages tls))
 
+(define-public rust-card-backend-0.2
+  (package
+    (name "rust-card-backend")
+    (version "0.2.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "card-backend" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "1ra2zfcs0n4msw4j0hmv8f3bpfz49x5c704i93f6a844k2if6gmx"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-thiserror" ,rust-thiserror-1))))
+    (home-page "https://gitlab.com/openpgp-card/openpgp-card")
+    (synopsis "Card backend trait, for use with the openpgp-card crate")
+    (description
+     "This package provides the card backend trait, for use with the
+openpgp-card crate.")
+    (license (list license:expat license:asl2.0))))
+
+(define-public rust-card-backend-pcsc-0.5
+  (package
+    (name "rust-card-backend-pcsc")
+    (version "0.5.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "card-backend-pcsc" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0ddv3jkcyy2vfc6jmlsh87yxcgkhcppp1g9sv670asqvgdq0pfv8"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-card-backend" ,rust-card-backend-0.2)
+                       ("rust-iso7816-tlv" ,rust-iso7816-tlv-0.4)
+                       ("rust-log" ,rust-log-0.4)
+                       ("rust-pcsc" ,rust-pcsc-2))))
+    (native-inputs
+     (list pkg-config))
+    (inputs
+     (list pcsc-lite))
+    (home-page "https://gitlab.com/openpgp-card/openpgp-card")
+    (synopsis "PCSC card backend, e.g. for use with the openpgp-card crate")
+    (description
+     "This package provides a PCSC card backend, e.g. for use with the
+openpgp-card crate.")
+    (license (list license:expat license:asl2.0))))
+
+(define-public rust-openpgp-card-0.5
+  (package
+    (name "rust-openpgp-card")
+    (version "0.5.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "openpgp-card" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "1hdlzziz9d8i55hj55jbvzidwp9q45krhb1pmz2f52hpq1mv302y"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-card-backend" ,rust-card-backend-0.2)
+                       ("rust-chrono" ,rust-chrono-0.4)
+                       ("rust-hex-slice" ,rust-hex-slice-0.1)
+                       ("rust-log" ,rust-log-0.4)
+                       ("rust-nom" ,rust-nom-7)
+                       ("rust-secrecy" ,rust-secrecy-0.8)
+                       ("rust-sha2" ,rust-sha2-0.10)
+                       ("rust-thiserror" ,rust-thiserror-1))
+       #:cargo-development-inputs (("rust-hex-literal" ,rust-hex-literal-0.4))))
+    (home-page "https://gitlab.com/openpgp-card/openpgp-card")
+    (synopsis "Client implementation for the OpenPGP card specification")
+    (description
+     "This package provides a client implementation for the @code{OpenPGP} card
+specification.")
+    (license (list license:expat license:asl2.0))))
+
 (define-public rust-openpgp-cert-d-0.3
   (package
     (name "rust-openpgp-cert-d")
-    (version "0.3.1")
+    (version "0.3.3")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "openpgp-cert-d" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "1kk2mr4rsib04cygv7jg55wvdxivakggqsfrn4apnaxxl5aknb0c"))))
+        (base32 "01b3wac69jz0wkf9lq8a3rlh502glw31k8daba1j0vwclln06yvw"))))
     (build-system cargo-build-system)
     (arguments
      `(#:tests? #f      ; Not all files included.
@@ -101,23 +182,24 @@ and decoding of Autocrypt headers and setup messages.  Note: Autocrypt is more
 than just headers; it requires tight integration with the MUA.")
     (license license:lgpl2.0+)))
 
-(define-public rust-sequoia-cert-store-0.5
+(define-public rust-sequoia-cert-store-0.6
   (package
     (name "rust-sequoia-cert-store")
-    (version "0.5.0")
+    (version "0.6.1")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "sequoia-cert-store" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "1rjakcnhwdvwrm0952rpi9ky8cxvv5bnmylval49s3a087jqcm76"))))
+        (base32 "14f3zhkh0hrjmkv6ksvyr29z6mfq1hadqzqsvhp3xwlf9y66bhjg"))))
     (build-system cargo-build-system)
     (arguments
      `(#:features '("sequoia-openpgp/crypto-nettle")
        #:cargo-inputs (("rust-anyhow" ,rust-anyhow-1)
                        ("rust-crossbeam" ,rust-crossbeam-0.8)
                        ("rust-dirs" ,rust-dirs-5)
+                       ("rust-gethostname" ,rust-gethostname-0.4)
                        ("rust-num-cpus" ,rust-num-cpus-1)
                        ("rust-openpgp-cert-d" ,rust-openpgp-cert-d-0.3)
                        ("rust-rayon" ,rust-rayon-1)
@@ -126,8 +208,11 @@ than just headers; it requires tight integration with the MUA.")
                        ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
                        ("rust-smallvec" ,rust-smallvec-1)
                        ("rust-thiserror" ,rust-thiserror-1)
-                       ("rust-tokio" ,rust-tokio-1))
-       #:cargo-development-inputs (("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
+                       ("rust-tokio" ,rust-tokio-1)
+                       ("rust-url" ,rust-url-2))
+       #:cargo-development-inputs (("rust-rand" ,rust-rand-0.8)
+                                   ("rust-rusty-fork" ,rust-rusty-fork-0.3)
+                                   ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
                                    ("rust-tempfile" ,rust-tempfile-3))))
     (native-inputs
      (list clang pkg-config))
@@ -138,28 +223,94 @@ than just headers; it requires tight integration with the MUA.")
     (description "This package provides a certificate database interface.")
     (license license:lgpl2.0+)))
 
-(define-public rust-sequoia-ipc-0.33
+(define-public rust-sequoia-directories-0.1
+  (package
+    (name "rust-sequoia-directories")
+    (version "0.1.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "sequoia-directories" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "1m9plvzm61571y1vzsp3jkba2mgbxgwckrbpmcbqdky5c24x87dh"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-anyhow" ,rust-anyhow-1)
+                       ("rust-directories" ,rust-directories-5)
+                       ("rust-same-file" ,rust-same-file-1)
+                       ("rust-tempfile" ,rust-tempfile-3)
+                       ("rust-thiserror" ,rust-thiserror-1))
+       #:phases
+       (modify-phases %standard-phases
+         (add-before 'check 'pre-check
+           (lambda _
+             (setenv "HOME" (getcwd)))))))
+    (home-page "https://sequoia-pgp.org/")
+    (synopsis "Directories used by Sequoia")
+    (description "This package provides Directories used by Sequoia.")
+    (license license:lgpl2.0+)))
+
+(define-public rust-sequoia-gpg-agent-0.4
+  (package
+    (name "rust-sequoia-gpg-agent")
+    (version "0.4.2")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "sequoia-gpg-agent" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "119njpmhg0is0vlba199bmyp7fi19w8y555i89njkyrfv7yvakds"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:features '("sequoia-openpgp/crypto-nettle")
+       #:cargo-inputs (("rust-anyhow" ,rust-anyhow-1)
+                       ("rust-chrono" ,rust-chrono-0.4)
+                       ("rust-futures" ,rust-futures-0.3)
+                       ("rust-lalrpop" ,rust-lalrpop-0.17)
+                       ("rust-lalrpop-util" ,rust-lalrpop-util-0.17)
+                       ("rust-libc" ,rust-libc-0.2)
+                       ("rust-sequoia-ipc" ,rust-sequoia-ipc-0.35)
+                       ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
+                       ("rust-stfu8" ,rust-stfu8-0.2)
+                       ("rust-tempfile" ,rust-tempfile-3)
+                       ("rust-thiserror" ,rust-thiserror-1)
+                       ("rust-tokio" ,rust-tokio-1))
+       #:cargo-development-inputs (("rust-clap" ,rust-clap-4)
+                                   ("rust-lazy-static" ,rust-lazy-static-1)
+                                   ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
+                                   ("rust-tempfile" ,rust-tempfile-3)
+                                   ("rust-tokio" ,rust-tokio-1)
+                                   ("rust-tokio-test" ,rust-tokio-test-0.4))))
+    (native-inputs (list clang gnupg pkg-config))
+    (inputs (list nettle))
+    (home-page "https://sequoia-pgp.org/")
+    (synopsis "Library for interacting with GnuPG's gpg-agent")
+    (description
+     "This package provides a library for interacting with @code{GnuPG's} gpg-agent.")
+    (license license:lgpl2.0+)))
+
+(define-public rust-sequoia-ipc-0.35
   (package
     (name "rust-sequoia-ipc")
-    (version "0.33.0")
+    (version "0.35.1")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "sequoia-ipc" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "0h4b675m6r9r64ibv472fsyqkfh9xbx2wz4jaa4v01ivgsd7k3r1"))))
+        (base32 "1qryibvxs7fgbfi55sxsmh6kpim41rz06sslfb0n2cr3jn5cpbl9"))))
     (build-system cargo-build-system)
     (arguments
      `(#:features '("sequoia-openpgp/crypto-nettle")
        #:cargo-inputs (("rust-anyhow" ,rust-anyhow-1)
                        ("rust-buffered-reader" ,rust-buffered-reader-1)
                        ("rust-capnp-rpc" ,rust-capnp-rpc-0.19)
-                       ("rust-crossbeam-utils" ,rust-crossbeam-utils-0.8)
                        ("rust-ctor" ,rust-ctor-0.2)
                        ("rust-dirs" ,rust-dirs-5)
                        ("rust-fs2" ,rust-fs2-0.4)
-                       ("rust-futures" ,rust-futures-0.3)
                        ("rust-lalrpop" ,rust-lalrpop-0.17)
                        ("rust-lalrpop-util" ,rust-lalrpop-util-0.17)
                        ("rust-lazy-static" ,rust-lazy-static-1)
@@ -173,10 +324,9 @@ than just headers; it requires tight integration with the MUA.")
                        ("rust-tokio" ,rust-tokio-1)
                        ("rust-tokio-util" ,rust-tokio-util-0.7)
                        ("rust-winapi" ,rust-winapi-0.3))
-       #:cargo-development-inputs (("rust-clap" ,rust-clap-4)
-                                   ("rust-quickcheck" ,rust-quickcheck-1)
-                                   ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
-                                   ("rust-tokio" ,rust-tokio-1))))
+       #:cargo-development-inputs
+       (("rust-quickcheck" ,rust-quickcheck-1)
+        ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1))))
     (native-inputs
      (list clang pkg-config))
     (inputs
@@ -187,22 +337,23 @@ than just headers; it requires tight integration with the MUA.")
      "This package provides interprocess communication infrastructure for Sequoia.")
     (license license:lgpl2.0+)))
 
-(define-public rust-sequoia-keystore-0.2
+(define-public rust-sequoia-keystore-0.6
   (package
     (name "rust-sequoia-keystore")
-    (version "0.2.0")
+    (version "0.6.1")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "sequoia-keystore" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "11rb2k5v2mc5nf2bafp78nydgcx4gizyxqa9b9lc3d1b73mqv2ad"))))
+        (base32 "168scr1nv5h1fm67p1p59ym267db07kg3fw3shrramaq0af2smx8"))))
     (build-system cargo-build-system)
     (arguments
      `(#:features '("sequoia-openpgp/crypto-nettle")
        #:cargo-inputs
        (("rust-anyhow" ,rust-anyhow-1)
+        ("rust-async-generic" ,rust-async-generic-1)
         ("rust-capnp" ,rust-capnp-0.19)
         ("rust-capnpc" ,rust-capnpc-0.19)
         ("rust-dirs" ,rust-dirs-5)
@@ -210,9 +361,13 @@ than just headers; it requires tight integration with the MUA.")
         ("rust-lazy-static" ,rust-lazy-static-1)
         ("rust-log" ,rust-log-0.4)
         ("rust-paste" ,rust-paste-1)
-        ("rust-sequoia-ipc" ,rust-sequoia-ipc-0.33)
-        ("rust-sequoia-keystore-backend" ,rust-sequoia-keystore-backend-0.2)
-        ("rust-sequoia-keystore-softkeys" ,rust-sequoia-keystore-softkeys-0.2)
+        ("rust-sequoia-directories" ,rust-sequoia-directories-0.1)
+        ("rust-sequoia-ipc" ,rust-sequoia-ipc-0.35)
+        ("rust-sequoia-keystore-backend" ,rust-sequoia-keystore-backend-0.6)
+        ("rust-sequoia-keystore-gpg-agent" ,rust-sequoia-keystore-gpg-agent-0.4)
+        ("rust-sequoia-keystore-openpgp-card" ,rust-sequoia-keystore-openpgp-card-0.1)
+        ("rust-sequoia-keystore-softkeys" ,rust-sequoia-keystore-softkeys-0.6)
+        ("rust-sequoia-keystore-tpm" ,rust-sequoia-keystore-tpm-0.1)
         ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
         ("rust-thiserror" ,rust-thiserror-1)
         ("rust-tokio" ,rust-tokio-1)
@@ -231,24 +386,30 @@ than just headers; it requires tight integration with the MUA.")
     (description "This package contains sequoia's private key store server.")
     (license license:lgpl2.0+)))
 
-(define-public rust-sequoia-keystore-backend-0.2
+(define-public rust-sequoia-keystore-backend-0.6
   (package
     (name "rust-sequoia-keystore-backend")
-    (version "0.2.0")
+    (version "0.6.0")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "sequoia-keystore-backend" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "07v6rc27v0di2v59mixshhc4fkkf1ig0yqkzgqz0v2si4z8slv3s"))))
+        (base32 "15nzpqgpnnbmpcdldzgzx5v0ifgm1njqhvzsh40cg3c02p7xyz40"))))
     (build-system cargo-build-system)
     (arguments
      `(#:features '("sequoia-openpgp/crypto-nettle")
        #:cargo-inputs (("rust-anyhow" ,rust-anyhow-1)
-                       ("rust-blanket" ,rust-blanket-0.3)
+                       ("rust-async-trait" ,rust-async-trait-0.1)
+                       ("rust-env-logger" ,rust-env-logger-0.10)
+                       ("rust-futures" ,rust-futures-0.3)
+                       ("rust-lazy-static" ,rust-lazy-static-1)
+                       ("rust-log" ,rust-log-0.4)
                        ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
-                       ("rust-thiserror" ,rust-thiserror-1))
+                       ("rust-tempfile" ,rust-tempfile-3)
+                       ("rust-thiserror" ,rust-thiserror-1)
+                       ("rust-tokio" ,rust-tokio-1))
        #:cargo-development-inputs
        (("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1))))
     (native-inputs (list clang pkg-config))
@@ -258,31 +419,114 @@ than just headers; it requires tight integration with the MUA.")
     (description "This package contains traits for private key store backends.")
     (license license:lgpl2.0+)))
 
-(define-public rust-sequoia-keystore-softkeys-0.2
+(define-public rust-sequoia-keystore-gpg-agent-0.4
+  (package
+    (name "rust-sequoia-keystore-gpg-agent")
+    (version "0.4.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "sequoia-keystore-gpg-agent" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0s5spxk7v6cdcfzrya4y1n29m09kkrlmqacnrq2azik92kwva1mk"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:features '("sequoia-openpgp/crypto-nettle")
+       #:cargo-inputs
+       (("rust-anyhow" ,rust-anyhow-1)
+        ("rust-async-trait" ,rust-async-trait-0.1)
+        ("rust-futures" ,rust-futures-0.3)
+        ("rust-lazy-static" ,rust-lazy-static-1)
+        ("rust-log" ,rust-log-0.4)
+        ("rust-openpgp-cert-d" ,rust-openpgp-cert-d-0.3)
+        ("rust-sequoia-gpg-agent" ,rust-sequoia-gpg-agent-0.4)
+        ("rust-sequoia-ipc" ,rust-sequoia-ipc-0.35)
+        ("rust-sequoia-keystore-backend" ,rust-sequoia-keystore-backend-0.6)
+        ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
+        ("rust-tokio" ,rust-tokio-1))
+       #:cargo-development-inputs
+       (("rust-env-logger" ,rust-env-logger-0.10)
+        ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
+        ("rust-tracing" ,rust-tracing-0.1)
+        ("rust-tracing-subscriber" ,rust-tracing-subscriber-0.3))))
+    (native-inputs (list clang gnupg pkg-config))
+    (inputs (list nettle))
+    (home-page "https://sequoia-pgp.org/")
+    (synopsis "GPG-agent backend for Sequoia's private key store")
+    (description
+     "This package provides a gpg-agent backend for Sequoia's private key store.")
+    (license license:lgpl2.0+)))
+
+(define-public rust-sequoia-keystore-openpgp-card-0.1
+  (package
+    (name "rust-sequoia-keystore-openpgp-card")
+    (version "0.1.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "sequoia-keystore-openpgp-card" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "1sr3hyxvq6nc319k134iwf4z3m9lx48r40j44xbsrp7mcknxz7w8"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:features '("sequoia-openpgp/crypto-nettle")
+       #:cargo-inputs
+       (("rust-anyhow" ,rust-anyhow-1)
+        ("rust-async-trait" ,rust-async-trait-0.1)
+        ("rust-card-backend-pcsc" ,rust-card-backend-pcsc-0.5)
+        ("rust-futures" ,rust-futures-0.3)
+        ("rust-log" ,rust-log-0.4)
+        ("rust-openpgp-card" ,rust-openpgp-card-0.5)
+        ("rust-openpgp-cert-d" ,rust-openpgp-cert-d-0.3)
+        ("rust-rsa" ,rust-rsa-0.9)
+        ("rust-sequoia-keystore-backend" ,rust-sequoia-keystore-backend-0.6)
+        ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
+        ("rust-tokio" ,rust-tokio-1))
+       #:cargo-development-inputs
+       (("rust-env-logger" ,rust-env-logger-0.10)
+        ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
+        ("rust-tracing" ,rust-tracing-0.1)
+        ("rust-tracing-subscriber" ,rust-tracing-subscriber-0.3))))
+    (native-inputs (list clang pkg-config))
+    (inputs (list nettle pcsc-lite))
+    (home-page "https://sequoia-pgp.org/")
+    (synopsis "OpenPGP card backend for Sequoia's private key store")
+    (description
+     "This package provides an @code{OpenPGP} card backend for Sequoia's
+private key store.")
+    (license license:lgpl2.0+)))
+
+(define-public rust-sequoia-keystore-softkeys-0.6
   (package
     (name "rust-sequoia-keystore-softkeys")
-    (version "0.2.0")
+    (version "0.6.0")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "sequoia-keystore-softkeys" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "151f1ai0bxvab8fi314qcybilv4vq26gfdcs3yp7r28xqn9hldw0"))))
+        (base32 "1zyapjfadgmy5fnk1kwxr0dq7i4qmj4614r0g0z68dawpp8mdflr"))))
     (build-system cargo-build-system)
     (arguments
      `(#:features '("sequoia-openpgp/crypto-nettle")
        #:cargo-inputs
        (("rust-anyhow" ,rust-anyhow-1)
+        ("rust-async-trait" ,rust-async-trait-0.1)
         ("rust-dirs" ,rust-dirs-5)
+        ("rust-futures" ,rust-futures-0.3)
         ("rust-lazy-static" ,rust-lazy-static-1)
         ("rust-log" ,rust-log-0.4)
-        ("rust-sequoia-keystore-backend" ,rust-sequoia-keystore-backend-0.2)
+        ("rust-sequoia-keystore-backend" ,rust-sequoia-keystore-backend-0.6)
         ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1))
        #:cargo-development-inputs
-       (("rust-env-logger" ,rust-env-logger-0.10)
+       (("rust-dircpy" ,rust-dircpy-0.3)
+        ("rust-env-logger" ,rust-env-logger-0.10)
         ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
-        ("rust-test-log" ,rust-test-log-0.2)
+        ("rust-tempfile" ,rust-tempfile-3)
+        ("rust-tokio" ,rust-tokio-1)
         ("rust-tracing" ,rust-tracing-0.1)
         ("rust-tracing-subscriber" ,rust-tracing-subscriber-0.3))))
     (native-inputs (list clang pkg-config))
@@ -294,6 +538,46 @@ than just headers; it requires tight integration with the MUA.")
 private key store.")
     (license license:lgpl2.0+)))
 
+(define-public rust-sequoia-keystore-tpm-0.1
+  (package
+    (name "rust-sequoia-keystore-tpm")
+    (version "0.1.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "sequoia-keystore-tpm" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "00cc468mf9wvkrkdzc1lhjg8a1a0qgfdj046kk09x1nfzlbm5ggh"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:features '("sequoia-openpgp/crypto-nettle")
+       #:cargo-inputs
+       (("rust-anyhow" ,rust-anyhow-1)
+        ("rust-async-trait" ,rust-async-trait-0.1)
+        ("rust-futures" ,rust-futures-0.3)
+        ("rust-log" ,rust-log-0.4)
+        ("rust-openpgp-cert-d" ,rust-openpgp-cert-d-0.3)
+        ("rust-sequoia-ipc" ,rust-sequoia-ipc-0.35)
+        ("rust-sequoia-keystore-backend" ,rust-sequoia-keystore-backend-0.6)
+        ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
+        ("rust-sequoia-tpm" ,rust-sequoia-tpm-0.1)
+        ("rust-serde" ,rust-serde-1)
+        ("rust-serde-yaml" ,rust-serde-yaml-0.8)
+        ("rust-tokio" ,rust-tokio-1))
+       #:cargo-development-inputs
+       (("rust-env-logger" ,rust-env-logger-0.10)
+        ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
+        ("rust-tracing" ,rust-tracing-0.1)
+        ("rust-tracing-subscriber" ,rust-tracing-subscriber-0.3))))
+    (native-inputs (list clang pkg-config))
+    (inputs (list nettle tpm2-tss))
+    (home-page "https://sequoia-pgp.org/")
+    (synopsis "TPM backend for Sequoia's private key store")
+    (description
+     "This package provides a TPM backend for Sequoia's private key store.")
+    (license license:lgpl2.0+)))
+
 (define-public rust-sequoia-net-0.28
   (package
     (name "rust-sequoia-net")
@@ -342,19 +626,20 @@ HKP protocol, and searching and publishing Web Key Directories.")
 (define-public rust-sequoia-openpgp-1
   (package
     (name "rust-sequoia-openpgp")
-    (version "1.19.0")
+    (version "1.21.2")
     (source
       (origin
         (method url-fetch)
         (uri (crate-uri "sequoia-openpgp" version))
         (file-name (string-append name "-" version ".tar.gz"))
         (sha256
-         (base32 "1x3d4yj8mhra8yhcxz6z73pb77pzk0zl1vgxx0yrimzk9b759wgb"))))
+         (base32 "1mh2rc7briyggsvwbg34g3vvx6aisisllb9vz4p96kdl2vi1w9hk"))))
     (build-system cargo-build-system)
     (arguments
      `(#:features '("crypto-nettle")
        #:cargo-test-flags
        (list "--release" "--"
+             "--skip=leak_tests::test_aes_256_decryption"
              "--skip=leak_tests::test_ed25519")
        #:cargo-inputs
        (("rust-aes" ,rust-aes-0.8)
@@ -396,6 +681,8 @@ HKP protocol, and searching and publishing Web Key Directories.")
         ("rust-openssl" ,rust-openssl-0.10)
         ("rust-openssl-sys" ,rust-openssl-sys-0.9)
         ("rust-p256" ,rust-p256-0.13)
+        ("rust-p384" ,rust-p384-0.13)
+        ("rust-p521" ,rust-p521-0.13)
         ("rust-rand" ,rust-rand-0.8)
         ("rust-rand-core" ,rust-rand-core-0.6)
         ("rust-regex" ,rust-regex-1)
@@ -529,17 +816,50 @@ Although the above appear simple to parse, RFC 2822's whitespace and comment
 rules are rather complex.  This crate implements the whole grammar." )
     (license license:gpl3)))
 
-(define-public rust-sequoia-wot-0.11
+(define-public rust-sequoia-tpm-0.1
+  (package
+    (name "rust-sequoia-tpm")
+    (version "0.1.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "sequoia-tpm" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0xh0m7yybkwpc0f858da27y82a2vlsdfch35hjaykih5lf4xmdri"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:features '("sequoia-openpgp/crypto-nettle")
+       #:cargo-inputs (("rust-anyhow" ,rust-anyhow-1)
+                       ("rust-env-logger" ,rust-env-logger-0.11)
+                       ("rust-hex" ,rust-hex-0.4)
+                       ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
+                       ("rust-serde" ,rust-serde-1)
+                       ("rust-serde-yaml" ,rust-serde-yaml-0.8)
+                       ("rust-structopt" ,rust-structopt-0.3)
+                       ("rust-tss-esapi" ,rust-tss-esapi-7)
+                       ("rust-tss-esapi-sys" ,rust-tss-esapi-sys-0.5))
+       #:cargo-development-inputs
+       (("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1))))
+    (native-inputs (list clang pkg-config))
+    (inputs (list nettle tpm2-tss))
+    (home-page "https://sequoia-pgp.org/")
+    (synopsis "Machinery for working with TPM from Sequoia")
+    (description
+     "This package provides machinery for working with TPM from Sequoia.")
+    (license (list license:lgpl2.0+ license:asl2.0))))
+
+(define-public rust-sequoia-wot-0.12
   (package
     (name "rust-sequoia-wot")
-    (version "0.11.0")
+    (version "0.12.0")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "sequoia-wot" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "0hb17adcqz357ci3d4v57pmywy4giq8591p1vb7p83h56zdk0sfi"))))
+        (base32 "1nrx1cn58d8lkp2g0ahw2320zmil3ryxl13inpwf61v4vqi5svj8"))))
     (build-system cargo-build-system)
     (arguments
      `(#:features '("sequoia-openpgp/crypto-nettle")
@@ -547,17 +867,15 @@ rules are rather complex.  This crate implements the whole grammar." )
                             ;; Not all files included.
                             "--skip=gpg_trust_roots")
        #:cargo-inputs (("rust-anyhow" ,rust-anyhow-1)
-                       ("rust-anyhow" ,rust-anyhow-1)
                        ("rust-chrono" ,rust-chrono-0.4)
                        ("rust-clap" ,rust-clap-4)
-                       ("rust-clap" ,rust-clap-4)
                        ("rust-clap-complete" ,rust-clap-complete-4)
                        ("rust-clap-mangen" ,rust-clap-mangen-0.2)
                        ("rust-crossbeam" ,rust-crossbeam-0.8)
                        ("rust-dot-writer" ,rust-dot-writer-0.1)
                        ("rust-enumber" ,rust-enumber-0.3)
                        ("rust-num-cpus" ,rust-num-cpus-1)
-                       ("rust-sequoia-cert-store" ,rust-sequoia-cert-store-0.5)
+                       ("rust-sequoia-cert-store" ,rust-sequoia-cert-store-0.6)
                        ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
                        ("rust-sequoia-policy-config" ,rust-sequoia-policy-config-0.6)
                        ("rust-thiserror" ,rust-thiserror-1))
@@ -578,14 +896,14 @@ rules are rather complex.  This crate implements the whole grammar." )
 (define-public sequoia-sq
   (package
     (name "sequoia-sq")
-    (version "0.34.0")
+    (version "0.38.0")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "sequoia-sq" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "0394xr4wxf5ymc8difnih5s9dpw7rpz9b0n7nnp6782gw65ch6lx"))))
+        (base32 "060dsh7ws9mwamc1jcp093j2g54sm9v5fy1mdhlw8kw2wybqybrj"))))
     (build-system cargo-build-system)
     (arguments
      `(#:install-source? #f
@@ -601,36 +919,35 @@ rules are rather complex.  This crate implements the whole grammar." )
         ("rust-clap" ,rust-clap-4)
         ("rust-clap-complete" ,rust-clap-complete-4)
         ("rust-dirs" ,rust-dirs-5)
-        ("rust-dot-writer" ,rust-dot-writer-0.1)
+        ("rust-fs-extra" ,rust-fs-extra-1)
         ("rust-humantime" ,rust-humantime-2)
         ("rust-indicatif" ,rust-indicatif-0.17)
-        ("rust-itertools" ,rust-itertools-0.10)
         ("rust-once-cell" ,rust-once-cell-1)
         ("rust-roff" ,rust-roff-0.2)
         ("rust-rpassword" ,rust-rpassword-7)
         ("rust-sequoia-autocrypt" ,rust-sequoia-autocrypt-0.25)
-        ("rust-sequoia-cert-store" ,rust-sequoia-cert-store-0.5)
-        ("rust-sequoia-keystore" ,rust-sequoia-keystore-0.2)
+        ("rust-sequoia-cert-store" ,rust-sequoia-cert-store-0.6)
+        ("rust-sequoia-directories" ,rust-sequoia-directories-0.1)
+        ("rust-sequoia-keystore" ,rust-sequoia-keystore-0.6)
         ("rust-sequoia-net" ,rust-sequoia-net-0.28)
         ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
         ("rust-sequoia-policy-config" ,rust-sequoia-policy-config-0.6)
-        ("rust-sequoia-wot" ,rust-sequoia-wot-0.11)
+        ("rust-sequoia-wot" ,rust-sequoia-wot-0.12)
         ("rust-serde" ,rust-serde-1)
-        ("rust-serde-json" ,rust-serde-json-1)
         ("rust-subplot-build" ,rust-subplot-build-0.7)
+        ("rust-subplotlib" ,rust-subplotlib-0.7)
         ("rust-tempfile" ,rust-tempfile-3)
         ("rust-termcolor" ,rust-termcolor-1)
         ("rust-terminal-size" ,rust-terminal-size-0.2)
         ("rust-textwrap" ,rust-textwrap-0.15)
+        ("rust-thiserror" ,rust-thiserror-1)
         ("rust-tokio" ,rust-tokio-1))
        #:cargo-development-inputs
        (("rust-assert-cmd" ,rust-assert-cmd-2)
-        ("rust-dircpy" ,rust-dircpy-0.3)
         ("rust-fehler" ,rust-fehler-1)
         ("rust-libc" ,rust-libc-0.2)
         ("rust-predicates" ,rust-predicates-2)
-        ("rust-regex" ,rust-regex-1)
-        ("rust-subplotlib" ,rust-subplotlib-0.7))
+        ("rust-regex" ,rust-regex-1))
        #:phases
        (modify-phases %standard-phases
          (add-after 'unpack 'set-asset-out-dir
@@ -678,14 +995,14 @@ This Guix package is built to use the nettle cryptographic library.")
 (define-public sequoia-sqv
   (package
     (name "sequoia-sqv")
-    (version "1.1.0")
+    (version "1.2.1")
     (source
       (origin
         (method url-fetch)
         (uri (crate-uri "sequoia-sqv" version))
         (file-name (string-append name "-" version ".tar.gz"))
         (sha256
-          (base32 "0vzqahx7dk1wh2vp7lbzjgah8v7fqpvdf0dq0dydi9695ffm99lc"))))
+          (base32 "0nizac02bwl5cdmcvn3vjjxdhcy431mnsijyswnq101p764dlkl2"))))
     (build-system cargo-build-system)
     (inputs
      (list nettle openssl))
@@ -696,10 +1013,46 @@ This Guix package is built to use the nettle cryptographic library.")
        #:cargo-inputs
        (("rust-anyhow" ,rust-anyhow-1)
         ("rust-chrono" ,rust-chrono-0.4)
-        ("rust-clap" ,rust-clap-2)
-        ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1))
+        ("rust-clap" ,rust-clap-4)
+        ("rust-clap-complete" ,rust-clap-complete-4)
+        ("rust-clap-mangen" ,rust-clap-mangen-0.2)
+        ("rust-sequoia-openpgp" ,rust-sequoia-openpgp-1)
+        ("rust-sequoia-policy-config" ,rust-sequoia-policy-config-0.6))
        #:cargo-development-inputs
-       (("rust-assert-cli" ,rust-assert-cli-0.6))))
+       (("rust-assert-cmd" ,rust-assert-cmd-2)
+        ("rust-predicates" ,rust-predicates-3))
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'unpack 'set-asset-out-dir
+           (lambda _
+             (setenv "ASSET_OUT_DIR" "target/assets")))
+         (add-after 'install 'install-more
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let* ((out (assoc-ref outputs "out"))
+                    (share (string-append out "/share"))
+                    (bash-completions-dir
+                     (string-append out "/etc/bash_completion.d"))
+                    (zsh-completions-dir
+                     (string-append share "/zsh/site-functions"))
+                    (fish-completions-dir
+                     (string-append share "/fish/vendor_completions.d"))
+                    (elvish-completions-dir
+                     (string-append share "/elvish/lib"))
+                    (man1 (string-append share "/man/man1")))
+               ;; The completions are generated in build.rs.
+               (mkdir-p bash-completions-dir)
+               (mkdir-p elvish-completions-dir)
+               (for-each (lambda (file)
+                           (install-file file man1))
+                         (find-files "target/assets/man-pages" "\\.1$"))
+               (copy-file "target/assets/shell-completions/sqv.bash"
+                          (string-append bash-completions-dir "/sqv"))
+               (install-file "target/assets/shell-completions/_sqv"
+                             zsh-completions-dir)
+               (install-file "target/assets/shell-completions/sqv.fish"
+                             fish-completions-dir)
+               (copy-file "target/assets/shell-completions/sqv.elv"
+                          (string-append elvish-completions-dir "/sqv"))))))))
     (home-page "https://sequoia-pgp.org/")
     (synopsis "Simple OpenPGP signature verification program")
     (description "@code{sqv} verifies detached OpenPGP signatures.  It is a
@@ -711,10 +1064,10 @@ This Guix package is built to use the nettle cryptographic library.")
 
 (define-public sequoia-wot
   (package
-    (inherit rust-sequoia-wot-0.11)
+    (inherit rust-sequoia-wot-0.12)
     (name "sequoia-wot")
     (arguments
-     (substitute-keyword-arguments (package-arguments rust-sequoia-wot-0.11)
+     (substitute-keyword-arguments (package-arguments rust-sequoia-wot-0.12)
        ((#:install-source? _ #t) #f)
        ((#:phases phases '%standard-phases)
         `(modify-phases ,phases
@@ -748,7 +1101,7 @@ This Guix package is built to use the nettle cryptographic library.")))
 (define-public sequoia
   (package
     (name "sequoia")
-    (version "1.19.0")
+    (version "1.21.2")
     (source #f)
     (build-system trivial-build-system)
     (arguments

gnu/packages/shells.scm

@@ -1148,18 +1148,18 @@ of commands called a ``pipeline''.")
 (define-public rust-nu-ansi-term-0.50
   (package
     (name "rust-nu-ansi-term")
-    (version "0.50.0")
+    (version "0.50.1")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "nu-ansi-term" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "057zhc62hcaxc73zfjwq7gir5bfilmx652hnh9krdp0babhh0a6x"))))
+        (base32 "16a3isvbxx8pa3lk71h3cq2fsx2d17zzq42j4mhpxy81gl2qx8nl"))))
     (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs (("rust-serde" ,rust-serde-1)
-                       ("rust-windows-sys" ,rust-windows-sys-0.48))
+                       ("rust-windows-sys" ,rust-windows-sys-0.52))
        #:cargo-development-inputs (("rust-doc-comment" ,rust-doc-comment-0.3)
                                    ("rust-serde-json" ,rust-serde-json-1))))
     (home-page "https://github.com/nushell/nu-ansi-term")

gnu/packages/syndication.scm

@@ -226,14 +226,14 @@ cards.")
 (define-public newsboat
   (package
     (name "newsboat")
-    (version "2.35")
+    (version "2.36")
     (source
      (origin
        (method url-fetch)
        (uri (string-append "https://newsboat.org/releases/" version
                            "/newsboat-" version ".tar.xz"))
        (sha256
-        (base32 "1i5nil0lwa621ixxp1vwkic56sxsqp46pyq1xw7lrr1qrbv07w7l"))))
+        (base32 "0yh3ryi11rw4fcg0wdn93yrs5d75i5p1bfvkgnxpzpy9ghwpm9k1"))))
     (build-system cargo-build-system)
     (native-inputs
      `(("gettext" ,gettext-minimal)
@@ -276,7 +276,7 @@ cards.")
        #:cargo-development-inputs
        (("rust-tempfile" ,rust-tempfile-3)
         ("rust-proptest" ,rust-proptest-1)
-        ("rust-section-testing" ,rust-section-testing-0.0))
+        ("rust-section-testing" ,rust-section-testing-0.0.5))
        #:phases
        (modify-phases %standard-phases
          ,@(if (not (assoc-ref inputs "asciidoctor"))

gnu/packages/version-control.scm

@@ -1764,7 +1764,7 @@ lot easier.")
 (define-public stgit-2
   (package
     (name "stgit")
-    (version "2.4.0")
+    (version "2.4.12")
     (source
      (origin
        (method git-fetch)
@@ -1773,7 +1773,7 @@ lot easier.")
              (commit (string-append "v" version))))
        (file-name (git-file-name name version))
        (sha256
-        (base32 "0cgv7chxqkjaqmzi4691in26j2fm8r0vanw8xzb9cqnz6350wvvj"))
+        (base32 "0kp3gwmxcjvphg1s0san0vyis8dsdaf02xsflc2b7kkg8m0r0mi3"))
        (modules '((guix build utils)))
        (snippet
         '(begin (substitute* (find-files "." "^Cargo\\.toml$")
@@ -1790,10 +1790,10 @@ lot easier.")
                        ("rust-curl" ,rust-curl-0.4)
                        ("rust-encoding_rs" ,rust-encoding-rs-0.8)
                        ("rust-flate2" ,rust-flate2-1)
-                       ("rust-gix" ,rust-gix-0.54)
+                       ("rust-gix" ,rust-gix-0.66)
                        ("rust-indexmap" ,rust-indexmap-2)
                        ("rust-is-terminal" ,rust-is-terminal-0.4)
-                       ("rust-nom" ,rust-nom-7)
+                       ("rust-jiff" ,rust-jiff-0.1)
                        ("rust-serde" ,rust-serde-1)
                        ("rust-serde-json" ,rust-serde-json-1)
                        ("rust-strsim" ,rust-strsim-0.10)
@@ -1801,7 +1801,7 @@ lot easier.")
                        ("rust-tempfile" ,rust-tempfile-3)
                        ("rust-termcolor" ,rust-termcolor-1)
                        ("rust-thiserror" ,rust-thiserror-1)
-                       ("rust-time" ,rust-time-0.3))
+                       ("rust-winnow" ,rust-winnow-0.6))
        #:install-source? #f
        #:phases
        (modify-phases %standard-phases

gnu/packages/video.scm

@@ -1680,9 +1680,7 @@ operate properly.")
     (build-system gnu-build-system)
     (inputs
      (append
-      ;; XXX: rav1e depends on rust, which currently only works on x86_64.
-      ;; See also the related configure flag when changing this.
-      (if (target-x86-64?) (list rav1e) '())
+      (if (supported-package? rav1e) (list rav1e) '())
       (list dav1d
             fontconfig
             freetype
@@ -1795,7 +1793,7 @@ operate properly.")
          "--enable-libmp3lame"
          "--enable-libopus"
          "--enable-libpulse"
-         #$@(if (target-x86-64?)
+         #$@(if (this-package-input "rav1e")
                 '("--enable-librav1e")
                 '())
          "--enable-libsoxr"
@@ -6443,7 +6441,40 @@ result in several formats:
                (invoke "cargo" "cinstall" "--release"
                        ;; Only build the dynamic library.
                        "--library-type" "cdylib"
-                       (string-append "--prefix=" out))))))))
+                       (string-append "--prefix=" out)))))
+         (add-after 'install 'install-completions
+           (lambda* (#:key native-inputs outputs #:allow-other-keys)
+             (unless ,(%current-target-system)
+               (let* ((out (assoc-ref outputs "out"))
+                      (share (string-append out "/share"))
+                      (bash-completions-dir
+                        (string-append out "/etc/bash_completion.d"))
+                      (zsh-completions-dir
+                        (string-append share "/zsh/site-functions"))
+                      (fish-completions-dir
+                        (string-append share "/fish/vendor_completions.d"))
+                      (elvish-completions-dir
+                        (string-append share "/elvish/lib"))
+                      (rav1e (string-append out "/bin/rav1e"))
+                      (common-flags '("-" "-o" "-" "advanced" "--completion")))
+                 (mkdir-p bash-completions-dir)
+                 (with-output-to-file
+                   (string-append bash-completions-dir "/rav1e")
+                   (lambda _ (apply invoke rav1e (append common-flags '("bash")))))
+                 (mkdir-p zsh-completions-dir)
+                 ;; This one currently fails to build.
+                 ;(with-output-to-file
+                 ;  (string-append zsh-completions-dir "/_rav1e")
+                 ;  (lambda _ (apply invoke rav1e (append common-flags '("zsh")))))
+                 (mkdir-p fish-completions-dir)
+                 (with-output-to-file
+                   (string-append fish-completions-dir "/rav1e.fish")
+                   (lambda _ (apply invoke rav1e (append common-flags '("fish")))))
+                 (mkdir-p elvish-completions-dir)
+                 (with-output-to-file
+                   (string-append elvish-completions-dir "/rav1e")
+                   (lambda _
+                     (apply invoke rav1e (append common-flags '("elvish"))))))))))))
     (native-inputs
      (append (if (target-x86?)
                  (list nasm)