From 36da93f487ae6e07edb2f7003acce24d55b895af Mon Sep 17 00:00:00 2001 From: Rutherther Date: Fri, 23 Aug 2024 20:51:47 +0200 Subject: [PATCH] fix: add kill destructor to wayland services --- home/modules/ruther/home/services/wayland.scm | 15 ++++++++++----- 1 file changed, 10 insertions(+), 5 deletions(-) diff --git a/home/modules/ruther/home/services/wayland.scm b/home/modules/ruther/home/services/wayland.scm index 1400485..4a15132 100644 --- a/home/modules/ruther/home/services/wayland.scm +++ b/home/modules/ruther/home/services/wayland.scm @@ -106,7 +106,8 @@ This should be called from a wayland compositor like this: `herd start wayland-d (home-emacs-configuration-emacs config) "/bin/emacs") "--fg-daemon" - '#$(home-emacs-configuration-extra-arguments config))))))) + '#$(home-emacs-configuration-extra-arguments config)))) + (stop #~(make-kill-destructor))))) (define-public home-emacs-service-type (service-type @@ -131,7 +132,8 @@ This should be called from a wayland compositor like this: `herd start wayland-d (cons* #$(file-append (home-network-manager-applet-configuration-network-manager-applet config) "/bin/nm-applet") - '#$(home-network-manager-applet-configuration-extra-arguments config))))))) + '#$(home-network-manager-applet-configuration-extra-arguments config)))) + (stop #~(make-kill-destructor))))) (define-public home-network-manager-applet-service-type (service-type @@ -156,7 +158,8 @@ This should be called from a wayland compositor like this: `herd start wayland-d (cons* #$(file-append (home-blueman-applet-configuration-blueman config) "/bin/blueman-applet") - '#$(home-blueman-applet-configuration-extra-arguments config))))))) + '#$(home-blueman-applet-configuration-extra-arguments config)))) + (stop #~(make-kill-destructor))))) (define-public home-blueman-applet-service-type (service-type @@ -181,7 +184,8 @@ This should be called from a wayland compositor like this: `herd start wayland-d (cons* #$(file-append (home-waybar-configuration-waybar config) "/bin/waybar") - '#$(home-waybar-configuration-extra-arguments config))))))) + '#$(home-waybar-configuration-extra-arguments config)))) + (stop #~(make-kill-destructor))))) (define-public home-waybar-service-type (service-type @@ -207,7 +211,8 @@ This should be called from a wayland compositor like this: `herd start wayland-d (cons* #$(file-append (home-gammastep-configuration-gammastep config) "/bin/gammastep") - '#$(home-gammastep-configuration-extra-arguments config))))))) + '#$(home-gammastep-configuration-extra-arguments config)))) + (stop #~(make-kill-destructor))))) (define-public home-gammastep-service-type (service-type -- 2.48.1