Remove log statement
This commit is contained in:
parent
48e7ef1b50
commit
e3eb2639cc
2 changed files with 1 additions and 3 deletions
|
@ -35,8 +35,7 @@
|
||||||
(defn connect-and-handle-events [to-db db-name & [mongo-url]]
|
(defn connect-and-handle-events [to-db db-name & [mongo-url]]
|
||||||
(a/go-loop []
|
(a/go-loop []
|
||||||
(if-let [state (<! to-db)]
|
(if-let [state (<! to-db)]
|
||||||
(do (println "DB got new state")
|
(do (update-db! state)
|
||||||
(update-db! state)
|
|
||||||
(recur))
|
(recur))
|
||||||
(println "Database disconnected")))
|
(println "Database disconnected")))
|
||||||
(let [_conn (connect! db-name mongo-url)]
|
(let [_conn (connect! db-name mongo-url)]
|
||||||
|
|
|
@ -14,7 +14,6 @@
|
||||||
(defn send-pending-msg [websocket]
|
(defn send-pending-msg [websocket]
|
||||||
(when (and (.isOpen websocket)
|
(when (and (.isOpen websocket)
|
||||||
(not (nil? @pending-msg)))
|
(not (nil? @pending-msg)))
|
||||||
(logs "Send message:" @pending-msg)
|
|
||||||
(.send websocket (pr-str @pending-msg))
|
(.send websocket (pr-str @pending-msg))
|
||||||
(reset! pending-msg nil)))
|
(reset! pending-msg nil)))
|
||||||
|
|
||||||
|
|
Loading…
Add table
Reference in a new issue