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

fix session-status

Browse source
This commit is contained in:
Gijs Stuurman 2012-04-23 21:44:07 +02:00
parent d12d4cb24a
commit 295560b1bc
2 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
clj-browserchannel-server/project.clj
View file

@ -1,4 +1,4 @@
(defproject net.thegeez/clj-browserchannel-server "0.0.1" (defproject net.thegeez/clj-browserchannel-server "0.0.2"
:description "BrowserChannel server implementation in Clojure" :description "BrowserChannel server implementation in Clojure"
:dependencies [[org.clojure/clojure "1.3.0"] :dependencies [[org.clojure/clojure "1.3.0"]
[ring/ring-core "1.1.0-beta3"] [ring/ring-core "1.1.0-beta3"]

2
clj-browserchannel-server/src/net/thegeez/browserchannel.clj
View file

@ -461,7 +461,7 @@
outstanding-bytes (let [buffer (:array-buffer session)] outstanding-bytes (let [buffer (:array-buffer session)]
(if (empty? buffer) (if (empty? buffer)
0 0
(reduce + 0 (map count (map json/json-str) buffer))))] (reduce + 0 (map count (map json/json-str buffer)))))]
[has-back-channel last-sent-array-id outstanding-bytes])) [has-back-channel last-sent-array-id outstanding-bytes]))
;; convience function to send data to a session ;; convience function to send data to a session