From: Parnikkapore via Guix-patches via <guix-patches@gnu.org>
To: 60480@debbugs.gnu.org
Subject: [bug#60480] [PATCH 1/2] gnu: plover: Wrap so that icons can be found
Date: Mon, 2 Jan 2023 08:08:03 +0700 [thread overview]
Message-ID: <02f456e3dd1951b64ee6216bef6d424ff139667f.1672504941.git.poomklao@yahoo.com> (raw)
In-Reply-To: <cover.1672504941.git.poomklao@yahoo.com>
* gnu/packages/stenography.scm (plover): Wrap and add qtsvg to QT_PLUGIN_PATH
This is needed for the icons in Plover's UI to appear.
---
gnu/packages/stenography.scm | 81 +++++++++++++++++++-----------------
1 file changed, 43 insertions(+), 38 deletions(-)
diff --git a/gnu/packages/stenography.scm b/gnu/packages/stenography.scm
index 504dfc990f..3249ee4c4f 100644
--- a/gnu/packages/stenography.scm
+++ b/gnu/packages/stenography.scm
@@ -26,6 +26,7 @@ (define-module (gnu packages stenography)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix packages)
#:use-module (gnu packages)
+ #:use-module (gnu packages bash)
#:use-module (gnu packages qt)
#:use-module (gnu packages check)
#:use-module (gnu packages libusb)
@@ -55,46 +56,50 @@ (define-public plover
(package
(name "plover")
(version "4.0.0.dev12")
- (source
- (origin
- (method git-fetch)
- (uri (git-reference
- (url "https://github.com/openstenoproject/plover")
- (commit (string-append "v" version))))
- (file-name (git-file-name name version))
- (sha256
- (base32 "0vk6nh2gpn7f7rv2spi2a7n3m0d9kaan6r22mx3vwxprpbvrkbm8"))))
+ (source (origin
+ (method git-fetch)
+ (uri (git-reference
+ (url "https://github.com/openstenoproject/plover")
+ (commit (string-append "v" version))))
+ (file-name (git-file-name name version))
+ (sha256
+ (base32
+ "0vk6nh2gpn7f7rv2spi2a7n3m0d9kaan6r22mx3vwxprpbvrkbm8"))))
(build-system python-build-system)
(arguments
- (list
- #:phases
- #~(modify-phases %standard-phases
- (replace 'check
- (lambda* (#:key tests? #:allow-other-keys)
- (when tests?
- (invoke "python" "-m" "pytest"
- "-p" "pytest-qt"
- "-p" "xvfb"
- "test"
- ;; FIXME: Ignore failing test.
- "--ignore"
- "test/gui_qt/test_dictionaries_widget.py")))))))
- (native-inputs
- (list python-babel
- python-mock
- python-pytest
- python-pytest-qt
- python-pytest-xvfb))
- (inputs
- (list python-appdirs
- python-dbus
- python-hidapi
- python-plover-stroke
- python-pyqt
- python-pyserial
- python-rtf-tokenize
- python-xlib
- qtsvg-5))
+ (list #:phases #~(modify-phases %standard-phases
+ (replace 'check
+ (lambda* (#:key tests? #:allow-other-keys)
+ (when tests?
+ (invoke "python" "-m" "pytest"
+ "-p" "pytest-qt"
+ "-p" "xvfb"
+ "test"
+ ;; FIXME: Ignore failing test.
+ "--ignore"
+ "test/gui_qt/test_dictionaries_widget.py"))))
+ ;; Ensure that icons are found at runtime.
+ (add-after 'install 'wrap-executable
+ (lambda* (#:key inputs outputs #:allow-other-keys)
+ (let ((out (assoc-ref outputs "out")))
+ (wrap-program (string-append out "/bin/plover")
+ `("QT_PLUGIN_PATH" prefix
+ ,(list (string-append (assoc-ref
+ inputs
+ "qtsvg")
+ "/lib/qt5/plugins/"))))))))))
+ (native-inputs (list python-babel python-mock python-pytest
+ python-pytest-qt python-pytest-xvfb))
+ (inputs (list bash-minimal
+ python-appdirs
+ python-dbus
+ python-hidapi
+ python-plover-stroke
+ python-pyqt
+ python-pyserial
+ python-rtf-tokenize
+ python-xlib
+ qtsvg-5))
(home-page "https://www.openstenoproject.org/plover/")
(synopsis "Stenography engine")
(description
--
2.38.1
next prev parent reply other threads:[~2023-01-02 1:09 UTC|newest]
Thread overview: 4+ messages / expand[flat|nested] mbox.gz Atom feed top
[not found] <cover.1672504941.git.poomklao.ref@yahoo.com>
2023-01-01 16:47 ` [bug#60480] [PATCH 0/2] gnu: plover: Fix missing icons + dbus Parnikkapore via Guix-patches via
2023-01-02 1:08 ` Parnikkapore via Guix-patches via [this message]
2023-01-03 21:00 ` bug#60480: [PATCH 1/2] gnu: plover: Wrap so that icons can be found Nicolas Goaziou
2023-01-02 1:08 ` [bug#60480] [PATCH 2/2] gnu: plover: Add dbus to inputs Parnikkapore via Guix-patches via
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://guix.gnu.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=02f456e3dd1951b64ee6216bef6d424ff139667f.1672504941.git.poomklao@yahoo.com \
--to=guix-patches@gnu.org \
--cc=60480@debbugs.gnu.org \
--cc=poomklao@yahoo.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/guix.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).