diff options
author | Christopher Baines <mail@cbaines.net> | 2019-08-04 09:42:21 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2019-08-04 09:42:21 +0100 |
commit | 002ae7685cc053cdce56c76e74c656a224180e6c (patch) | |
tree | 02cbffe02b5667514739b58d03cd1ea5826a323a | |
parent | 84197686ce227b21dae48745f2919a51e070c3c5 (diff) | |
download | data-service-002ae7685cc053cdce56c76e74c656a224180e6c.tar data-service-002ae7685cc053cdce56c76e74c656a224180e6c.tar.gz |
Clear the previous log entry when starting a job
-rw-r--r-- | guix-data-service/jobs/load-new-guix-revision.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/guix-data-service/jobs/load-new-guix-revision.scm b/guix-data-service/jobs/load-new-guix-revision.scm index a24e24a..2dd3907 100644 --- a/guix-data-service/jobs/load-new-guix-revision.scm +++ b/guix-data-service/jobs/load-new-guix-revision.scm @@ -122,8 +122,12 @@ (define (insert-empty-log-entry conn job-id) (exec-query conn + "DELETE FROM load_new_guix_revision_job_logs WHERE job_id = $1" + (list job-id)) + (exec-query + conn "INSERT INTO load_new_guix_revision_job_logs (job_id, contents) VALUES -($1, NULL) ON CONFLICT DO NOTHING" +($1, NULL)" (list job-id))) (define (count-log-parts conn job-id) |