From 90aa90eb05429553402e0b5225d23f84742a9286 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Thu, 13 Feb 2025 12:38:52 +0100 Subject: home: services: unclutter: Add a ‘stop’ method. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * gnu/home/services/desktop.scm (home-unclutter-shepherd-service): Remove ‘one-shot?’ field and set ‘stop’. Change-Id: I82b915d4260a62e628b419a497c50ecf2cbc356c --- gnu/home/services/desktop.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'gnu/home') diff --git a/gnu/home/services/desktop.scm b/gnu/home/services/desktop.scm index fc96ce9295..859dba776a 100644 --- a/gnu/home/services/desktop.scm +++ b/gnu/home/services/desktop.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2022-2023 Ludovic Courtès +;;; Copyright © 2022-2023, 2025 Ludovic Courtès ;;; Copyright © 2022 ( ;;; Copyright © 2023 conses ;;; Copyright © 2023 Janneke Nieuwenhuizen @@ -353,7 +353,6 @@ (define (home-unclutter-shepherd-service config) (modules '((shepherd support) ;for %user-log-dir (srfi srfi-1) (srfi srfi-26))) - (one-shot? #t) (start #~(lambda _ (fork+exec-command (list @@ -369,7 +368,8 @@ (define (home-unclutter-shepherd-service config) (remove (cut string-prefix? "DISPLAY=" <>) (default-environment-variables))) #:log-file - (string-append %user-log-dir "/unclutter.log"))))))) + (string-append %user-log-dir "/unclutter.log")))) + (stop #~(make-kill-destructor))))) (define home-unclutter-service-type (service-type -- cgit v1.2.3