                                                   reconciler
                                                   `[(app/select-page {:selected-page :dances})
                                                     :app/selected-page]))}
-                              (dom/span #js {:className "glyphicon glyphicon-plus"}))
+                              (dom/span #js {:className "glyphicon glyphicon-edit"}))
                   (dom/p nil (str "Dances : " (count (:class/dances selected-class)))))
 
                 (map #(dom/button #js {:className "col-sm-6 btn btn-default"}


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; DancesView
(defui DancesView
  static om/IQuery
  (query [_]


            ;; Create
            (dom/div #js {:className "form-group"}
              (dom/div #js {:className "col-sm-offset-2 col-sm-8"}
                (dom/button #js {:className "btn btn-default"
                                 :onClick   #(om/transact! this `[(app/select-page
                                                                    {:selected-page :classes})
                                                                  :app/selected-page])}
                            (dom/span #js {:className "glyphicon glyphicon-arrow-left"})
                            " Undo")
                (dom/button
                  #js {:className "btn btn-primary col-sm-offset-8"
                       :type      "submit"
                       :onClick   (fn [e]
                                    (om/transact!
