From e0f9851522bcbd082f8a3cc7ec41dd5c3492dbe9 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Sun, 14 May 2023 11:08:47 +0100 Subject: Move some logging So if it fails, it doesn't leave things in an inconsistent state. --- guix-build-coordinator/agent-messaging/http/server.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'guix-build-coordinator/agent-messaging') diff --git a/guix-build-coordinator/agent-messaging/http/server.scm b/guix-build-coordinator/agent-messaging/http/server.scm index 4233ebc..5c5e8af 100644 --- a/guix-build-coordinator/agent-messaging/http/server.scm +++ b/guix-build-coordinator/agent-messaging/http/server.scm @@ -397,6 +397,9 @@ port. Also, the port used can be changed by passing the --port option.\n" (cons update-channel existing-channels)))) (begin + (log-msg logger 'DEBUG build-uuid + ": starting thread to compute hash for " filename) + (hash-set! update-channels-by-filename filename (list update-channel)) @@ -409,9 +412,6 @@ port. Also, the port used can be changed by passing the --port option.\n" (stat:size (stat filename)) 0)) - (log-msg logger 'DEBUG build-uuid - ": starting thread to compute hash for " filename) - (call-with-new-thread (lambda () (with-exception-handler -- cgit v1.2.3