seasharp/Rosenthal
1
0
Fork 0
mirror of https://codeberg.org/hako/Rosenthal.git synced 2026-05-09 18:14:02 +00:00
Code Issues Packages Projects Releases Wiki Activity

home: services: theme: Also write icon theme to $XDG_DATA_HOME.

Browse Source 
* modules/rosenthal/services/desktop.scm (home-theme-icons-config)
(home-theme-xdg-data-files): New procedures.
(%home-theme-files): Rename to ...
(home-theme-files): ...this new procedure.
(home-theme-service-type) [extensions]: Adjust accordingly.
This commit is contained in:
Hilton Chain 2026-04-13 09:43:38 +08:00
parent 60f70d4923
commit 54137b18ef
No known key found for this signature in database
GPG Key ID: ACC66D09CA528292
1 changed files with 15 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
modules/rosenthal/services/desktop.scm
View File

@ -586,13 +586,20 @@ compositor.")))
hicolor-icon-theme
packages)))
(define %home-theme-files
(define home-theme-icons-config
(match-record-lambda <home-theme-configuration>
(icon-theme)
`((".icons/default/index.theme"
,(ini-file "index.theme"
#~'(("icon theme"
("Inherits" . #$icon-theme))))))))
(ini-file "index.theme"
#~'(("icon theme"
("Inherits" . #$icon-theme))))))
(define (home-theme-files config)
`((".icons/default/index.theme"
,(home-theme-icons-config config))))
(define (home-theme-xdg-data-files config)
`(("icons/default/index.theme"
,(home-theme-icons-config config))))
(define home-theme-gtk2
(match-record-lambda <home-theme-configuration>
@ -623,7 +630,9 @@ compositor.")))
(service-extension home-profile-service-type
%home-theme-profile)
(service-extension home-files-service-type
%home-theme-files)
home-theme-files)
(service-extension home-xdg-data-files-service-type
home-theme-xdg-data-files)
(service-extension home-gtk2-service-type
home-theme-gtk2)
(service-extension home-gtk3-service-type