36/40: scripts: substitute: Handle EPIPE errors when displaying help.

[guix-commits]

zimoun pushed a commit to branch master
in repository guix.

commit c4aa37fde9732fc3600400ef420a732f2cf8fd97
Author: Simon Tournier <zimon.toutoune@gmail.com>
AuthorDate: Mon Oct 16 18:44:35 2023 +0200

    scripts: substitute: Handle EPIPE errors when displaying help.
    
    * guix/scripts/substitute.scm (%options): Handle EPIPE errors when 
displaying
    help.
---
 guix/scripts/substitute.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/scripts/substitute.scm b/guix/scripts/substitute.scm
index 8b1f7d6fda..126f0f9c69 100755
--- a/guix/scripts/substitute.scm
+++ b/guix/scripts/substitute.scm
@@ -813,7 +813,7 @@ default value."
     ((or ("-V") ("--version"))
      (show-version-and-exit "guix substitute"))
     ((or ("-h") ("--help") ())
-     (show-help)
+     (leave-on-EPIPE (show-help))
      (exit 0))
     (_ #t))