From 8d5ab7e3407cf249be770310a3061db89246eece Mon Sep 17 00:00:00 2001
From: Nicolas Graves <ngraves@ngraves.fr>
Date: Sun, 28 Dec 2025 22:33:20 +0100
Subject: [PATCH] gnu: pagekite: Switch to pyproject.

* gnu/packages/networking.scm (pagekite):
[build-system]: Switch to pyproject-build-system.
[arguments]: Improve style, use gexps.
<#:phases>: Refresh phase 'install-man-page. Replace 'check phase.
<#:tests?>: Disable them.
[native-inputs]: Add perl (required to run tests), python-setuptools.

Change-Id: I4667440c298ae17f048b1c7659cc23c4f4d1d990
Signed-off-by: Sharlatan Hellseher <sharlatanus@gmail.com>
---
 gnu/packages/networking.scm | 27 ++++++++++++++++-----------
 1 file changed, 16 insertions(+), 11 deletions(-)

diff --git a/gnu/packages/networking.scm b/gnu/packages/networking.scm
index 663bde99d36..969d7fa0302 100644
--- a/gnu/packages/networking.scm
+++ b/gnu/packages/networking.scm
@@ -4636,18 +4636,23 @@ module @code{batman-adv}, for Layer 2.")
        (file-name (git-file-name name version))
        (sha256
         (base32 "1v14pafdd2nzd63kpf7aijpqf5dribxij3ynx5q1232y1ci4wf14"))))
-    (build-system python-build-system)
+    (build-system pyproject-build-system)
     (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (add-after 'install 'install-man-page
-           (lambda* (#:key inputs outputs #:allow-other-keys)
-             (let* ((out (assoc-ref outputs "out"))
-                    (man (string-append out "/share/man")))
-               (invoke "make" "doc/pagekite.1")
-               (install-file "doc/pagekite.1" (string-append man "/man1"))))))))
-    (inputs
-     (list python-six python-socksipychain))
+     (list
+      #:tests? #f                     ; Tests require extensive configuration.
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'install 'install-man-page
+            (lambda _
+              (invoke "make" "doc/pagekite.1")
+              (install-file "doc/pagekite.1"
+                            (string-append #$output "/share/man/man1"))))
+          (replace 'check
+            (lambda* (#:key tests? #:allow-other-keys)
+              (when tests?
+                (invoke "make" "test")))))))
+    (native-inputs (list perl python-setuptools))
+    (inputs (list python-six python-socksipychain))
     (home-page "https://pagekite.net/")
     (synopsis "Make localhost servers publicly visible")
     (description