tests: Adjust minetest tests.
Fixes a regression introduced in
e7910f4882
.
* tests/minetest.scm (call-with-packages): Add #:timeout parameter to
'http-fetch' mock.
This commit is contained in:
parent
12fd3a9755
commit
213d3cad6a
@ -194,7 +194,7 @@
|
|||||||
(scm->json-port
|
(scm->json-port
|
||||||
(list->vector (filter-map argument-list->json sorted-argument-lists))))
|
(list->vector (filter-map argument-list->json sorted-argument-lists))))
|
||||||
(mock ((guix http-client) http-fetch
|
(mock ((guix http-client) http-fetch
|
||||||
(lambda* (url #:key headers)
|
(lambda* (url #:key headers timeout)
|
||||||
(unless (string-prefix? "mock://api/packages/" url)
|
(unless (string-prefix? "mock://api/packages/" url)
|
||||||
(error "the URL ~a should not be used" url))
|
(error "the URL ~a should not be used" url))
|
||||||
(define resource
|
(define resource
|
||||||
|
Loading…
Reference in New Issue
Block a user