    (spacer 32)
    (h2 (:headline entry))
    (spacer 16)
-   (paragraph (str (-> entry :publisher :name) " posted in " (:board-name entry)) "body-block" "attribution")
+   (post-attribution entry)
    (spacer 16)
    (read-post-button "Read post" (:url entry))])
 

      (spacer 40)
      (h2 headline)
      (spacer 8)
      (paragraph attribution "body-block" "text-left attribution")
      (spacer 8)
      (read-post-button share-cta entry-url)
      (spacer 24)

(ns oc.email.content
  (:require [clojure.string :as s]
            [clojure.walk :refer (keywordize-keys)]
            [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"))

