From 8bbf2eb78cfec44e929e008b589788631847498b Mon Sep 17 00:00:00 2001
From: Tommi Reiman <tommi@iki.fi>
Date: Sun, 3 Dec 2017 21:07:41 +0200
Subject: [PATCH] Polish tests

---
 test/cljc/reitit/middleware_test.cljc | 15 ++++++++-------
 1 file changed, 8 insertions(+), 7 deletions(-)

diff --git a/test/cljc/reitit/middleware_test.cljc b/test/cljc/reitit/middleware_test.cljc
index 9fc40a4a..ebb39533 100644
--- a/test/cljc/reitit/middleware_test.cljc
+++ b/test/cljc/reitit/middleware_test.cljc
@@ -105,6 +105,12 @@
             (dotimes [_ 10]
               (is (= :request (app :request))))))))))
 
+(defn create-app [router]
+  (let [h (middleware/middleware-handler router)]
+    (fn [path]
+      (if-let [f (h path)]
+        (f [])))))
+
 (deftest middleware-handler-test
 
   (testing "all paths should have a handler"
@@ -125,12 +131,7 @@
                      ["/ping" handler]
                      ["/admin" {:middleware [[mw :admin]]}
                       ["/ping" handler]]]])
-          ->app (fn [router]
-                  (let [h (middleware/middleware-handler router)]
-                    (fn [path]
-                      (if-let [f (h path)]
-                        (f [])))))
-          app (->app router)]
+          app (create-app router)]
 
       (testing "not found"
         (is (= nil (app "/favicon.ico"))))
@@ -152,7 +153,7 @@
                        ["/api" {:name ::api
                                 :middleware [mw1 mw2 mw3 mw2]
                                 :handler handler}])
-              app (->app router)]
+              app (create-app router)]
 
           (is (= [::mw1 ::mw3 :ok ::mw3 ::mw1] (app "/api")))