416/465: gnu: kaffeine: Use new style.

[guix-commits]

z572 pushed a commit to branch kde-team
in repository guix.

commit 93216982ab36176e41feb2ba5b6a6d6586ca075e
Author: Zheng Junjie <zhengjun...@iscas.ac.cn>
AuthorDate: Tue Jul 9 12:33:12 2024 +0800

    gnu: kaffeine: Use new style.
    
    * gnu/packages/kde-multimedia.scm (kaffeine): Use news style.
    [arguments]: Use Gexps; Remove tailed #t.
    
    Change-Id: I9bf571dc80d1a166650966a072285fdb1161ac3e
---
 gnu/packages/kde-multimedia.scm | 15 +++++++--------
 1 file changed, 7 insertions(+), 8 deletions(-)

diff --git a/gnu/packages/kde-multimedia.scm b/gnu/packages/kde-multimedia.scm
index cd777a36c5..ae40403275 100644
--- a/gnu/packages/kde-multimedia.scm
+++ b/gnu/packages/kde-multimedia.scm
@@ -486,14 +486,13 @@ the available CD drives.")
            v4l-utils ; libdvbv5
            vlc))
     (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (add-after 'unpack 'fix-code
-           (lambda _
-             (substitute* "src/dvb/dvbdevice_linux.cpp"
-               
(("\\s*qPrintable\\(transponder\\.getTransmissionType\\(\\)\\)\\);")
-                "transponder.getTransmissionType());"))
-             #t)))))
+     (list #:phases
+           #~(modify-phases %standard-phases
+               (add-after 'unpack 'fix-code
+                 (lambda _
+                   (substitute* "src/dvb/dvbdevice_linux.cpp"
+                     
(("\\s*qPrintable\\(transponder\\.getTransmissionType\\(\\)\\)\\);")
+                      "transponder.getTransmissionType());")))))))
     (home-page "https://apps.kde.org/kaffeine/";)
     (synopsis "Versatile media player for KDE")
     (description "Kaffeine is a media player for KDE.  While it supports