 (defn alert-list-demo
   []
   (let [alerts       (reagent/atom [])]
-    (add-alert alerts 0 "danger"  {:heading "Woa! something bad happened" :body "Next time you should take more care!  Next time you should take more care! Next time you should take more care!"})
-    (add-alert alerts 1 "info"    {:heading "News Flash!" :body "The rain in Spain often falls on the mountatins too"})
-    (add-alert alerts 2 "info"    {:heading "Here's some info" :body "The rain in Spain falls mainly on the plain"})
+    (add-alert alerts 0 "danger"  {:heading "Woa! something bad happened" :body "Next time you should take more care! Next time you should take more care! Next time you should take more care!"})
+    (add-alert alerts 1 "info"    {:heading "News Flash!" :body "The rain in Spain often falls on the mountatins too."})
+    (add-alert alerts 2 "info"    {:heading "Here's some info" :body "The rain in Spain falls mainly on the plain."})
     (add-alert alerts 3 "warning" {:heading "\"Oh bother\", said Pooh. And then ..." :body "\"Some people care too much. I think it's called love.\""})
 
     (fn []

                                 :closeable? true
                                 :on-close   #(reset! show-alert false)]
                                [:p {:style {:text-align "center" :margin "30px"}} "[You closed me]"])

                              [:br]
                              [:br]
                              [:br]
                              [:p "Further Variations ..."]
                              (when @show-alert1
                                [:div

                                [:div
                                 [alert-box
                                  :alert-type "warning"
                                  :body       "Alert with :body but no :heading (:padding set to 6px)."
                                  :padding    "6px"
                                  :closeable? true
                                  :on-close   #(reset! show-alert2 false)]])
                              [alert-box
                               :alert-type "danger"
                               :heading    ":alert-type is \"danger\""
                               :body       [:span "This is the :body of an danger-styled alert with :closeable? omitted (defaults to false). "
                                            [:a {:href "http://google.com" :target "_blank"} "Link to Google"] "."]]]]]])))


(defn add-alert
