   (GET "/user/:name/" [name] (user name))
   (GET "/users" [] (users))
   (GET "/causes" [] (causes))
+  (GET "/ascensions" [] (ascensions))
   (GET "/cause/:cause-str" [cause-str] (cause cause-str))
   (GET "/highscores/:limit" [limit] (highscores limit))
   (route/not-found (page-not-found)))

    [:th "death"]]
   (map #'rs-row-to-tr rs)])

(defn game [id]
  (sql/with-connection db
    (sql/with-query-results

   [:td [:a {:href (str "/user/" (:name row))} (:name row)]]
   [:td (:points row)]
   [:td (:turns row)]
   [:td (pretty-date (:deathdate row))]
   [:td [:a {:href (str "/cause/" (url-encode (:death_uniq row)))} (:death row)]]])

(defn rs-row-to-tr-ascension [row]
  [:tr
   [:td (make-dump-link row)]
   [:td [:a {:href (str "/user/" (:name row))} (:name row)]]
   [:td (:points row)]
   [:td (:turns row)]
   [:td (pretty-date (:deathdate row))]
   [:td (str (count (:conducts row)) ": "
             (apply str (interpose ", " (:conducts row))))]])

(defn rs-to-table [rs]
  [:table
