diff options
| author | Christopher Baines <mail@cbaines.net> | 2024-06-23 17:26:22 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2024-06-23 17:26:22 +0100 |
| commit | 34f84adaf3f2c332281ecf0004f5a580c909c290 (patch) | |
| tree | fc9ec88a43d7ce52d4574d03f40386db7f0687a9 /scripts | |
| parent | 82f9371c714f14ca59efb8d67b20e9c85b5c86d1 (diff) | |
| download | nar-herder-34f84adaf3f2c332281ecf0004f5a580c909c290.tar nar-herder-34f84adaf3f2c332281ecf0004f5a580c909c290.tar.gz | |
Allow specifying the minimum free space
Diffstat (limited to 'scripts')
| -rw-r--r-- | scripts/nar-herder.in | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/scripts/nar-herder.in b/scripts/nar-herder.in index a0e3127..a611018 100644 --- a/scripts/nar-herder.in +++ b/scripts/nar-herder.in @@ -148,6 +148,13 @@ "none" (string->number arg)) (alist-delete 'storage-limit result)))) + (option '("storage-minimum-free-space") #t #f + (lambda (opt name arg result) + (alist-cons 'storage-minimum-free-space + (if (string=? arg "none") + "none" + (string->number arg)) + (alist-delete 'storage-minimum-free-space result)))) ;; (stored-on https://other-nar-herder-server) ;; and=((stored-on https://other-nar-herder-server) (stored-on https://different-server)) |