diff options
| author | Simon Tournier <zimon.toutoune@gmail.com> | 2023-10-16 17:36:56 +0200 |
|---|---|---|
| committer | Simon Tournier <zimon.toutoune@gmail.com> | 2023-10-17 14:52:00 +0200 |
| commit | 61a7e16d8dd8325517db4072eb6b910b7f0adc1f (patch) | |
| tree | 2a3fece89f39a7af70fd7f9eff0f32d25f8b4675 /guix/scripts/pack.scm | |
| parent | ef8a615861f3a007aa36b3375e775adb621ec052 (diff) | |
| download | guix-61a7e16d8dd8325517db4072eb6b910b7f0adc1f.tar guix-61a7e16d8dd8325517db4072eb6b910b7f0adc1f.tar.gz | |
scripts: pack: Handle EPIPE errors when displaying help.
* guix/scripts/pack.scm (%options): Handle EPIPE errors when displaying help.
Diffstat (limited to 'guix/scripts/pack.scm')
| -rw-r--r-- | guix/scripts/pack.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/scripts/pack.scm b/guix/scripts/pack.scm index 78044fd625..bdbea49910 100644 --- a/guix/scripts/pack.scm +++ b/guix/scripts/pack.scm @@ -1360,7 +1360,7 @@ last resort for relocation." ;; Specifications of the command-line options. (cons* (option '(#\h "help") #f #f (lambda args - (show-help) + (leave-on-EPIPE (show-help)) (exit 0))) (option '(#\V "version") #f #f (lambda args |