From d4a8f2173aab144f580cc31b132b3290dc6cc452 Mon Sep 17 00:00:00 2001
From: Christopher Baines <mail@cbaines.net>
Date: Sat, 10 Oct 2020 19:52:37 +0100
Subject: Exclude .tmp files when checking for build logs

---
 guix-build-coordinator/coordinator.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/guix-build-coordinator/coordinator.scm b/guix-build-coordinator/coordinator.scm
index d835772..f561dd9 100644
--- a/guix-build-coordinator/coordinator.scm
+++ b/guix-build-coordinator/coordinator.scm
@@ -468,7 +468,8 @@
          (scandir (build-log-file-directory build-id)
                   (negate (cut member <> '("." ".."))))))
     (match potential-files
-      ((file) file)
+      ((file) (and (not (string-suffix? ".tmp" file))
+                   file))
       (() #f)
       (#f #f)                           ; directory doesn't exist
       (files (error
-- 
cgit v1.2.3