From f1725d0b64e034cacc0fe9f5b279a13246ceab97 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Sun, 14 Nov 2021 14:26:07 +0000 Subject: Don't error for 404 responses in coordinator-http-request --- guix-build-coordinator/agent-messaging/http.scm | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'guix-build-coordinator/agent-messaging/http.scm') diff --git a/guix-build-coordinator/agent-messaging/http.scm b/guix-build-coordinator/agent-messaging/http.scm index f3ce0b8..a29c908 100644 --- a/guix-build-coordinator/agent-messaging/http.scm +++ b/guix-build-coordinator/agent-messaging/http.scm @@ -151,6 +151,11 @@ (make-agent-error-from-coordinator (assoc-ref error "error")))))) + ((eq? code 404) + (values + (and body (json-string->scm (utf8->string body))) + response)) + ((>= (response-code response) 400) (let ((body (coordinator-handle-failed-request log -- cgit v1.2.3