gered/clj-browserchannel
Archived
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

some more doc comments and minor formatting

Browse source
This commit is contained in:
Gered 2016-05-09 17:49:42 -04:00
parent 333e4873d5
commit 4fbf7b7c7d
2 changed files with 18 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
clj-browserchannel-immutant-adapter/src/net/thegeez/browserchannel/immutant_async_adapter.clj
View file

@ -21,6 +21,8 @@
(iasync/close channel))) (iasync/close channel)))
(defn wrap-immutant-async-adapter (defn wrap-immutant-async-adapter
"wraps the ring handler with an async adapter necessary for
browserchannel sessions."
[handler] [handler]
(fn [request] (fn [request]
(let [resp (handler request)] (let [resp (handler request)]
@ -35,7 +37,15 @@
resp)))) resp))))
(defn run-immutant [handler options] (defn run-immutant
"convenience function for wrapping a ring handler with the necessary
immutant async adapter and also starting up an immutant server
at the same time. many applications may want to just directly
use wrap-immutant-async-adapter instead and not use this function.
options is passed directly to immutant. see immutant.web/run
for a description of the available options."
[handler options]
(-> handler (-> handler
(wrap-immutant-async-adapter) (wrap-immutant-async-adapter)
(iweb/run options))) (iweb/run options)))