civodul pushed a commit to branch master
in repository guix.

commit 90aa90eb05429553402e0b5225d23f84742a9286
Author: Ludovic Courtès <l...@gnu.org>
AuthorDate: Thu Feb 13 12:38:52 2025 +0100

    home: services: unclutter: Add a ‘stop’ method.
    
    * 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(-)

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 <l...@gnu.org>
+;;; Copyright © 2022-2023, 2025 Ludovic Courtès <l...@gnu.org>
 ;;; Copyright © 2022 ( <pa...@disroot.org>
 ;;; Copyright © 2023 conses <cont...@conses.eu>
 ;;; Copyright © 2023 Janneke Nieuwenhuizen <jann...@gnu.org>
@@ -353,7 +353,6 @@ according to time of day.")))
     (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 @@ according to time of day.")))
                       (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

Reply via email to