diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/http.scm | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/http.scm b/tests/http.scm index f1d6e46..f80e515 100644 --- a/tests/http.scm +++ b/tests/http.scm @@ -192,6 +192,15 @@ (db-add-evaluation "guix" checkouts1) (db-add-evaluation "guix" checkouts2))) + (test-assert "/specifications" + (match (call-with-input-string + (utf8->string + (http-get-body (test-cuirass-uri "/specifications"))) + json->scm) + (#(spec) + (and (string=? (assoc-ref spec "name") "guix") + (vector? (assoc-ref spec "package-path-inputs")))))) + (test-assert "/build/1" (lset= equal? (call-with-input-string |