 (defn wrap-version [handler]
     (fn [request]
         (handler (assoc request :app-version "0.1"))))
+
+(defn wrap-spy [handler]
+    ""
+    (fn [request]
+        (println "-------------------------------")
+        (println "Incoming Request Map:")
+        (clojure.pprint/pprint request)
+        (let [response (handler request)]
+            (println "Outgoing Response Map:")
+            (clojure.pprint/pprint response)
+            (println "-------------------------------")
+            response)))
 
 (defroutes all-routes
     (GET "/" [request] home-handler)

    (HEAD "/" [] "Preview something"))

(defn -main []
    (run-server (reload/wrap-reload (wrap-version #'all-routes)) {:port 5000}))
    ; (run-server (reload/wrap-reload #'all-routes) {:port 5000}))

            [org.httpkit.server :refer [run-server]]
            [ring.middleware.reload :as reload]
            [ring.middleware.defaults :refer :all]))

(require 'clojure.pprint)

(defn home-handler
    [request]
