                        {:href "tables.html"   :text "Tables"}
                        {:href "login.html"    :text "Login"}
                        {:href "user.html"     :text "User"}
-                     ]}))
+                      ]}))
 
 (defn refresh-navigation []
 ;;   (

  (:import goog.History
           goog.History.EventType))


(def app-state
  (atom {:top-nav-bar [

  (render [_]

          ;;(println "Count top-nav-bar: " (count top-nav-bar))
          ;;(println "Last: text " (:text (last top-nav-bar)))
          ;; (map #(println "text " %) top-nav-bar)

          (html
           [:ul.nav.navbar-nav
            (for [item top-nav-bar]
              [:li [:a {:href (:href item)} (:text item)]])])))

(defn main []
  (doto history
