diff options
author | Christopher Baines <mail@cbaines.net> | 2022-10-09 11:59:28 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2022-10-09 11:59:28 +0100 |
commit | 7d0ce41fff0a976034328f9742ed5ea460eb5e50 (patch) | |
tree | 0bff8691b1b945835fa59299a4a40474afbbe408 /scripts/guix-build-coordinator.in | |
parent | 7912b9bfe3d40f6f5393d764c6a18cbdb4b6880e (diff) | |
download | build-coordinator-7d0ce41fff0a976034328f9742ed5ea460eb5e50.tar build-coordinator-7d0ce41fff0a976034328f9742ed5ea460eb5e50.tar.gz |
Include priority information in the allocation plan output
Also switch derivation-name to use an underscore.
Diffstat (limited to 'scripts/guix-build-coordinator.in')
-rw-r--r-- | scripts/guix-build-coordinator.in | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/scripts/guix-build-coordinator.in b/scripts/guix-build-coordinator.in index 77dd245..f36dc00 100644 --- a/scripts/guix-build-coordinator.in +++ b/scripts/guix-build-coordinator.in @@ -865,7 +865,11 @@ tags: (lambda (index build) (simple-format #t "~A: ~A\n" index (assoc-ref build "uuid")) (simple-format #t " derivation name: ~A\n" - (assoc-ref build "derivation-name")) + (assoc-ref build "derivation_name")) + (simple-format #t " priority: ~A\n" + (assoc-ref build "priority")) + (simple-format #t " derived priority: ~A\n" + (assoc-ref build "derived_priority")) (let ((tags (assoc-ref build "tags"))) (unless (eq? 0 (vector-length tags)) (simple-format #t " tags:\n") |