diff options
author | Christopher Baines <mail@cbaines.net> | 2021-01-31 20:01:50 +0000 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2021-01-31 20:01:50 +0000 |
commit | d85977a7598c708127a303e32e1f8d91ec4236c7 (patch) | |
tree | 51f9263816b9383a43f7d607234ced492b1d6c60 | |
parent | 6e27cf3c6bfb63fbd2c924cdd04e1fa73bdf2c00 (diff) | |
download | build-coordinator-d85977a7598c708127a303e32e1f8d91ec4236c7.tar build-coordinator-d85977a7598c708127a303e32e1f8d91ec4236c7.tar.gz |
Remove the created after derivation ordered allocator argument
As this is preventing some builds from excuting.
-rw-r--r-- | guix-build-coordinator/build-allocator.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/guix-build-coordinator/build-allocator.scm b/guix-build-coordinator/build-allocator.scm index 9246f52..69a1888 100644 --- a/guix-build-coordinator/build-allocator.scm +++ b/guix-build-coordinator/build-allocator.scm @@ -445,10 +445,10 @@ datastore #:key (planned-builds-for-agent-limit 512) - (builds-created-after "datetime('now', '-60 days')") + (builds-created-after #f) ;; "datetime('now', '-60 days')") metrics-registry) (define (log . args) - (when #f + (when #t (simple-format #t "allocator: ~A\n" (string-join (map (lambda (arg) (simple-format #f "~A" arg)) |