From 00c7b4bb4432ff3f5ba28dca3625479e1fa129d8 Mon Sep 17 00:00:00 2001 From: Mathieu Othacehe Date: Thu, 10 Sep 2020 14:37:03 +0200 Subject: [PATCH] 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. --- tests/http.scm | 9 +++++++-- 1 file 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