Added (test-exit) at the end of tests/run.scm

This commit is contained in:
arthurmaciel 2014-07-09 15:37:21 -03:00
parent 5951b78908
commit b8cab6e3b5

View file

@ -9,9 +9,11 @@
(load-apps (awful-apps)))))
(lambda ()
(test "data: sse\n\n"
(with-input-from-request
(with-input-from-request
(make-request
uri: (uri-reference "http://localhost:8080/sse")
headers: (headers '((accept text/event-stream))))
#f
read-string))))
(test-exit)