From 2acfafffb246dedd6c2c4102a52ef795c9592629 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=E5=AE=8B=E6=96=87=E6=AD=A6?= <iyzsong@member.fsf.org>
Date: Sat, 11 Jan 2025 11:33:29 +0800
Subject: [PATCH] gnu: libxcursor: Set a better default XCURSORPATH.

* gnu/packages/xorg.scm (libxcursor)[arguments]: Add "--with-cursorpath" to
configure-flags.

Change-Id: I821cd440cf4e9e6fcc67c9164a38b81e8d793dff
---
 gnu/packages/xorg.scm | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/xorg.scm b/gnu/packages/xorg.scm
index 56e0e47f226933640680581b67cc733d710cfb3e..3944aec0d4d987bbac3323e1dad95610739a2026 100644
--- a/gnu/packages/xorg.scm
+++ b/gnu/packages/xorg.scm
@@ -5424,7 +5424,17 @@ Wayland.")
          "1h62narayrhrkqalrmx7z3s6yppw1acbp5id3skrvrygshnl1sgx"))))
     (build-system gnu-build-system)
     (arguments
-     '(#:configure-flags '("--disable-static")))
+     (list
+      #:configure-flags
+      #~(list "--disable-static"
+              ;; Set default path, used when XCURSOR_PATH is unset.
+              (string-append "--with-cursorpath="
+                             (string-join
+                              '("~/.local/share/icons" "~/.icons"
+                                "~/.guix-profile/share/icons"
+                                "/run/current-system/profile/share/icons"
+                                "/usr/share/icons")
+                              ":")))))
     (propagated-inputs
      (list libx11 libxrender libxfixes xorgproto))
     (native-inputs