        [:a.brand.dropdown-toggle {:href "#"} "Cadence"]
        [:div.nav-collapse
         [:ul.nav
-         [:li.active [:a {:href "/"}
-                      [:i.icon-home.icon-white] " Home"]]
+         [:li [:a {:href "/"}
+               [:i.icon-home.icon-white] " Home"]]
          [:li [:a {:href "/about"} "About"]]]
         [:ul.nav.pull-right
          [:li.divider-vertical]

    [:div#main-wrapper
     [:div#main.container content]]))

(defpartial control-group [{:keys [type name placeholder more]}]
  [:div.control-group
   [:label.control-label {:for name} (str name ": ")]
   [:div.controls
    [:input {:type type :name name :placeholder placeholder}]
    more]])

(defpartial form-actions-buttons [{:keys [extra-class value]}]
  [(keyword (str "button.btn" extra-class))
   {:type "submit"} value])

(defpartial control-group-form [id+class params items buttons]
     [(keyword (str "form" id+class)) params
      [:fieldset
       (map control-group items)
       [:div.form-actions
        (map form-actions-buttons buttons)]]])

(defpartial inline-form [id+class params items]
     [(keyword (str "form" id+class)) params
      [:fieldset
       (map (fn [{:keys [type name placeholder more]}]
              [:div.control-group
               [:label.control-label {:for name} (str name ": ")]
               [:div.controls
                [:input {:type type :name name :placeholder placeholder}]
                more]])
            items)]])

    [:body
     content]
    (include-js "/js/bootstrap.min.js")
    (include-js "/js/cadence.js")
    (cljs/include-scripts)))

(defpartial user-links []
  [:li.dropdown
