gnu: k3b: Use new style.

* gnu/packages/kde-multimedia.scm (k3b): Use news style.
[arguments]: Use Gexps; Remove tailed #t.

Change-Id: I154d271ce2b0ba3722490db77d25fce2611b4ee8

gnu/packages/kde-multimedia.scm

@@ -367,8 +367,9 @@ variety of formats.")
         (base32 "11r6nda3djj9p918sx9bpipc1byg5mvgib4vyf0kpdpnh9bnhvcj"))))
     (build-system qt-build-system)
     (arguments
-     `(#:phases
-       (modify-phases %standard-phases
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
           (add-after 'unpack 'set-absolute-library-paths
             (lambda* (#:key inputs #:allow-other-keys)
               ;; Set absolute paths for dlopened libraries. We can’t use k3b’s
@@ -380,8 +381,7 @@ variety of formats.")
                    (string-append "\"" libcdio-paranoia "/lib/" library "\"")))
                 (substitute* "libk3b/tools/k3blibdvdcss.cpp"
                   (("\"(dvdcss)\"" _ library)
-                  (string-append "\"" libdvdcss "/lib/" library "\""))))
-             #t))
+                   (string-append "\"" libdvdcss "/lib/" library "\""))))))
           (add-before 'configure 'fix-cmake-taglib
             (lambda _
               ;; Use the CMake variables provided by FindTaglib from
@@ -399,8 +399,7 @@ variety of formats.")
                 `("PATH" ":" prefix
                   ,(map (lambda (input)
                           (string-append (assoc-ref inputs input) "/bin"))
-                       '("cdrdao" "cdrtools" "dvd+rw-tools" "libburn" "sox"))))
-             #t)))))
+                        '("cdrdao" "cdrtools" "dvd+rw-tools" "libburn" "sox")))))))))
     (native-inputs
      (list extra-cmake-modules pkg-config kdoctools-5))
     (inputs