diff options
Diffstat (limited to 'guix-build-coordinator/datastore')
-rw-r--r-- | guix-build-coordinator/datastore/sqlite.scm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/guix-build-coordinator/datastore/sqlite.scm b/guix-build-coordinator/datastore/sqlite.scm index 069a18a..eba98a6 100644 --- a/guix-build-coordinator/datastore/sqlite.scm +++ b/guix-build-coordinator/datastore/sqlite.scm @@ -804,7 +804,8 @@ UPDATE agents SET active = :active WHERE id = :uuid" (sqlite-prepare db " -SELECT status, load_average_1min, timestamp, processor_count +SELECT status, load_average_1min, system_uptime, + timestamp, processor_count FROM agent_status WHERE agent_id = :agent_id" #:cache? #t))) @@ -814,10 +815,12 @@ WHERE agent_id = :agent_id" #:agent_id agent-id) (match (sqlite-step-and-reset statement) - (#(status 1min_load_average timestamp + (#(status 1min_load_average + system_uptime timestamp processor_count) `((status . ,status) (1min_load_average . ,1min_load_average) + (system_uptime . ,system_uptime) (timestamp . ,timestamp) (processor_count . ,processor_count))) (_ #f)))))) |