     (render [_]
       (html
         [:div.container
-         [:h1 (:text cursor)]
+         [:h1 "Post to screen"]
          (om/build tab-view cursor)]))))
 
 (defn main []

         [:hr]
         (case (get tabs selected)
           "Home" [:h2 "Home"]
           "Post" (post-form))]))))


(defn application [cursor owner]


(enable-console-print!)

(defonce app-state (atom {:posts []}))

(defn submit-code [posts e]
  (let [code (-> js/document
                 (.getElementById "code")
                 .-value)]
    (om/transact! posts #(conj % code))
    (.preventDefault e)))

(defn post-form [posts]
  (html
    [:form.form-horizontal {:role "form"
                            :on-submit (partial submit-code posts)}
     [:div.form-group
      [:label.control-label.col-xs-1 {:for "code"} "Code:"]
      [:div.col-xs-10
       [:textarea#code.form-control {:rows "15"}]]]
     [:div.form-group
      [:div.col-xs-offset-1.col-xs-10
       [:button.btn {:type "submit"} "Post code"]]]]))

(defn tab-view [cursor owner]
  (reify
