me
/
guix
Archived
1
0
Fork 0
Code

ui: "guix help" silently ignores EPIPE. 

This avoids a backtrace when running "guix help | head" or similar.

* guix/ui.scm (run-guix): Wrap 'show-guix-help' calls in
'leave-on-EPIPE'.
master
Ludovic Courtès 2020-10-01 12:35:00 +02:00
parent 786a04c9ae
commit 7dc19c33fc
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
guix/ui.scm
View File

@ -2134,7 +2134,7 @@ and signal handling have already been set up."
(G_ "guix: missing command name~%")) (G_ "guix: missing command name~%"))
(show-guix-usage)) (show-guix-usage))
((or ("-h") ("--help")) ((or ("-h") ("--help"))
(show-guix-help)) (leave-on-EPIPE (show-guix-help)))
((or ("-V") ("--version")) ((or ("-V") ("--version"))
(show-version-and-exit "guix")) (show-version-and-exit "guix"))
(((? option? o) args ...) (((? option? o) args ...)
@ -2145,7 +2145,7 @@ and signal handling have already been set up."
(apply run-guix-command (string->symbol command) (apply run-guix-command (string->symbol command)
'("--help"))) '("--help")))
(("help" args ...) (("help" args ...)
(show-guix-help)) (leave-on-EPIPE (show-guix-help)))
((command args ...) ((command args ...)
(apply run-guix-command (apply run-guix-command
(string->symbol command) (string->symbol command)