aboutsummaryrefslogtreecommitdiff
path: root/scripts
diff options
context:
space:
mode:
Diffstat (limited to 'scripts')
-rw-r--r--scripts/guix-build-coordinator.in12
1 files changed, 8 insertions, 4 deletions
diff --git a/scripts/guix-build-coordinator.in b/scripts/guix-build-coordinator.in
index 23a356f..62b48e2 100644
--- a/scripts/guix-build-coordinator.in
+++ b/scripts/guix-build-coordinator.in
@@ -463,12 +463,16 @@
rest)))
(define (display-build build-details)
(simple-format #t "derivation name: ~A
-priority: ~A
-processed?: ~A
-canceled?: ~A
+priority: ~A
+processed?: ~A
+canceled?: ~A
"
(assoc-ref build-details "derivation-name")
- (assoc-ref build-details "priority")
+ (if (assoc-ref build-details "processed")
+ (assoc-ref build-details "priority")
+ (simple-format #f "~A\nderived priority: ~A"
+ (assoc-ref build-details "priority")
+ (assoc-ref build-details "derived-priority")))
(if (assoc-ref build-details "processed")
"yes"
"no")