Add request to connection handler parameters
This commit is contained in:
parent
0ffd7dbd7d
commit
2a7e65ef5b
|
@ -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
|
||||
|
|
|
@ -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]
|
||||
|
|
Reference in a new issue