From 7f300c37de12e9d9ede2ac558e2917ed85b70fdf Mon Sep 17 00:00:00 2001 From: Zheng Junjie <873216071@qq.com> Date: Fri, 14 Jul 2023 00:34:29 +0800 Subject: gnu: plasma-framework: Use G-expressions. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * gnu/packages/kde-frameworks.scm (plasma-framework)[arguments]: Rewrite as G-expressions. Signed-off-by: 宋文武 --- gnu/packages/kde-frameworks.scm | 26 ++++++++++++++------------ 1 file changed, 14 insertions(+), 12 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/kde-frameworks.scm b/gnu/packages/kde-frameworks.scm index a471c4fa0b..30e7964b09 100644 --- a/gnu/packages/kde-frameworks.scm +++ b/gnu/packages/kde-frameworks.scm @@ -3363,18 +3363,20 @@ setUrl, setUserAgent and call.") qtx11extras solid)) (arguments - `(#:phases - (modify-phases %standard-phases - (replace 'check - (lambda* (#:key tests? #:allow-other-keys) - (when tests? - (setenv "HOME" (getcwd)) - (setenv "QT_QPA_PLATFORM" "offscreen") ;; These tests fail - (invoke "ctest" "-E" (string-append "(plasma-dialogstatetest" - "|plasma-iconitemtest" - "|plasma-themetest" - "|iconitemhidpitest" - "|dialognativetest)")))))))) + (list #:phases + #~(modify-phases %standard-phases + (replace 'check + (lambda* (#:key tests? #:allow-other-keys) + (when tests? + (setenv "HOME" + (getcwd)) + (setenv "QT_QPA_PLATFORM" "offscreen") ;; These tests fail + (invoke "ctest" "-E" + (string-append "(plasma-dialogstatetest" + "|plasma-iconitemtest" + "|plasma-themetest" + "|iconitemhidpitest" + "|dialognativetest)")))))))) (home-page "https://community.kde.org/Frameworks") (synopsis "Libraries, components and tools of Plasma workspaces") (description "The plasma framework provides QML components, libplasma and -- cgit 1.4.1