01/02: hydra: cuirass: Tweak jobset priority and polling period.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository maintenance.

commit cf9a927361d75e2f72b2f383b74eed31430c9cfa
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Sun Oct 1 12:18:49 2023 +0200

    hydra: cuirass: Tweak jobset priority and polling period.
    
    * hydra/modules/sysadmin/services.scm (cuirass-specs): Increment
    ‘priority’ for jobsets related to images, tests, and time traveling.
    Set ‘period’ field on all non-Guix jobsets to reduce their polling
    rate.
---
 hydra/modules/sysadmin/services.scm | 13 +++++++++----
 1 file changed, 9 insertions(+), 4 deletions(-)

diff --git a/hydra/modules/sysadmin/services.scm 
b/hydra/modules/sysadmin/services.scm
index 2eba5e1..8bc2e6d 100644
--- a/hydra/modules/sysadmin/services.scm
+++ b/hydra/modules/sysadmin/services.scm
@@ -313,7 +313,7 @@ collection instead."
                        "pinebook-pro-barebones-raw-image"))))
                 (notifications #$(cuirass-notifications))
                 (period 86400)
-                (priority 2)
+                (priority 3)
                 (systems '#$systems))
                (specification
                 (name "tarball")
@@ -326,14 +326,14 @@ collection instead."
                    (path ""))))
                 (notifications #$(cuirass-notifications))
                 (period 86400)
-                (priority 2)
+                (priority 3)
                 (systems '#$systems))
                (specification
                 (name "tests")
                 (build 'system-tests)
                 (notifications #$(cuirass-notifications))
                 (period 86400)
-                (priority 2)
+                (priority 3)
                 (systems '("x86_64-linux")))
                (specification
                 (name "source")
@@ -356,7 +356,7 @@ collection instead."
                 (name "time-travel")
                 (build '(manifests "etc/time-travel-manifest.scm"))
                 (period (* 12 3600))
-                (priority 2)
+                (priority 3)
                 (systems '("x86_64-linux" "i686-linux")))
               (specification
                 (name "rust-team")
@@ -393,6 +393,7 @@ collection instead."
               (branch "main"))
              %default-guix-channel))
       (priority 5)
+      (period (* 10 60))
       (systems '#$systems))
 
      (specification
@@ -410,6 +411,7 @@ collection instead."
                  "7F73 0343 F2F0 9F3C 77BF  79D3 2E25 EE8B 6180 2BB3"))))
              %default-guix-channel))
       (priority 5)
+      (period (* 10 60))
       (systems '#$systems))
 
      (specification
@@ -427,6 +429,7 @@ collection instead."
                  "3CE4 6455 8A84 FDC6 9DB4  0CFB 090B 1199 3D9A EBB5"))))
              %default-guix-channel))
       (priority 5)
+      (period (* 10 60))
       (systems '#$systems))
 
      (specification
@@ -444,6 +447,7 @@ collection instead."
                  "7F73 0343 F2F0 9F3C 77BF  79D3 2E25 EE8B 6180 2BB3"))))
              %default-guix-channel))
       (priority 5)
+      (period (* 10 60))
       (systems '#$systems))
 
      (specification
@@ -461,6 +465,7 @@ collection instead."
                  "3CE4 6455 8A84 FDC6 9DB4  0CFB 090B 1199 3D9A EBB5"))))
              %default-guix-channel))
       (priority 5)
+      (period (* 10 60))
       (systems '#$systems))))