From 15a5f5c39b398e6d01cc8112e2016fcf1313bc42 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Thu, 10 Aug 2023 09:42:14 +0100 Subject: Ignore self output references when looking for potential source refs --- guix-build-coordinator/hooks.scm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'guix-build-coordinator/hooks.scm') 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 -- cgit v1.2.3