17/40: scripts: import: Handle EPIPE errors when displaying help.

[guix-commits]

zimoun pushed a commit to branch master
in repository guix.

commit 79b6eef7501c1be6e6b93da5b6e8fd53b0ff0afc
Author: Simon Tournier <zimon.toutoune@gmail.com>
AuthorDate: Mon Oct 16 17:53:21 2023 +0200

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

diff --git a/guix/scripts/import.scm b/guix/scripts/import.scm
index 4ddd8d46a1..1e8ffd25ec 100644
--- a/guix/scripts/import.scm
+++ b/guix/scripts/import.scm
@@ -78,7 +78,7 @@ Run IMPORTER with ARGS.\n"))
      (format (current-error-port)
              (G_ "guix import: missing importer name~%")))
     ((or ("-h") ("--help"))
-     (show-help)
+     (leave-on-EPIPE (show-help))
      (exit 0))
     ((or ("-V") ("--version"))
      (show-version-and-exit "guix import"))