diff --git a/tests/run.scm b/tests/run.scm
index 8f1a9d6..fa8e2ca 100644
--- a/tests/run.scm
+++ b/tests/run.scm
@@ -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)