2eb109b

src/net/bowmap/instance.clj modified (view file)

@@ -54,7 +54,7 @@                   (read-and-handle-packet pk client)))))  (defn connect! [client packets-in packets-out]-  (let [messages-out (chan)]+  (let [messages-out (chan 1024)]     ; TODO error handling and disconnect     (io-thread       (loop [client client]