diff options
| author | Christopher Baines <mail@cbaines.net> | 2023-05-17 17:41:45 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2023-05-17 17:41:45 +0100 |
| commit | c97163f38f747f3eaebdc19707236810a0b8b047 (patch) | |
| tree | b1bc121fb62a6674c9983ec9953c6077664c584e | |
| parent | e7f41c1ee26993a5c6f6d6a3eed31b3feaa1bfd9 (diff) | |
| download | build-coordinator-c97163f38f747f3eaebdc19707236810a0b8b047.tar build-coordinator-c97163f38f747f3eaebdc19707236810a0b8b047.tar.gz | |
Fix listing builds stopping early
| -rw-r--r-- | scripts/guix-build-coordinator.in | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/scripts/guix-build-coordinator.in b/scripts/guix-build-coordinator.in index f3be3d5..daa0873 100644 --- a/scripts/guix-build-coordinator.in +++ b/scripts/guix-build-coordinator.in @@ -573,8 +573,7 @@ tags: "\n"))) (vector->list (assoc-ref response "builds"))) - (when (= (vector-length (assoc-ref response "builds")) - (assq-ref opts 'limit)) + (unless (= (vector-length (assoc-ref response "builds")) 0) (loop (assoc-ref (vector-ref (assoc-ref response "builds") |