   (println (aget params "path"))
   (println (aget params "body"))
   )
-;; todo we need to replace this
+;; TODO we need to replace this
+;; TODO save off channel
 (defn ^:private startup
   "Actually connects the web socket to the server and starts the local event loop."
   [cursor owner]

      (startup cursor owner))
    om/IDidMount
    (did-mount [_]
      (let [publication (:publication (om/get-shared owner))
            server-message-events (sub publication :server-msg (chan))
            dispatcher-events (sub publication :dispatcher (chan))

    )
  )

;; TODO move the loops and matches out
;; TODO we need to respond to incoming messages
(defn ws-widget [cursor owner]
  (reify
    om/IInitState
