aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2020-10-10 19:52:37 +0100
committerChristopher Baines <mail@cbaines.net>2020-10-10 19:52:37 +0100
commitd4a8f2173aab144f580cc31b132b3290dc6cc452 (patch)
treea7f14d2efb53320da7768ff5c0e05045d6ea1683
parente339d1a6a391c3bea06a0127ff5914b94d6316b0 (diff)
downloadbuild-coordinator-d4a8f2173aab144f580cc31b132b3290dc6cc452.tar
build-coordinator-d4a8f2173aab144f580cc31b132b3290dc6cc452.tar.gz
Exclude .tmp files when checking for build logs
-rw-r--r--guix-build-coordinator/coordinator.scm3
1 files changed, 2 insertions, 1 deletions
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