refactor: use service instead of simple-service whenever possible
parent
d8de79bf59
commit
1eec92abfd
13
radio.scm
13
radio.scm
|
@ -94,12 +94,11 @@
|
||||||
(cache-home "$HOME/.cache")
|
(cache-home "$HOME/.cache")
|
||||||
(config-home "$HOME/.config")
|
(config-home "$HOME/.config")
|
||||||
(data-home "$HOME/.local/share")
|
(data-home "$HOME/.local/share")
|
||||||
(runtime-dir "/run/user/1000")
|
|
||||||
(log-home "$HOME/.local/var/log")
|
(log-home "$HOME/.local/var/log")
|
||||||
(state-home "$HOME/.local/state")))
|
(state-home "$HOME/.local/state")
|
||||||
|
(runtime-dir "/run/user/1000")))
|
||||||
|
|
||||||
(simple-service 'xdg-user-directories-service
|
(service home-xdg-user-directories-service-type
|
||||||
home-xdg-user-directories-service-type
|
|
||||||
(home-xdg-user-directories-configuration
|
(home-xdg-user-directories-configuration
|
||||||
(desktop "$HOME/area")
|
(desktop "$HOME/area")
|
||||||
(documents "$HOME/documents")
|
(documents "$HOME/documents")
|
||||||
|
@ -110,8 +109,7 @@
|
||||||
(publicshare "")
|
(publicshare "")
|
||||||
(templates "")))
|
(templates "")))
|
||||||
|
|
||||||
(simple-service 'xdg-mime-applications-service
|
(service home-xdg-mime-applications-service-type
|
||||||
home-xdg-mime-applications-service-type
|
|
||||||
(home-xdg-mime-applications-configuration
|
(home-xdg-mime-applications-configuration
|
||||||
(default (associate-right
|
(default (associate-right
|
||||||
('icecat.desktop
|
('icecat.desktop
|
||||||
|
@ -161,8 +159,7 @@
|
||||||
"application/pdf"
|
"application/pdf"
|
||||||
"application/epub+zip"))))))
|
"application/epub+zip"))))))
|
||||||
|
|
||||||
(simple-service 'xdg-configuration-files-service
|
(service home-xdg-configuration-files-service-type
|
||||||
home-xdg-configuration-files-service-type
|
|
||||||
`(("awesome/rc.lua" ,file:awesome-config)
|
`(("awesome/rc.lua" ,file:awesome-config)
|
||||||
("awesome/themes/current.lua" ,file:awesome-theme)
|
("awesome/themes/current.lua" ,file:awesome-theme)
|
||||||
("emacs/init.el" ,file:emacs-init)
|
("emacs/init.el" ,file:emacs-init)
|
||||||
|
|
Loading…
Reference in New Issue