From 55c3776023d47820d532cb226974e0de171f636a Mon Sep 17 00:00:00 2001 From: Simon Tournier Date: Mon, 16 Oct 2023 18:48:13 +0200 Subject: [PATCH] scripts: locate: Handle EPIPE errors when displaying help. * guix/scripts/locate.scm (%options): Handle EPIPE errors when displaying help. --- guix/scripts/locate.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/guix/scripts/locate.scm b/guix/scripts/locate.scm index 79af533fd9..5f3e28797f 100644 --- a/guix/scripts/locate.scm +++ b/guix/scripts/locate.scm @@ -543,7 +543,7 @@ (define (show-help) (define %options (list (option '(#\h "help") #f #f - (lambda args (show-help) (exit 0))) + (lambda args (leave-on-EPIPE (show-help)) (exit 0))) (option '(#\V "version") #f #f (lambda (opt name arg result) (show-version-and-exit "guix locate")))