diff mbox series

[bug#70494,19/23] http-client: Include EPIPE in network-error?.

Message ID 34e716047df34db458e206540fe4217e166dabcc.1713692561.git.mail@cbaines.net
State New
Headers show
Series Groundwork for the Guile guix-daemon | expand

Commit Message

Christopher Baines April 21, 2024, 9:42 a.m. UTC 
The substitute script checks for EPIPE errors, so this allows using
network-error?.

* guix/http-client.scm (network-error?): Include EPIPE.

Change-Id: I96d76d77997ed21a38bf9c41479fea67ab01e084
---
 guix/http-client.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)
diff mbox series

Patch

diff --git a/guix/http-client.scm b/guix/http-client.scm
index 024705e9ec..a8d7d25762 100644
--- a/guix/http-client.scm
+++ b/guix/http-client.scm
@@ -93,7 +93,7 @@  (define network-error?
                (let ((errno (system-error-errno
                              (cons 'system-error (exception-args exception)))))
                  (memv errno (list ECONNRESET ECONNABORTED ETIMEDOUT
-                                   ECONNREFUSED EHOSTUNREACH
+                                   ECONNREFUSED EHOSTUNREACH EPIPE
                                    ENOENT))))     ;for "file://"
           (and (kind-and-args? exception)
                (memq (exception-kind exception)