diff options
author | Christopher Baines <mail@cbaines.net> | 2023-05-14 11:08:47 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2023-05-14 11:08:47 +0100 |
commit | e0f9851522bcbd082f8a3cc7ec41dd5c3492dbe9 (patch) | |
tree | ff02c1e5a43ca92fe7e277e1354e7a3785e39865 /guix-build-coordinator/agent-messaging | |
parent | fa74164db0e61ceb68b1408efa02b96b48d80342 (diff) | |
download | build-coordinator-e0f9851522bcbd082f8a3cc7ec41dd5c3492dbe9.tar build-coordinator-e0f9851522bcbd082f8a3cc7ec41dd5c3492dbe9.tar.gz |
Move some logging
So if it fails, it doesn't leave things in an inconsistent state.
Diffstat (limited to 'guix-build-coordinator/agent-messaging')
-rw-r--r-- | guix-build-coordinator/agent-messaging/http/server.scm | 6 |
1 files changed, 3 insertions, 3 deletions
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 |