42/332: gnu: knotifications: Use G-expressions.

[guix-commits]

iyzsong pushed a commit to branch kde-updates
in repository guix.

commit 8456d2f99092c629267fc09f25a15095695db17a
Author: Zheng Junjie <873216071@qq.com>
AuthorDate: Wed Jul 12 14:10:05 2023 +0800

    gnu: knotifications: Use G-expressions.
    
    * gnu/packages/kde-frameworks.scm (knotifications)[arguments]:
    Rewrite as G-expressions.
    
    Signed-off-by: 宋文武 <iyzsong@member.fsf.org>
---
 gnu/packages/kde-frameworks.scm | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/gnu/packages/kde-frameworks.scm b/gnu/packages/kde-frameworks.scm
index 1d80dda371..cdca2f5147 100644
--- a/gnu/packages/kde-frameworks.scm
+++ b/gnu/packages/kde-frameworks.scm
@@ -1888,14 +1888,14 @@ asynchronous jobs.")
            qtspeech
            qtx11extras))
     (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (replace 'check
-           (lambda* (#:key tests? #:allow-other-keys)
-             (when tests?
-               (setenv "HOME" (getcwd))
-               (setenv "DBUS_FATAL_WARNINGS" "0")
-               (invoke "dbus-launch" "ctest")))))))
+     (list #:phases #~(modify-phases %standard-phases
+                        (replace 'check
+                          (lambda* (#:key tests? #:allow-other-keys)
+                            (when tests?
+                              (setenv "HOME"
+                                      (getcwd))
+                              (setenv "DBUS_FATAL_WARNINGS" "0")
+                              (invoke "dbus-launch" "ctest")))))))
     (home-page "https://community.kde.org/Frameworks";)
     (synopsis "Desktop notifications")
     (description "KNotification is used to notify the user of an event.  It