From: Luis Felipe <luis.felipe...@protonmail.com>
Fixes <https://issues.guix.gnu.org/61236>.
* gnu/packages/ibus.scm (ibus-speech-to-text)[#:phases]: Use getenv to
set GUIX_PYTHONPATH and GI_TYPELIB_PATH.
---
gnu/packages/ibus.scm | 23 ++++++++++++-----------
1 file changed, 12 insertions(+), 11 deletions(-)
diff --git a/gnu/packages/ibus.scm b/gnu/packages/ibus.scm
index 4c45671acc..51ad37b613 100644
--- a/gnu/packages/ibus.scm
+++ b/gnu/packages/ibus.scm
@@ -11,6 +11,7 @@
;;; Copyright © 2021 Songlin Jiang <hollow...@hollowman.ml>
;;; Copyright © 2021 Taiju HIGASHI <higa...@taiju.info>
;;; Copyright © 2022 Maxim Cournoyer <maxim.courno...@gmail.com>
+;;; Copyright © 2023 Luis Felipe López Acevedo <luis.felipe...@protonmail.com>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -875,6 +876,13 @@ (define-public ibus-speech-to-text
(substitute* "meson.build"
(("update_desktop_database: true")
"update_desktop_database: false"))))
+ (add-after 'set-paths 'add-output-to-pythonpath
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let* ((out (assoc-ref outputs "out"))
+ (ibus-stt-dir (string-append out "/share/ibus-stt")))
+ (setenv "GUIX_PYTHONPATH"
+ (string-append ibus-stt-dir ":"
+ (getenv "GUIX_PYTHONPATH"))))))
(add-after 'install 'wrap-with-additional-paths
(lambda* (#:key inputs outputs #:allow-other-keys)
;; Make sure 'ibus-{setup,engine}-stt' find the gst-vosk plugin
@@ -886,17 +894,10 @@ (define-public ibus-speech-to-text
(,(string-append (assoc-ref inputs "gst-vosk")
"/lib/gstreamer-1.0")
,(getenv "GST_PLUGIN_SYSTEM_PATH")))
- `("GUIX_PYTHONPATH" ":" prefix
- (,(getenv "GUIX_PYTHONPATH")
- ,(string-append (assoc-ref inputs "ibus")
- "/lib/girepository-1.0")
- ,(string-append (assoc-ref outputs "out")
- "/share/ibus-stt")))
- `("GI_TYPELIB_PATH" ":" prefix
- (,(string-append (assoc-ref inputs "ibus")
- "/lib/girepository-1.0")
- ,(string-append (assoc-ref outputs "out")
- "/share/ibus-stt")))))
+ `("GUIX_PYTHONPATH" =
+ (,(getenv "GUIX_PYTHONPATH")))
+ `("GI_TYPELIB_PATH" =
+ (,(getenv "GI_TYPELIB_PATH")))))
(list (string-append out "/libexec/ibus-engine-stt")
(string-append out
"/libexec/ibus-setup-stt")))))))))
(inputs
base-commit: 1f684d00d25f0f205c4cc4b762d8f56911062581
--
2.38.1
