 
 (defn fetch_repositories
   [username cb]
-  (println "hmm" username)
   (let [repourl (str "https://api.github.com/users/" username "/repos")]
     (request {:url repourl}  #(cb %))))
 


(def repodoc {:controller ctrl :view viewer})

(def index {:controller #(initialize-db {:username "jussiarpalahti" :repositories nil})
            :view index_view})

;; Routing mode

  []
  (nm "div.toolbar" [(nm "button.pure-button" {:onclick #(toggle-serialization)} "Export")]))

(defn ctrl []
  "https://api.github.com/repos/jussiarpalahti/repodoc/commits"
  (let [username (route_param "user")
        repository (route_param "repository")]))

(defn viewer
  [ctrl]
