 
 ;; Address to host
 (def address "ws://localhost:5000")
-(def address "ws://tree-mind-tone.herokuapp.com")
+;(def address "ws://tree-mind-tone.herokuapp.com")
 
 (defn open-connection
   "Establishes a loop that maintains a connection to a server.

              ;; Let loop die if ws-channel dies
              (go-loop
                []
                (when-let [message (<! write-channel)]
                  (when (not (h/has-type message (:type h/socket-closed-message)))
                    (do
                      (>! formated-channel message)

              (loop []
                (when-let [message (<! formated-channel)]
                  (do 
                    (>! write-to-client message)
                    (recur))))

              ;; Send termination message to write loop and notify on meta channel
              (>! read-from-client h/socket-closed-message)
              (>! meta-channel  (h/attempting-connect-message address)))))
        (recur)))
    [(h/combine-channels write-to-client read-from-client)
     meta-channel]))
