From 8136c1578eadbd0630695d86d52b6227db791539 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Mon, 17 Apr 2023 16:00:16 +0200 Subject: [PATCH] substitute: Download nar from another server upon ETIMEDOUT. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Previously, 'guix substitute' would fail abruptly with something like: guix substitute: warning: while fetching https://ci.guix.gnu.org/nar/lzip/…-example: server is somewhat slow guix substitute: warning: try `--no-substitutes' if the problem persists guix substitute: error: connect*: Connection timed out substitution of /gnu/store/…-example failed * guix/scripts/substitute.scm (network-error?): Add ETIMEDOUT. --- guix/scripts/substitute.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/guix/scripts/substitute.scm b/guix/scripts/substitute.scm index 109b0c7900..2bbe045364 100755 --- a/guix/scripts/substitute.scm +++ b/guix/scripts/substitute.scm @@ -577,7 +577,7 @@ STATUS-PORT." (or (and (system-error? exception) (let ((errno (system-error-errno (cons 'system-error (exception-args exception))))) - (memv errno (list ECONNRESET ECONNABORTED + (memv errno (list ECONNRESET ECONNABORTED ETIMEDOUT ECONNREFUSED EHOSTUNREACH ENOENT)))) ;for "file://" (and (kind-and-args? exception)