                          :default-title ""
                          :allow-html5-history false}))
 
-(defonce page (r/atom "index.html"))
-(defonce page-state (r/atom {:has-history false}))
+;; (defonce page (r/atom "index.html"))
+;; (defonce page-state (r/atom {:has-history false}))
 
 (defonce history nil)
 

  (write-file (path-join dir (:css-file @config))
              (read-css)))


;;; Main entry points


;;            (base-path (.' js/window -location.pathname) p)))
;;   (reset! page p))

(defn prefix [href page]
  (let [depth (-> #"/" (re-seq page) count)]
    (str (->> "../" (repeat depth) (apply str)) href)))


