scripts: time-machine: Handle EPIPE errors when displaying help.
* guix/scripts/time-machine.scm (%options): Handle EPIPE errors when displaying help.
This commit is contained in:
parent
c4aa37fde9
commit
a293b1cfa7
@ -107,7 +107,7 @@ Execute COMMAND ARGS... in an older version of Guix.\n"))
|
|||||||
(alist-cons 'authenticate-channels? #f result)))
|
(alist-cons 'authenticate-channels? #f result)))
|
||||||
(option '(#\h "help") #f #f
|
(option '(#\h "help") #f #f
|
||||||
(lambda args
|
(lambda args
|
||||||
(show-help)
|
(leave-on-EPIPE (show-help))
|
||||||
(exit 0)))
|
(exit 0)))
|
||||||
(option '(#\V "version") #f #f
|
(option '(#\V "version") #f #f
|
||||||
(lambda args
|
(lambda args
|
||||||
|
Loading…
Reference in New Issue
Block a user