Avoid erroring when processing emails again

These changes allow processing emails again, and just creating job and branch
entries where data is missing.
This commit is contained in:
Christopher Baines 2019-08-05 20:59:48 +01:00
parent 712dd377a1
commit 9e80bda4f9
7 changed files with 84 additions and 5 deletions

View file

@ -82,7 +82,24 @@
((id)
(process-load-new-guix-revision-job id))))))
(exec-query conn "TRUNCATE load_new_guix_revision_jobs CASCADE")))
(exec-query conn "TRUNCATE load_new_guix_revision_jobs CASCADE")
(test-assert "test duplicate job handling"
(with-postgresql-transaction
conn
(lambda (conn)
(enqueue-load-new-guix-revision-job
conn
(git-repository-url->git-repository-id conn "test-url")
"test-commit"
"test-source")
(enqueue-load-new-guix-revision-job
conn
(git-repository-url->git-repository-id conn "test-url")
"test-commit"
"test-source")
#t)
#:always-rollback? #t))))
(test-end)