From e37e74598e3945d9a9e5b81b1e9dd7e04f8b7bfa Mon Sep 17 00:00:00 2001
From: Ashvith Shetty <Ashvith@noreply.codeberg.org>
Date: Sat, 28 Dec 2024 17:23:02 +0530
Subject: [PATCH] gnu: xfce4-panel: Switch to git source.
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

* gnu/packages/xfce.scm (xfce4-panel)[source]: Switch to git-fetch.
[home-page]: Set to docs.xfce.org.
[arguments]: Add "--enable-maintainer-mode --enable-gtk-doc" to configure-flags.
Remove 'patch-configure phase.
[native-inputs]: Add xfce4-dev-tools.

Change-Id: Ic5b4a82b1d14e24b11efac7f655ddb8f43a0b9da
Signed-off-by: 宋文武 <iyzsong@member.fsf.org>
---
 gnu/packages/xfce.scm | 69 +++++++++++++++++++------------------------
 1 file changed, 31 insertions(+), 38 deletions(-)

diff --git a/gnu/packages/xfce.scm b/gnu/packages/xfce.scm
index 230a2788a9499fc993803ad29a60a2ab6d0a7602..28d2a8478c59013297670b2c99fa3f123dd7216b 100644
--- a/gnu/packages/xfce.scm
+++ b/gnu/packages/xfce.scm
@@ -443,50 +443,43 @@ windowing-system-independent manner.")
   (package
     (name "xfce4-panel")
     (version "4.20.0")
-    (source (origin
-              (method url-fetch)
-              (uri (string-append "https://archive.xfce.org/src/xfce/"
-                                  name "/" (version-major+minor version) "/"
-                                  name "-" version ".tar.bz2"))
-              (sha256
-               (base32
-                "1f235lwmqavvsay9899gm7p2z3fdha6qgx05wczikhhnbmgwsczz"))))
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://gitlab.xfce.org/xfce/xfce4-panel")
+             (commit (string-append name "-" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "049dhis9106zig5awr9ppnxm357d93z842h015pd8rni9sayc7m0"))))
     (build-system gnu-build-system)
     (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (add-before 'configure 'patch-configure
-           (lambda _
-             (substitute* "configure"
-               ;; XDG_CHECK_PACKAGE_BINARY requires an absolute path.
-               (("\\$PKG_CONFIG --variable=gdbus_codegen gio-2.0")
-                "type -p gdbus-codegen"))))
-         (add-after 'unpack 'fix-tzdata-path
-           (lambda* (#:key inputs #:allow-other-keys)
-             (substitute* (string-append "plugins/clock/clock.c")
-               (("/usr/share/zoneinfo")
-                (search-input-directory inputs "share/zoneinfo"))))))))
-    (native-inputs
-     (list pkg-config
-           intltool
-           `(,glib "bin")))
-    (propagated-inputs
-     (list gtk+ ; required by libxfce4panel-2.0.pc
-           libxfce4util)) ; required by libxfce4panel-2.0.pc
-    (inputs
-     (list tzdata ;; For fix-tzdata-path phase only.
-           exo
-           xfconf
-           garcon
-           gtk-layer-shell
-           libwnck
-           libxfce4ui
-           libxfce4windowing))
+     (list
+      #:configure-flags
+      #~(list "--enable-maintainer-mode" ;for panel-marshal.h, etc
+              "--enable-gtk-doc")
+      #:phases #~(modify-phases %standard-phases
+                   (add-after 'unpack 'fix-tzdata-path
+                     (lambda* (#:key inputs #:allow-other-keys)
+                       (substitute* (string-append "plugins/clock/clock.c")
+                         (("/usr/share/zoneinfo")
+                          (search-input-directory inputs "share/zoneinfo"))))))))
+    (native-inputs (list xfce4-dev-tools))
+    (propagated-inputs (list gtk+ ;required by libxfce4panel-2.0.pc
+                             libxfce4util)) ;required by libxfce4panel-2.0.pc
+    (inputs (list tzdata ;For fix-tzdata-path phase only.
+                  exo
+                  xfconf
+                  garcon
+                  gtk-layer-shell
+                  libwnck
+                  libxfce4ui
+                  libxfce4windowing))
     (native-search-paths
      (list (search-path-specification
             (variable "XDG_DATA_DIRS")
             (files '("share")))))
-    (home-page "https://www.xfce.org/")
+    (home-page "https://docs.xfce.org/xfce/xfce4-panel/")
     (synopsis "Xfce desktop panel")
     (description
      "Desktop panel for Xfce, which contains program launchers, window buttons,