guix_mirror_bot pushed a commit to branch master
in repository guix.

commit b13e6e627cbe7631f7965833ae5f9bc5616c6145
Author: Sharlatan Hellseher <[email protected]>
AuthorDate: Mon Nov 24 14:24:35 2025 +0000

    gnu: autokey: Fix wrapping.
    
    Python dependencies don't have to be wrapped as they are search via
    GUIX_PYTHONPATH.
    
    * gnu/packages/python-xyz.scm (autokey)[arguments] <phases>: Rename
    'wrap-autokey to 'wrap-executable and set it after 'wrap phase; switch
    to THIS-PACKAGE-INPUT, and keep just zenity with wmctrl; add
    "autokey-qt" and "autokey-run" to proram list.
    
    Change-Id: Ie89d525fce1ba1feced78173a5b9c498535ba539
---
 gnu/packages/python-xyz.scm | 15 ++++++++-------
 1 file changed, 8 insertions(+), 7 deletions(-)

diff --git a/gnu/packages/python-xyz.scm b/gnu/packages/python-xyz.scm
index dd83d7a12f..06d8634387 100644
--- a/gnu/packages/python-xyz.scm
+++ b/gnu/packages/python-xyz.scm
@@ -8658,15 +8658,14 @@ structure for Python.")
           ;; Use 'prefix' instead of '=' to allow the user to use additional
           ;; GI paths from their autokey scripts.  GUIX_PYTHONPATH is already
           ;; wrapped with prefix in python-build-system's wrap.
-          (add-before 'wrap 'wrap-autokey
+          (add-after 'wrap 'wrap-executable
             (lambda* (#:key inputs #:allow-other-keys)
               (let ((gi-typelib-path (getenv "GI_TYPELIB_PATH"))
-                    (path (map dirname
-                               ;; see lib/autokey/UI_common_functions.py
-                               (list (search-input-file inputs "/bin/wmctrl")
-                                     (search-input-file inputs "/bin/zenity")
-                                     (search-input-file inputs "/bin/ipython3")
-                                     (search-input-file inputs 
"/bin/python3")))))
+                    ;; see lib/autokey/UI_common_functions.py
+                    (path (list (string-append #$(this-package-input "wmctrl")
+                                               "/bin")
+                                (string-append #$(this-package-input "zenity")
+                                               "/bin"))))
                 (for-each
                  (lambda (program)
                    (wrap-program program
@@ -8675,6 +8674,8 @@ structure for Python.")
                  (map (lambda (name)
                         (string-append #$output "/bin/" name))
                       '("autokey-gtk"
+                        "autokey-qt"
+                        "autokey-run"
                         "autokey-shell"))))))
           (add-before 'check 'setup-env-vars
             (lambda _

Reply via email to