[shepherd] 01/04: service: 'daemonize' action logs messages.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository shepherd.

commit e033ac1147005f080ea23d18457e5d229e9704e4
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Fri Jun 23 17:44:51 2023 +0200

    service: 'daemonize' action logs messages.
    
    * modules/shepherd/service.scm (root-service): Print messages upon
    'daemonize'.
---
 modules/shepherd/service.scm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/modules/shepherd/service.scm b/modules/shepherd/service.scm
index 6b54c3e..4fb811a 100644
--- a/modules/shepherd/service.scm
+++ b/modules/shepherd/service.scm
@@ -2823,9 +2823,12 @@ we want to receive these signals."
                 (l10n "Services already running, so not daemonizing."))
                #f)
               (else
+               (local-output (l10n "Daemonizing..."))
                (if (zero? (primitive-fork))
                    (begin
                      (catch-system-error (prctl PR_SET_CHILD_SUBREAPER 1))
+                     (local-output (l10n "Now running as process ~a.")
+                                   (getpid))
                      #t)
                    (primitive-exit 0))))))
      ;; Restart it - that does not make sense, but