82/332: gnu: kfilemetadata: Use G-expressions.

[guix-commits]

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

commit 323840784b8ceb0665a3d6b5055b8b91a01f5b0e
Author: Zheng Junjie <873216071@qq.com>
AuthorDate: Thu Jul 13 15:14:25 2023 +0800

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

diff --git a/gnu/packages/kde-frameworks.scm b/gnu/packages/kde-frameworks.scm
index 18673c919e..7c97166e79 100644
--- a/gnu/packages/kde-frameworks.scm
+++ b/gnu/packages/kde-frameworks.scm
@@ -1756,15 +1756,17 @@ from DocBook files.")
                 "0hhq8p6wpfbi33b604ls7q9309n6pm4aa4cgjwxrspn2q8yn6p7w"))))
     (build-system cmake-build-system)
     (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (replace 'check
-           (lambda* (#:key tests? #:allow-other-keys)
-             (when tests?
-               ;; FIXME: Test can't find audio/x-speex mimeinfo
-               ;; (but it can find audio/x-speex+ogg).
-               (invoke "ctest" "-E"
-                          
"(usermetadatawritertest|embeddedimagedatatest|taglibextractortest)")))))))
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (replace 'check
+            (lambda* (#:key tests? #:allow-other-keys)
+              (when tests?
+                ;; FIXME: Test can't find audio/x-speex mimeinfo
+                ;; (but it can find audio/x-speex+ogg).
+                (invoke "ctest" "-E"
+                        "(usermetadatawritertest|embeddedimagedatatest|\
+taglibextractortest)")))))))
     (native-inputs (list extra-cmake-modules pkg-config))
     (inputs
      (list attr