summary refs log tree commit diff
diff options
context:
space:
mode:
authorSimon Tournier <zimon.toutoune@gmail.com>2023-10-16 18:42:43 +0200
committerSimon Tournier <zimon.toutoune@gmail.com>2023-10-17 14:52:00 +0200
commitef8a615861f3a007aa36b3375e775adb621ec052 (patch)
treeed1faf728ade23567f6cac8805df3a7fd447114d
parent55c3776023d47820d532cb226974e0de171f636a (diff)
downloadguix-ef8a615861f3a007aa36b3375e775adb621ec052.tar.gz
scripts: offload: Handle EPIPE errors when displaying help.
* guix/scripts/offload.scm (guix-offload): Handle EPIPE errors when displaying
help.
-rw-r--r--guix/scripts/offload.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/guix/scripts/offload.scm b/guix/scripts/offload.scm
index 7b76126d35..137e3b5fe3 100644
--- a/guix/scripts/offload.scm
+++ b/guix/scripts/offload.scm
@@ -868,11 +868,12 @@ machine."
     (("--version")
      (show-version-and-exit "guix offload"))
     (("--help")
-     (format #t (G_ "Usage: guix offload SYSTEM MAX-SILENT-TIME \
+     (leave-on-EPIPE
+      (format #t (G_ "Usage: guix offload SYSTEM MAX-SILENT-TIME \
 PRINT-BUILD-TRACE? BUILD-TIMEOUT
 Process build offload requests written on the standard input, possibly
 offloading builds to the machines listed in '~a'.~%")
-             %machine-file)
+              %machine-file))
      (display (G_ "
 This tool is meant to be used internally by 'guix-daemon'.\n"))
      (show-bug-report-information))