From 988ee89f06fdd078b5620f0ae65111da6049e15e Mon Sep 17 00:00:00 2001 From: Rutherther Date: Sat, 17 Aug 2024 14:43:09 +0200 Subject: [PATCH] feat: add gtk2 rc file path variable --- home/modules/ruther/home/services/gtk.scm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/home/modules/ruther/home/services/gtk.scm b/home/modules/ruther/home/services/gtk.scm index c3e0e88..bb37aba 100644 --- a/home/modules/ruther/home/services/gtk.scm +++ b/home/modules/ruther/home/services/gtk.scm @@ -92,7 +92,7 @@ (call-with-output-file (string-append #$output "/share/icons/default/index.theme") (lambda (port) (format port - "[Icon Theme]~%Inherits=~a~%" + "[Icon Theme]~%Name=Default~%Comment=Default cursor theme~%Inherits=~a~%" #$(gtk-theme-configuration-name (home-gtk-configuration-cursor-theme config)))))))))))))) (define (add-xcursor-environment config) @@ -102,7 +102,8 @@ (cursor-size (gtk-theme-configuration-size cursor-theme))) (if (nil? cursor-name) '() - `(("XCURSOR_THEME" . ,cursor-name) + `(("GTK2_RC_FILES" . "$HOME/.gtkrc-2.0") + ("XCURSOR_THEME" . ,cursor-name) ("XCURSOR_SIZE" . ,(format #f "~a" cursor-size)))))) ;; TODO: this path should not be hardcoded here (define (add-gtk-config-file config) -- 2.48.1