branch master updated: hydra: bayfront: Collect more garbage.

[Christopher Baines]

This is an automated email from the git hooks/post-receive script.

cbaines pushed a commit to branch master
in repository maintenance.

The following commit(s) were added to refs/heads/master by this push:
     new a4c5263  hydra: bayfront: Collect more garbage.
a4c5263 is described below

commit a4c52634573b703f9640ffd4f4034f1f514e7c28
Author: Christopher Baines <mail@cbaines.net>
AuthorDate: Wed Sep 13 12:22:24 2023 +0100

    hydra: bayfront: Collect more garbage.
    
    The bayfront store doesn't need to be very big, so collect more
    garbage. Currently it's now just over 100GiB, so it would be good to
    not see it grow much more than this.
    
    * hydra/bayfront.scm (services): Collect more garbage.
---
 hydra/bayfront.scm | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/hydra/bayfront.scm b/hydra/bayfront.scm
index c5372f9..ed55f09 100644
--- a/hydra/bayfront.scm
+++ b/hydra/bayfront.scm
@@ -1151,14 +1151,12 @@ proxy_set_header  Via  $via;"
                (let ((threshold (* 1600 GiB)))
                  (list #~(job '(next-hour-from (next-day (range 1 31 7)) '(2))
                               (string-append
-                               #$guix "/bin/guix gc -F"
-                               #$(number->string threshold)))
+                               #$guix "/bin/guix gc"))
 
                        #~(job '(next-hour '(1))
                               (string-append
                                #$guix "/bin/guix gc -F"
-                               #$(number->string
-                                  (quotient threshold 2)))))))))
+                               #$(number->string threshold))))))))
 
     firewall-service