[shepherd] 02/03: service: ‘start-in-the-background’ shows each failure only once.

[Ludovic Courtès]

civodul pushed a commit to branch main
in repository shepherd.

commit f8ff40b0a095b0e123f7acd5cf30bee71effc8c3
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Fri Jan 5 00:29:22 2024 +0100

    service: ‘start-in-the-background’ shows each failure only once.
    
    Previously, failing services would be listed as many times as they had
    been unsuccessfully started.
    
    * modules/shepherd/service.scm (start-in-the-background): Add call to
    ‘delete-duplicates’ when displaying FAILURES.
---
 modules/shepherd/service.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/modules/shepherd/service.scm b/modules/shepherd/service.scm
index 8eac844..5be78bd 100644
--- a/modules/shepherd/service.scm
+++ b/modules/shepherd/service.scm
@@ -1254,7 +1254,8 @@ background:~{ ~a~}."
                "The following services could not be started in the \
 background:~{ ~a~}."
                (length failures))
-         (map service-canonical-name failures))))))
+         (delete-duplicates
+          (map service-canonical-name failures)))))))
 
   ;; 'spawn-fiber' returns zero values, which can confuse callees; return one.
   *unspecified*)