          [button "Sign-in" "button" my-data focus ]]]])))
 
 (defn set-page! [currnt-page]
-  (if (nil? (get-value! :user))(set-key-value :page-location
-                                              [login])
-      (set-key-value :page-location
-                     currnt-page)))
+  (set-key-value :page-location
+                 currnt-page))
 
 (defn is-authenticated? []
   (not (nil? (get-value! :user))))

           goog.json.Serializer
           goog.date.Date))

(def storage (r/atom {:documents {}
                      :current-page 1
                      :total-pages 1
                      :page-location nil
                      :user nil}))


(defn set-key-value [k v]

(defn main
  []
  (secretary/set-config! :prefix "#")
  (set-key-value :page-location [render-documents []])
  (r/render [page]
            (.getElementById js/document "app1"))
  (let [history (History.)]
