                    :class "row"}
                   [:tr
                     [:td {:class "small-12 large-12"}
-                      horizontal-line
                       (spacer 20)
-                      (post-block p)
+                      (if (= (:type p) :board)
+                        (paragraph (:name p))
+                        (post-block p))
+                      (horizontal-line "vertical-padding")
                       (spacer 28)]]])]]]]]))
 
 ;; Reminder alert

  (let [board-name (:name board)]
    (assoc board :posts (map #(assoc % :board-name board-name) (:posts board)))))

(defn digest-title [org-name]
  (format digest-title-daily (or org-name "Carrot")))


      [:th {:class "small-12 large-12 columns"}
        (spacer-table pixels inner-css-class)]]]))

(defn- horizontal-line
  ([] (horizontal-line nil))
  ([css-class]
    [:table {:class (str (when css-class (str css-class " "))
                         "row horizontal-line")}
     [:tr
      [:td {:class "small-12 large-12"}
       (spacer 8)]]]))

(defn- paragraph
  ([content] (paragraph content ""))
