Added (test-exit) at the end of tests/run.scm
This commit is contained in:
parent
5951b78908
commit
b8cab6e3b5
1 changed files with 3 additions and 1 deletions
|
@ -9,9 +9,11 @@
|
||||||
(load-apps (awful-apps)))))
|
(load-apps (awful-apps)))))
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(test "data: sse\n\n"
|
(test "data: sse\n\n"
|
||||||
(with-input-from-request
|
(with-input-from-request
|
||||||
(make-request
|
(make-request
|
||||||
uri: (uri-reference "http://localhost:8080/sse")
|
uri: (uri-reference "http://localhost:8080/sse")
|
||||||
headers: (headers '((accept text/event-stream))))
|
headers: (headers '((accept text/event-stream))))
|
||||||
#f
|
#f
|
||||||
read-string))))
|
read-string))))
|
||||||
|
|
||||||
|
(test-exit)
|
||||||
|
|
Loading…
Reference in a new issue