clean up the run-test-server fixture

dakrone · Mar 12, 2011 · 5857542 · 5857542
1 parent 932a60c
commit 5857542
Showing 1 changed file with 2 additions and 3 deletions.
diff --git a/test/subrosa/test/expect.clj b/test/subrosa/test/expect.clj
@@ -15,10 +15,9 @@
   (let [server (create-server *port*)]
     (try
       (with-out-str ((:start-fn server)))
-      #_(Thread/sleep 500)
       (f)
-      (with-out-str ((:stop-fn server)))
-      #_(Thread/sleep 2000))))
+      (finally
+       (with-out-str ((:stop-fn server)))))))
 
 (defn socket-read-line [in]
   (try