       {:title "Metric", :value (or (:metric events) "-"), :short true}
       {:title "State",
        :value (slack-escape (or (:state events) "-")),
+       :short true}
+      {:title "Description",
+       :value (slack-escape (or (:description events) "-"))
+       :short true}
+      {:title "Tags",
+       :value (slack-escape (or (:tag events) "-"))
        :short true}]}]})
 
 (defn slack

   [{:fallback
     (slack-escape
       (str
         "*Description:* "
         (:description events)
         " *Host:* "

  (escape message {\< "&lt;" \> "&gt;" \& "&amp;"}))

(defn default-formatter [events]
  {:attachments
   [{:fields
     [{:title "Riemann Event"
       :value (slack-escape
                (str "Host:   " (or (:host events) "-") "\n"
                     "Service:   " (or (:service events) "-") "\n"
                     "State:   " (or (:state events) "-") "\n"
                     "Description:   " (or (:description events) "-") "\n"
                     "Metric:   " (or (:metric events) "-") "\n"
                     "Tag:   " (or (:tag events) "-") "\n"))
       :short true}]}]})

(defn extended-formatter [events]
  {:text "This event requires your attention!",
