gnu: uncrustify: use new style and gexp.

* gnu/packages/code.scm (uncrustify): use new style and gexp.
[native-inputs]: remove label.
[arguments]: use gexp and remove tail #t.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>

1 files changed, 11 insertions, 13 deletions

diff --git a/gnu/packages/code.scm b/gnu/packages/code.scm
index a9e94dab252..b716f32599c 100644
--- a/gnu/packages/code.scm
+++ b/gnu/packages/code.scm
@@ -805,20 +805,18 @@ independent targets.")
                (base32
                 "17x9p5pqgzjchi9xhskp4kq7ag4chmsgbkvwym5m2b9zwm6qykpm"))))
     (build-system cmake-build-system)
-    (native-inputs
-     `(("python" ,python-wrapper)))
+    (native-inputs (list python-wrapper))
     (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (add-after 'unpack 'unpack-etc
-           (lambda* (#:key inputs outputs #:allow-other-keys)
-             ;; Configuration samples are not installed by default.
-             (let* ((output (assoc-ref outputs "out"))
-                    (etcdir (string-append output "/etc")))
-               (for-each (lambda (l)
-                           (install-file l etcdir))
-                         (find-files "etc" "\\.cfg$")))
-             #t)))))
+     (list #:phases
+           #~(modify-phases %standard-phases
+               (add-after 'unpack 'unpack-etc
+                 (lambda* (#:key inputs outputs #:allow-other-keys)
+                   ;; Configuration samples are not installed by default.
+                   (let* ((output (assoc-ref outputs "out"))
+                          (etcdir (string-append output "/etc")))
+                     (for-each (lambda (l)
+                                 (install-file l etcdir))
+                               (find-files "etc" "\\.cfg$"))))))))
     (home-page "https://uncrustify.sourceforge.net/")
     (synopsis "Code formatter for C and other related languages")
     (description