From 0007b45437a3d1e5db2098b9954b83aa28dcb7f6 Mon Sep 17 00:00:00 2001
From: Marius Bakke <marius@gnu.org>
Date: Thu, 7 Sep 2023 23:27:08 +0800
Subject: [PATCH] gnu: iputils: Use new style.

* gnu/packages/networking.scm (iputils)[arguments]: Use G-expression.
[native-inputs]: Remove labels.
---
 gnu/packages/networking.scm | 29 +++++++++++++++--------------
 1 file changed, 15 insertions(+), 14 deletions(-)

diff --git a/gnu/packages/networking.scm b/gnu/packages/networking.scm
index 1403bab363..b349bfe096 100644
--- a/gnu/packages/networking.scm
+++ b/gnu/packages/networking.scm
@@ -1575,21 +1575,22 @@ (define-public iputils
                 "1qfdvr60mlwh5kr4p27wjknz1cvrwfi6iadh9ny45661v22i0njx"))))
     (build-system meson-build-system)
     (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (add-after 'unpack 'disable-ping-test
-           (lambda _
-             ;; Disable ping test, as it requires root or raw socket capabilities.
-             (substitute* "test/meson.build"
-               (("if build_ping == true")
-                "if false")))))))
+     (list
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'disable-ping-test
+            (lambda _
+              ;; Disable ping test, as it requires root or raw socket capabilities.
+              (substitute* "test/meson.build"
+                (("if build_ping == true")
+                 "if false")))))))
     (native-inputs
-     `(("gettext" ,gettext-minimal)
-       ("pkg-config" ,pkg-config)
-       ("docbook-xsl" ,docbook-xsl)
-       ("docbook-xml" ,docbook-xml)
-       ("libxml2" ,libxml2)          ;for XML_CATALOG_FILES
-       ("xsltproc" ,libxslt)))
+     (list gettext-minimal
+           pkg-config
+           docbook-xsl
+           docbook-xml
+           libxml2                      ;for XML_CATALOG_FILES
+           libxslt))
     (inputs
      (list libcap libidn2 openssl))
     (synopsis "Collection of network utilities")