summaryrefslogtreecommitdiff
path: root/tw/home.scm
diff options
context:
space:
mode:
authorTimo Wilken2023-11-10 18:56:38 +0100
committerTimo Wilken2023-11-10 18:56:38 +0100
commite3e2fcdbd9b1afca78cd641078612572aa53225b (patch)
tree6882a4ac2a0a7950806d9005efb5388108e53615 /tw/home.scm
parent853b727c39d19979e5de13aff879a83713c5ff3b (diff)
Make graphical services depend on new x11-display service
This should avoid spam from failing services when logging in on a TTY.
Diffstat (limited to 'tw/home.scm')
-rw-r--r--tw/home.scm6
1 files changed, 6 insertions, 0 deletions
diff --git a/tw/home.scm b/tw/home.scm
index eac7d94b..ebccfce9 100644
--- a/tw/home.scm
+++ b/tw/home.scm
@@ -416,6 +416,7 @@ show_border=1
(shepherd-service
(documentation "Emacs server; connect using emacsclient.")
(provision '(emacs))
+ (requirement '(x11-display))
(start #~(make-forkexec-constructor
(list #$(file-append emacs "/bin/emacs") "--fg-daemon")))
(stop #~(make-kill-destructor)))))
@@ -428,6 +429,7 @@ show_border=1
(shepherd-service
(documentation "NetworkManager applet; provides a GUI for network connections.")
(provision '(nm-applet))
+ (requirement '(x11-display))
(start #~(make-forkexec-constructor
(list #$(file-append network-manager-applet "/bin/nm-applet"))))
(stop #~(make-kill-destructor)))
@@ -435,6 +437,7 @@ show_border=1
(shepherd-service
(documentation "Dunst notification daemon; displays desktop notifications.")
(provision '(dunst))
+ (requirement '(x11-display))
(start #~(make-forkexec-constructor
(list #$(file-append dunst "/bin/dunst"))))
(stop #~(make-kill-destructor)))
@@ -449,6 +452,7 @@ show_border=1
(shepherd-service
(documentation "Picom compositor; enables transparent windows in X.")
(provision '(picom))
+ (requirement '(x11-display))
(start #~(make-forkexec-constructor
(list #$(file-append (grafter picom) "/bin/picom")
"--config" #$(local-file "home/files/picom.conf"))))
@@ -457,6 +461,7 @@ show_border=1
(shepherd-service
(documentation "Source Xresources on login.")
(provision '(xrdb))
+ (requirement '(x11-display))
(one-shot? #t)
(start #~(lambda _
(invoke #$(file-append xrdb "/bin/xrdb") "-merge"
@@ -467,6 +472,7 @@ show_border=1
(shepherd-service
(documentation "Fix X keyboard map on login; passmenu needs this.")
(provision '(fix-xdotool))
+ (requirement '(x11-display))
(one-shot? #t)
(start #~(lambda _
(use-modules (ice-9 rdelim)