Add wrap-context

zk · Mar 1, 2015 · 68d6286 · 68d6286
1 parent 6fbc8fa
commit 68d6286
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/clj/nsfw/http.clj b/src/clj/nsfw/http.clj
@@ -247,3 +247,7 @@
         {:store (ring.middleware.session.cookie/cookie-store
                   {:domain domain
                    :key key})})))
+
+(defn wrap-context [h ctx]
+  (fn [r]
+    (h (assoc r :ctx ctx))))