 
 (def app-state
   (atom
-    {:active-channel :general
-     :channels {:general ["foobar" "spam eggs"]
-                :belgium ["Vive la frite !" "On aime la biere ici."]}}))
+   {:active-channel [:general]
+    :channels {:general ["foobar" "spam eggs"]
+               :belgium ["Vive la frite !" "On aime la biere ici."]}}))
 
 (go (while true
       (let [msg (<! chat-channel)

    (render-state [this state]
      (sab/html
       [:div.blue-shade.panel.channel-list
        (om/build-all channel-view (keys (:channels app)))]))))

(defn message-view [message owner]
  (reify

      (aset input "value" "")
      (.focus input)
      (put! out-channel #js {:type "chat"
                             :channel (name (first (:active-channel @app)))
                             :msg text}))))

(defn msg-input-view [app owner]
