 (defn archives
   [posts]
   (-> posts
-      (base)
+      (common)
       (assoc-in [:page-data :active] "archives")
       (assoc :content (assoc generic-page :title "Archives")
              :posts-data (blog/data-for-archives posts))))

(defn privacy
  [posts]
  (-> posts
      (base)
      (assoc-in [:page-data :active] "about")
      (assoc :content (-> "privacy.md"
                          (markdown-page)

(defn categories
  [posts]
  (-> posts
      (common)
      (assoc-in [:page-data :active] "categories")
      (assoc :content (assoc generic-page :title "Categories")
             :posts-data (blog/data-for-categories posts))))
