01/02: gnu: brltty: Fix python package install.

[guix-commits]

cbaines pushed a commit to branch gnome-team
in repository guix.

commit ce302c99bdc7b2df69577faf2abecf72f0ec3234
Author: Dariqq <dariqq@posteo.net>
AuthorDate: Mon Feb 5 18:49:06 2024 +0000

    gnu: brltty: Fix python package install.
    
    The python package is not being installed properly due to install directory 
not
    being in PYTHONPATH.
    
    * gnu/packages/accessibility.scm (brltty)[phases]: Add set-pythonpath-phase.
    [modules, imported-modules]: Add (guix build python-build-system).
    
    Change-Id: Ia9a24f872d82c3e582413eb1d9fc4df3e0979916
    Signed-off-by: Christopher Baines <mail@cbaines.net>
---
 gnu/packages/accessibility.scm | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/accessibility.scm b/gnu/packages/accessibility.scm
index 0b5fb79f13..1b5fd6db50 100644
--- a/gnu/packages/accessibility.scm
+++ b/gnu/packages/accessibility.scm
@@ -129,6 +129,11 @@ terminals.")
          "PYTHON_ROOT=/"
          (string-append "TCL_DIR=" #$output "/lib")
          "INSTALL_WRITABLE_DIRECTORY=no-thanks")
+      #:imported-modules `((guix build python-build-system)
+                           ,@%glib-or-gtk-build-system-modules)
+      #:modules '((guix build utils)
+                  (guix build glib-or-gtk-build-system)
+                  ((guix build python-build-system) #:prefix python:))
       #:phases
       #~(modify-phases %standard-phases
           (add-after 'unpack 'fix-errors
@@ -142,7 +147,10 @@ terminals.")
                  (string-append "extra_link_args = ['-Wl,-rpath="
                                 #$output
                                 "/lib'], "
-                                "extra_compile_args = "))))))))
+                                "extra_compile_args = ")))))
+          (add-before 'install 'set-pythonpath
+            (assoc-ref python:%standard-phases
+                       'add-install-to-pythonpath)))))
     (native-inputs
      (list clisp
            python-cython