            (map #(vector (str "/gemtags/" (get %1 "Row") "/") (get-gemtag %1))
                 (filter #(> (.length (get %1 "Tag")) 0) data/gem-tags)))))
 
+(defn changelog  [ctx]
+  (layout-page
+   ctx
+   nil
+   [:div
+    [:h3 "2015-12-10"]
+    [:ul
+     [:li "Added some info to passive skill pages"]]
+    [:h3 "2015-12-09"]
+    [:ul
+     [:li "Added mana cost to skill page"]]]))
+
 (defn get-pages []
   (merge {"/index.html" index
           "/404.html" not-found
-          "/50x.html" server-error}
+          "/50x.html" server-error
+          "/changelog/" changelog}
          (get-gemtags)
          (get-affixes)
          (get-item-classes)

                           (str (format "%.2f " (/ (nth stats-values i) 1000.0)) (get (find-first data/stats "Row" (nth stats-keys i)) "Id")))
                         (range (count stats-keys)))))
                 "N/A"))
             "Unknown")]]]))

(defn skillgem-page [id]
  (fn [ctx]
    (let [item (find-first data/base-item-types "Row" id)
          meta (find-first data/active-skills "DisplayedName" (get item "Name"))]
      (layout-page
       ctx
       (get item "Name")
       [:div
        [:h1 (get item "Name")]
        (if meta
          [:div
           [:div.skill-small-table
            (get-skill-small-table item meta id)
             [:img {:style "padding-top: 10px; width: 100%" :src (get meta "WebsiteImage")}]]
           [:p (get meta "Description")]])
        [:h3 {:style "clear: both"} "Quest rewards"]
        [:table
         [:tr

        [:li [:a {:href "/affixes/"} "Affixes"]]
        [:li [:a {:href "/quests/"} "Quests"]]
        [:li [:a {:href "/archive/"} "Archive"]]
        [:li [:a {:href "/data/"} "Data"]]
        [:li [:a {:href "/changelog/"} "Changelog"]]]]]]
    [:div.container
     [:div.main
      page]]
