 
 (defonce log (agent []))
 
-(def debug true)
+(def debug false)
 
 (defn log-req
   [app]

  (swap! channels assoc id {:channel channel :data register-data}))

; -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

(comment
 (start-server! :port 8082)

; -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
; server connection, sending / receiving

(declare register-channel find-channel channels app
         register-service-handler close-connection-service-handler
         send-message-impl)

(defrecord MessengerImpl [host port stop-fn receive-channel]
  m/IReceiver
