diff options
author | Christopher Baines <mail@cbaines.net> | 2023-05-31 08:48:42 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2023-05-31 08:48:42 +0100 |
commit | b21d58dc1470e4e8a2b9f3a624925ba9637bebcb (patch) | |
tree | da2457004f744d3da73fa03aeca5f422c3404c64 /guix-qa-frontpage/server.scm | |
parent | 0c7b9fb68d042d7369944322f7cd3711310c197b (diff) | |
download | qa-frontpage-b21d58dc1470e4e8a2b9f3a624925ba9637bebcb.tar qa-frontpage-b21d58dc1470e4e8a2b9f3a624925ba9637bebcb.tar.gz |
Try to reduce the frequency of the requests to issues.guix.gnu.org
To avoid the DoS protection.
Diffstat (limited to 'guix-qa-frontpage/server.scm')
-rw-r--r-- | guix-qa-frontpage/server.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/guix-qa-frontpage/server.scm b/guix-qa-frontpage/server.scm index b232b40..bf4a589 100644 --- a/guix-qa-frontpage/server.scm +++ b/guix-qa-frontpage/server.scm @@ -157,7 +157,7 @@ database 'latest-patchwork-series-by-issue latest-patchwork-series-by-issue - #:ttl 1200)) + #:ttl 1800)) (latest-series-with-overall-statuses (map (lambda (series) @@ -356,7 +356,7 @@ database 'latest-patchwork-series-by-issue latest-patchwork-series-by-issue - #:ttl 1200) + #:ttl 1800) (string->number number)))) (if series (let* ((base-and-target-refs @@ -517,7 +517,7 @@ port. Also, the port used can be changed by passing the --port option.\n" #:key (number-of-series-to-refresh 250)) (define frequency - (* 10 60)) + (* 15 60)) (define (refresh-data) (simple-format (current-error-port) |