z572 pushed a commit to branch kde-team
in repository guix.
commit 09df4ef4f667ae1322ea517111889adcdead5fda
Author: Zheng Junjie <[email protected]>
AuthorDate: Tue Jul 16 20:36:03 2024 +0800
gnu: kmail: Wrap program.
* gnu/packages/kde-pim.scm (kmail): Wrap program.
[inputs]: Add kaddressbook and kmail-account-wizard.
[arguments]<#:phases>: Add wrap-program phase.
Change-Id: I82d7c897a188d8ac0d0b743d4fe4146aaf4081eb
---
gnu/packages/kde-pim.scm | 15 +++++++++++++++
1 file changed, 15 insertions(+)
diff --git a/gnu/packages/kde-pim.scm b/gnu/packages/kde-pim.scm
index 5b4048eb49..c95cf653c2 100644
--- a/gnu/packages/kde-pim.scm
+++ b/gnu/packages/kde-pim.scm
@@ -1166,6 +1166,7 @@ and retrieving certificates from LDAP servers.")
boost
gpgme-1.23
grantleetheme
+ kaddressbook
kbookmarks
kcalendarcore
kcalutils
@@ -1186,6 +1187,7 @@ and retrieving certificates from LDAP servers.")
kitemviews
kjobwidgets
kldap
+ kmail-account-wizard
kmailcommon
kmailtransport
kmessagelib
@@ -1223,6 +1225,19 @@ and retrieving certificates from LDAP servers.")
#:qtbase qtbase
#:phases
#~(modify-phases %standard-phases
+ (add-after 'install 'wrap-program
+ (lambda* (#:key inputs #:allow-other-keys)
+ (define (find-program-directory name)
+ (dirname (search-input-file
+ inputs (string-append "/bin/" name))))
+ (wrap-program (string-append #$output "/bin/kmail")
+ `("XDG_DATA_DIRS" ":" prefix
+ (,(getenv "XDG_DATA_DIRS")))
+ `("PATH" ":" prefix
+ ,(map find-program-directory
+ (list "kaddressbook"
+ "akonadictl"
+ "accountwizard"))))))
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
