diff options
Diffstat (limited to 'tests/model-git-branch.scm')
| -rw-r--r-- | tests/model-git-branch.scm | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/tests/model-git-branch.scm b/tests/model-git-branch.scm index a879408..c69f69d 100644 --- a/tests/model-git-branch.scm +++ b/tests/model-git-branch.scm @@ -22,6 +22,25 @@ id (current-date))) #t) + #:always-rollback? #t)) + + (test-assert "insert-git-branch-entry works twice" + (with-postgresql-transaction + conn + (lambda (conn) + (let* ((url "test-url") + (id (git-repository-url->git-repository-id conn url))) + (insert-git-branch-entry conn + "master" + "test-commit" + id + (current-date)) + (insert-git-branch-entry conn + "master" + "test-commit" + id + (current-date))) + #t) #:always-rollback? #t)))) (test-end) |