            (fn [data]
              (updatedb [:repository] repository)
              (updatedb [:username] username)
-             (updatedb [:data] (get data "tree")))))
+             (updatedb [:data] (get data "tree"))
+             (get-repodoc (get data "tree")))))
 
 (defn get-repository-data
   [username repository]

            :query (fn [key]
                 (get @cdb key))}))

(defn get-repository-tree
  [username repository sha]
  (request {:url (str "https://api.github.com/repos/"

  (if (and (get item "mtime" false) (opened? pos))
    (let [mtime (get item "mtime")]
      (nm "div.pure-u-1-1.pure-u-sm-1"
          ["Modification time: " (format_time (new js/Date mtime) DATEFORMAT)]))))

(defn node
  "Renders one node from tree with indentation"
