Add request to connection handler parameters

This commit is contained in:
Vassil Dichev 2012-05-08 14:07:42 +03:00 committed by Gijs Stuurman
parent 0ffd7dbd7d
commit 2a7e65ef5b
2 changed files with 2 additions and 2 deletions

View file

@ -19,7 +19,7 @@
file/wrap-file-info
(browserchannel/wrap-browserchannel {:base "/channel"
:on-session
(fn [session-id]
(fn [session-id req]
(println "session " session-id "connected")
(browserchannel/add-listener

View file

@ -448,7 +448,7 @@
session-agent (agent session)]
(swap! sessions assoc id session-agent)
(when-let [notify (:on-session options)]
(notify id))
(notify id req))
session-agent)))
(defn session-status [session]