Subject: [bug#77564] [PATCH 2/2] gnu: gimp@3: Wrap GI_TYPELIB_PATH and GUIX_PYTHONPATH.

From: Liliana Marie Prikler <[email-masked]>
Date: Sun, 6 Apr 2025 00:18:14 +0200

Without this, Python-Fu scripts will fail to import gi and GObject-related
packages.

* gnu/packages/gimp.scm (gimp-3)[#:phases]: Add ‘wrap’.
---
 gnu/packages/gimp.scm | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/gimp.scm b/gnu/packages/gimp.scm
index ef03992f2d..07f005bb18 100644
--- a/gnu/packages/gimp.scm
+++ b/gnu/packages/gimp.scm
@@ -454,7 +454,19 @@ (define-public gimp-3
                  (lambda _
                    (mkdir-p (string-append #$output:doc "/share"))
                    (rename-file (string-append #$output "/share/doc")
-                                (string-append #$output:doc "/share/doc")))))))
+                                (string-append #$output:doc "/share/doc"))))
+               (add-after 'install 'wrap
+                 (lambda* _
+                   (for-each
+                    (lambda (prog)
+                      (wrap-program prog
+                        `("GI_TYPELIB_PATH" suffix
+                          (,(getenv "GI_TYPELIB_PATH")))
+                        `("GUIX_PYTHONPATH" suffix
+                          (,(getenv "GUIX_PYTHONPATH")))))
+                    (find-files (string-append #$output "/bin")
+                                (lambda (_ stat)
+                                  (eq? 'regular (stat:type stat))))))))))
     (inputs (modify-inputs (package-inputs gimp-2)
               (replace "gtk+" gtk+)
               (prepend libxmu libxt)
-- 
2.49.0