aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2023-08-10 09:42:14 +0100
committerChristopher Baines <mail@cbaines.net>2023-08-10 09:42:14 +0100
commit15a5f5c39b398e6d01cc8112e2016fcf1313bc42 (patch)
tree97c0c478214d700c5010acbb10df7757eefafc7b
parent3affd310980c3a82b47cfdf9cde15ee69b013e04 (diff)
downloadbuild-coordinator-15a5f5c39b398e6d01cc8112e2016fcf1313bc42.tar
build-coordinator-15a5f5c39b398e6d01cc8112e2016fcf1313bc42.tar.gz
Ignore self output references when looking for potential source refs
-rw-r--r--guix-build-coordinator/hooks.scm6
1 files changed, 5 insertions, 1 deletions
diff --git a/guix-build-coordinator/hooks.scm b/guix-build-coordinator/hooks.scm
index 87fbf61..f7e911a 100644
--- a/guix-build-coordinator/hooks.scm
+++ b/guix-build-coordinator/hooks.scm
@@ -120,7 +120,11 @@
string=?)
(map (lambda (input)
(basename (assq-ref input 'output)))
- derivation-inputs))))
+ derivation-inputs)
+ ;; Ignore references to outputs of this build
+ (map (lambda (output)
+ (basename (assq-ref output 'output)))
+ build-outputs))))
(unless (null? potential-referenced-source-files)
(display