[bug#44492] [PATCH 50/52] gnu: Add rust-sourceview4-for-fractal.

[Leo Prikler]

* gnu/packages/crates-gtk.scm (rust-sourceview4-for-fractal): New variable.
---
 gnu/packages/crates-gtk.scm | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)

diff --git a/gnu/packages/crates-gtk.scm b/gnu/packages/crates-gtk.scm
index 0238a31edb..e27ff0704b 100644
--- a/gnu/packages/crates-gtk.scm
+++ b/gnu/packages/crates-gtk.scm
@@ -20,6 +20,7 @@
 (define-module (gnu packages crates-gtk)
   #:use-module (guix build-system cargo)
   #:use-module (guix download)
+  #:use-module (guix git-download)
   #:use-module ((guix licenses) #:prefix license:)
   #:use-module (guix packages)
   #:use-module (gnu packages)
@@ -2471,3 +2472,31 @@ converts raw links to http links and strips unwanted 
tags.")
     (synopsis "API bindings for GtkSourceView 4")
     (description "API bindings for GtkSourceView 4")
     (license license:lgpl2.1+)))
+
+(define-public rust-sourceview4-for-fractal
+  (package
+    (inherit rust-sourceview4-0.2)
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+                    (url "https://gitlab.gnome.org/World/Rust/sourceview4-rs/";)
+                    (commit "fa8819fa7ecbe56f44d951656d3825f468915754")))
+              (file-name "rust-sourceview4-0.2.0.tar.gz")
+              (sha256
+               (base32
+                "0aib8385fxdpw79sasfzn6q11sqx3wigkb267if9fb12bagycgpk"))))
+    (arguments
+     `(#:cargo-inputs
+       (("rust-bitflags" ,rust-bitflags-1)
+        ("rust-gdk" ,rust-gdk-0.12)
+        ("rust-gdk-pixbuf" ,rust-gdk-pixbuf-0.8)
+        ("rust-gio" ,rust-gio-0.9)
+        ("rust-gio-sys" ,rust-gio-sys-0.10)
+        ("rust-glib" ,rust-glib-0.9)
+        ("rust-glib-sys" ,rust-glib-sys-0.9)
+        ("rust-gobject-sys" ,rust-gobject-sys-0.9)
+        ("rust-gtk" ,rust-gtk-0.8)
+        ("rust-gtk-sys" ,rust-gtk-sys-0.9)
+        ("rust-libc" ,rust-libc-0.2)
+        ("rust-pango" ,rust-pango-0.8))))
+    (properties `((hidden? . #t)))))
-- 
2.30.1