scripts: discover: Handle EPIPE errors when displaying help.

* guix/scripts/discover.scm (%options): Handle EPIPE errors when displaying help.
2023-10-16 18:04:08 +02:00 · 2023-10-16 18:04:08 +02:00 · 6c6071faf9
commit 6c6071faf9
parent a53e5fb121
1 changed files with 1 additions and 1 deletions
--- a/guix/scripts/discover.scm
+++ b/guix/scripts/discover.scm
@ -50,7 +50,7 @@ Discover Guix related services using Avahi.\n"))
                  (alist-cons 'cache arg result)))
        (option '(#\h "help") #f #f
                (lambda _
-                  (show-help)
+                  (leave-on-EPIPE (show-help))
                  (exit 0)))
        (option '(#\V "version") #f #f
                (lambda _