aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2023-05-05 18:53:58 +0100
committerChristopher Baines <mail@cbaines.net>2023-05-05 18:53:58 +0100
commit7daaaf8155fb2c591cb3e59d70af16d66bbab8a0 (patch)
treed3b741c9df315c7f14fd79994b2b3ac37186cebc
parent44294bdab412d81ae315cad78146c8e3a3e5386f (diff)
downloadbuild-coordinator-7daaaf8155fb2c591cb3e59d70af16d66bbab8a0.tar
build-coordinator-7daaaf8155fb2c591cb3e59d70af16d66bbab8a0.tar.gz
Log which inputs are missing
As this can be useful.
-rw-r--r--guix-build-coordinator/agent.scm11
1 files changed, 8 insertions, 3 deletions
diff --git a/guix-build-coordinator/agent.scm b/guix-build-coordinator/agent.scm
index 000c78c..dc22cda 100644
--- a/guix-build-coordinator/agent.scm
+++ b/guix-build-coordinator/agent.scm
@@ -862,9 +862,14 @@ but the guix-daemon claims it's unavailable"
(find-missing-inputs derivation (derivation-inputs derivation))))
(if (null? missing-inputs)
'((result . success))
- `((result . failure)
- (failure_reason . missing_inputs)
- (missing_inputs . ,(list->vector missing-inputs))))))
+ (begin
+ (log-msg lgr 'DEBUG
+ build-id ": missing inputs: "
+ missing-inputs)
+
+ `((result . failure)
+ (failure_reason . missing_inputs)
+ (missing_inputs . ,(list->vector missing-inputs)))))))
(failure
'((result . failure)
(failure_reason . could_not_delete_outputs)))))