From d540c0dbc6a834adc5eaf79133fee8527f58943a Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Carlos=20Dur=C3=A1n=20Dom=C3=ADnguez?= <wurt@wurt.eu>
Date: Sat, 17 Jan 2026 20:57:04 +0100
Subject: [PATCH] gnu: showmethekey: Wrap showmethekey-gtk.

* gnu/packages/video.scm (showmethekey)[phases]{wrap-program}: Wrap
showmethekey-gtk to find GLib schemas.

Change-Id: Ib8292c34c4da68c49334d0a10e35cdb1aa65b163
---
 gnu/packages/video.scm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/video.scm b/gnu/packages/video.scm
index e756540182d..0a2c4c7cad1 100644
--- a/gnu/packages/video.scm
+++ b/gnu/packages/video.scm
@@ -7067,7 +7067,12 @@ included for convenience.")
                 ;; We do that ourselves later--so replace by a dummy
                 ;; command.
                 (("gtk4-update-icon-cache")
-                 "true")))))))
+                 "true"))))
+          (add-after 'install 'wrap-program
+            (lambda _
+              (wrap-program (string-append #$output "/bin/showmethekey-gtk")
+                `("XDG_DATA_DIRS" prefix
+                  (,(string-append #$output "/share")))))))))
     (native-inputs (list (list glib "bin") gettext-minimal pkg-config))
     (inputs (list libevdev
                   eudev