     (case msg-type 
       :chsk/recv
       (let [[recv-type recv-msg] msg]
-        (println "Recv event " event)
+        ;(println "Recv event " event)
         (msg-controller recv-type recv-msg))
       :chsk/state (when (:first-open? msg)
                     (chsk-send! [:deployment/get-listing])

                    (println "First opened: " event)))))

(sente/start-chsk-router! ch-chsk event-handler)

(defn main []
  (om/root

          (dom/div
            (b/toolbar {}
                       (apply (partial b/dropdown {:bs-style "primary" 
                                                   :title (or (:id deployment) "Deployments")})
                              (for [[id info] (reverse (sort-by (comp :created-at val) 
                                                                deployments))]
                                (b/menu-item {:key id
