aboutsummaryrefslogtreecommitdiff
path: root/guix-build-coordinator/agent-messaging/http/server.scm
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2020-10-11 11:38:27 +0100
committerChristopher Baines <mail@cbaines.net>2020-10-11 13:58:19 +0100
commit1530fad51727e2ed6f65a6cad2d870384774545b (patch)
tree443aad796f2572050ed92a9b42f0e59207792aae /guix-build-coordinator/agent-messaging/http/server.scm
parentd4a8f2173aab144f580cc31b132b3290dc6cc452 (diff)
downloadbuild-coordinator-1530fad51727e2ed6f65a6cad2d870384774545b.tar
build-coordinator-1530fad51727e2ed6f65a6cad2d870384774545b.tar.gz
Move around the code for build log file locations
build-log-file-location replaces build-log-file-exists? as it doesn't always return a boolean, it also changes to return an absolute filepath for the log file if it exists, as this will be easier to use.
Diffstat (limited to 'guix-build-coordinator/agent-messaging/http/server.scm')
-rw-r--r--guix-build-coordinator/agent-messaging/http/server.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/guix-build-coordinator/agent-messaging/http/server.scm b/guix-build-coordinator/agent-messaging/http/server.scm
index 7656c6f..16f5ba7 100644
--- a/guix-build-coordinator/agent-messaging/http/server.scm
+++ b/guix-build-coordinator/agent-messaging/http/server.scm
@@ -338,7 +338,7 @@ port. Also, the port used can be changed by passing the --port option.\n"
(datastore-agent-for-build datastore uuid)))
(if (authenticated? agent-id-for-build request)
(let* ((output-file-name
- (build-log-file-location datastore uuid format))
+ (build-log-file-destination uuid format))
(tmp-output-file-name
(string-append output-file-name ".tmp")))
(mkdir-p (dirname output-file-name))