[shepherd] 02/02: service: Print "has been started" message only once.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository shepherd.

commit 7dfab801633795c061fd83ce2680e0c37be4abe6
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Mon Mar 6 12:00:29 2023 +0100

    service: Print "has been started" message only once.
    
    * modules/shepherd/service.scm (start): Print "has been started" message
    only when we won the race.
---
 modules/shepherd/service.scm | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/modules/shepherd/service.scm b/modules/shepherd/service.scm
index c788f07..2dab0ca 100644
--- a/modules/shepherd/service.scm
+++ b/modules/shepherd/service.scm
@@ -648,13 +648,12 @@ that could not be started."
                                          (put-message notification #f)
                                          (report-exception 'start obj key 
args)))))
                         (put-message notification running)
+                        (local-output (if running
+                                         (l10n "Service ~a has been started.")
+                                          (l10n "Service ~a could not be 
started."))
+                                     (canonical-name obj))
                         running))))))
 
-           (local-output (if running
-                            (l10n "Service ~a has been started.")
-                             (l10n "Service ~a could not be started."))
-                        (canonical-name obj))
-
            running))))
 
 (define (replace-service old-service new-service)