diff options
author | Leo Famulari <leo@famulari.name> | 2017-12-31 13:15:31 -0500 |
---|---|---|
committer | Leo Famulari <leo@famulari.name> | 2018-01-03 12:30:14 -0500 |
commit | 990e93fce16a83e1603b9ec28123ec3edc7ea787 (patch) | |
tree | 5133e89e24cb06f6a5ede16752369d04730c5310 | |
parent | ed8bdde9ced0e08cee898d38d13af02b249d44f1 (diff) | |
download | guix-990e93fce16a83e1603b9ec28123ec3edc7ea787.tar guix-990e93fce16a83e1603b9ec28123ec3edc7ea787.tar.gz |
gnu: krita: Ensure icons are found at runtime.
Fixes <https://bugs.gnu.org/29905>.
* gnu/packages/kde.scm (krita)[arguments]: Set the QT_PLUGIN_PATH in a
new 'wrap-executable' phase.
-rw-r--r-- | gnu/packages/kde.scm | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/gnu/packages/kde.scm b/gnu/packages/kde.scm index 94834c336c..fdfca94e21 100644 --- a/gnu/packages/kde.scm +++ b/gnu/packages/kde.scm @@ -260,7 +260,21 @@ plugins, as well as code to create plugins, or complete applications.") (assoc-ref %build-inputs "libtiff")) (string-append "-DCMAKE_CXX_FLAGS=-I" (assoc-ref %build-inputs "ilmbase") - "/include/OpenEXR")))) + "/include/OpenEXR")) + #:phases + (modify-phases %standard-phases + ;; 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")) + (qt '("qtbase" "qtsvg"))) + (wrap-program (string-append out "/bin/krita") + `("QT_PLUGIN_PATH" ":" prefix + ,(map (lambda (label) + (string-append (assoc-ref inputs label) + "/lib/qt5/plugins/")) + qt))) + #t)))))) (native-inputs `(("curl" ,curl) ("eigen" ,eigen) |