mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2026-04-06 21:20:33 +02:00
http-client: Include EPIPE in network-error?.
The substitute script checks for EPIPE errors, so this allows using network-error?. * guix/http-client.scm (network-error?): Include EPIPE. Change-Id: I96d76d77997ed21a38bf9c41479fea67ab01e084
This commit is contained in:
@@ -93,7 +93,7 @@
|
||||
(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)
|
||||
|
||||
Reference in New Issue
Block a user