diff options
| author | Zheng Junjie <873216071@qq.com> | 2023-07-13 22:44:55 +0800 |
|---|---|---|
| committer | 宋文武 <iyzsong@member.fsf.org> | 2023-08-02 22:27:40 +0800 |
| commit | 039b976c395b1820d1cf8afe1cbc3e316b49e397 (patch) | |
| tree | 9e3583101628a9577f551182bf52aaf01c67d015 | |
| parent | 2a27e67db3c1d98d63fefbef1d68f712e695dfa5 (diff) | |
| download | guix-039b976c395b1820d1cf8afe1cbc3e316b49e397.tar.gz guix-039b976c395b1820d1cf8afe1cbc3e316b49e397.zip | |
gnu: kcmutils: Use G-expressions.
* gnu/packages/kde-frameworks.scm (kcmutils)[arguments]:
Rewrite as G-expressions.
Signed-off-by: 宋文武 <iyzsong@member.fsf.org>
| -rw-r--r-- | gnu/packages/kde-frameworks.scm | 36 |
1 files changed, 21 insertions, 15 deletions
diff --git a/gnu/packages/kde-frameworks.scm b/gnu/packages/kde-frameworks.scm index 2a811a928f..0f7cce2be7 100644 --- a/gnu/packages/kde-frameworks.scm +++ b/gnu/packages/kde-frameworks.scm @@ -2217,21 +2217,27 @@ using the XBEL format.") (native-inputs (list extra-cmake-modules)) (arguments - `(#:phases - (modify-phases %standard-phases - (add-after 'unpack 'patch - (lambda _ - (substitute* "src/kpluginselector.cpp" - ;; make QDirIterator follow symlinks - (("^\\s*(QDirIterator it\\(.*, QDirIterator::Subdirectories)(\\);)" _ a b) - (string-append a " | QDirIterator::FollowSymlinks" b))) - (substitute* "src/kcmoduleloader.cpp" - ;; print plugin name when loading fails - (("^\\s*(qWarning\\(\\) << \"Error loading) (plugin:\")( << loader\\.errorString\\(\\);)" _ a b c) - (string-append a " KCM plugin\" << mod.service()->library() << \":\"" c))))) - (add-before 'check 'check-setup - (lambda _ - (setenv "QT_QPA_PLATFORM" "offscreen")))))) + (list + #:phases + #~(modify-phases %standard-phases + (add-after 'unpack 'patch + (lambda _ + (substitute* "src/kpluginselector.cpp" + ;; make QDirIterator follow symlinks + (("^\\s*(QDirIterator it\\(.*, QDirIterator::Subdirectories)(\\);)" + _ a b) + (string-append a + " | QDirIterator::FollowSymlinks" b))) + (substitute* "src/kcmoduleloader.cpp" + ;; print plugin name when loading fails + (("^\\s*(qWarning\\(\\) << \"Error loading) (plugin:\")( << loader\\.errorString\\(\\);)" + _ a b c) + (string-append a + " KCM plugin\" << mod.service()->library() << \":\"" + c))))) + (add-before 'check 'check-setup + (lambda _ + (setenv "QT_QPA_PLATFORM" "offscreen")))))) (inputs (list kauth kcodecs |