diff options
| author | Mathieu Othacehe <othacehe@gnu.org> | 2020-09-10 14:37:03 +0200 |
|---|---|---|
| committer | Mathieu Othacehe <othacehe@gnu.org> | 2020-09-10 15:16:16 +0200 |
| commit | 00c7b4bb4432ff3f5ba28dca3625479e1fa129d8 (patch) | |
| tree | 73b2edd8f7bc708d129c0077faa355b44e775151 /tests | |
| parent | f5b0d39328567a20336945bf1e2ff93aff1a9973 (diff) | |
| download | cuirass-00c7b4bb4432ff3f5ba28dca3625479e1fa129d8.tar cuirass-00c7b4bb4432ff3f5ba28dca3625479e1fa129d8.tar.gz | |
tests: Fix HTTP tests.
This is a follow-up of 154232bc767d002f69aa6bb1cdddfd108b98584b.
* tests/http.scm (evaluations-query-result): Add 'timestamp', 'checkouttime'
and 'evaltime' fields.
(fill-db): Pass a matching timestamp to "db-add-evaluation" calls.
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/http.scm | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/tests/http.scm b/tests/http.scm index e2d6982..23bfce6 100644 --- a/tests/http.scm +++ b/tests/http.scm @@ -79,6 +79,9 @@ #(((#:id . 2) (#:specification . "guix") (#:status . -1) + (#:timestamp . 1501347493) + (#:checkouttime . 0) + (#:evaltime . 0) (#:checkouts . #(((#:commit . "fakesha2") (#:input . "savannah") (#:directory . "dir3"))))))) @@ -189,8 +192,10 @@ (db-add-build build1) (db-add-build build2) (db-add-specification specification) - (db-add-evaluation "guix" checkouts1) - (db-add-evaluation "guix" checkouts2))) + (db-add-evaluation "guix" checkouts1 + #:timestamp 1501347493) + (db-add-evaluation "guix" checkouts2 + #:timestamp 1501347493))) (test-assert "/specifications" (match (call-with-input-string |