   (escape message {\< "&lt;" \> "&gt;" \& "&amp;"}))
 
 (defn default-formatter [events]
-  {:text (str "*Host:* " (:host events)
-              " *State:* " (:state events)
-              " *Description:* " (:description events)
-              " *Metric:* " (:metric 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!",

      {:title "Metric", :value (or (:metric events) "-"), :short true}
      {:title "State",
       :value (slack-escape (or (:state events) "-")),
       :short true}]}]})

(defn slack

         " *State:* "
         (:state events))),
     :text (slack-escape (or (:description events) "")),
     :pretext "Event Details:",
     :color
     (case (:state events) "ok" "good" "critical" "danger" "warning"),
     :fields
