14/194: gnu: Add rust-pango-0.17.

[guix-commits]

efraim pushed a commit to branch rust-team
in repository guix.

commit f4d47873a411a219a919ef06c6aaacd69913bc4b
Author: Efraim Flashner <efraim@flashner.co.il>
AuthorDate: Sun Oct 1 16:14:26 2023 +0300

    gnu: Add rust-pango-0.17.
    
    * gnu/packages/crates-gtk.scm (rust-pango-0.17): New variable.
    (rust-pango-0.15): Inherit from rust-pango-0.17.
---
 gnu/packages/crates-gtk.scm | 37 +++++++++++++++++++++++++++++++------
 1 file changed, 31 insertions(+), 6 deletions(-)

diff --git a/gnu/packages/crates-gtk.scm b/gnu/packages/crates-gtk.scm
index fb46fedfad..947bcc550e 100644
--- a/gnu/packages/crates-gtk.scm
+++ b/gnu/packages/crates-gtk.scm
@@ -1936,27 +1936,28 @@
 library.")
     (license license:expat)))
 
-(define-public rust-pango-0.15
+(define-public rust-pango-0.17
   (package
     (name "rust-pango")
-    (version "0.15.10")
+    (version "0.17.10")
     (source
      (origin
        (method url-fetch)
        (uri (crate-uri "pango" version))
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
-        (base32 "0ksf85fqkw4y5pf21p84g5xn4fnqn21cbrmx2d9yx6k591ah9r12"))))
+        (base32 "0j0xj9yw81qivqb0y34j9c5azjsdspxp1zzpvxi1zri0qrplbgim"))))
     (build-system cargo-build-system)
     (arguments
      `(;; FIXME: error[E0277]: `Errors` doesn't implement `std::fmt::Display`
        #:tests? #f
        #:cargo-inputs
        (("rust-bitflags" ,rust-bitflags-1)
-        ("rust-glib" ,rust-glib-0.15)
+        ("rust-gio" ,rust-gio-0.17)
+        ("rust-glib" ,rust-glib-0.17)
         ("rust-libc" ,rust-libc-0.2)
         ("rust-once-cell" ,rust-once-cell-1)
-        ("rust-pango-sys" ,rust-pango-sys-0.15))
+        ("rust-pango-sys" ,rust-pango-sys-0.17))
        #:cargo-development-inputs
        (("rust-gir-format-check" ,rust-gir-format-check-0.1))))
     (native-inputs
@@ -1965,9 +1966,33 @@ library.")
      (list pango))
     (home-page "https://gtk-rs.org/";)
     (synopsis "Rust bindings for the Pango library")
-    (description "Rust bindings for the Pango library")
+    (description "This package provides Rust bindings for the Pango library.")
     (license license:expat)))
 
+(define-public rust-pango-0.15
+  (package
+    (inherit rust-pango-0.17)
+    (name "rust-pango")
+    (version "0.15.10")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "pango" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0ksf85fqkw4y5pf21p84g5xn4fnqn21cbrmx2d9yx6k591ah9r12"))))
+    (arguments
+     `(;; FIXME: error[E0277]: `Errors` doesn't implement `std::fmt::Display`
+       #:tests? #f
+       #:cargo-inputs
+       (("rust-bitflags" ,rust-bitflags-1)
+        ("rust-glib" ,rust-glib-0.15)
+        ("rust-libc" ,rust-libc-0.2)
+        ("rust-once-cell" ,rust-once-cell-1)
+        ("rust-pango-sys" ,rust-pango-sys-0.15))
+       #:cargo-development-inputs
+       (("rust-gir-format-check" ,rust-gir-format-check-0.1))))))
+
 (define-public rust-pango-0.14
   (package
     (inherit rust-pango-0.15)