 (ns oc.email.content
   (:require [clojure.string :as s]
             [clojure.walk :refer (keywordize-keys)]
-            [clj-time.format :as format]
+            [clj-time.format :as time-format]
             [hiccup.core :as h]
             [oc.email.config :as config]))
 
 (def max-logo 32)
 (def author-logo 32)
+
+(def iso-format (time-format/formatters :date-time))
+(def date-format (time-format/formatter "MMMM d"))
+(def date-format-year (time-format/formatter "MMMM d YYYY"))
 
 (def profile-url (str config/web-url "/profile"))
 

        (vspacer 15 "footer-table" "footer-table")]
      [:td {:class "small-1 large-2 columns"}]]])

;; ----- Digest -----

(defn- post [entry]
  [(spacer 32)

      (spacer 40)
      (h2 headline)
      (spacer 8)
      (post-attribution entry)
      (spacer 8)
      (read-post-button share-cta entry-url)
      (spacer 24)
