                                      inclusion-of
                                      numericality-of
                                      presence-of
+                                     length-of
                                      valid?
                                      validation-set]])
     (:require-macros [elevent-client.core :refer [endpoints]])

                        (when handler (handler json)))
                      (fn [json]
                        (when handler (handler json))
                        (dispatch! :read nil nil nil)))

                    :error-handler
                    (fn [error]

              [:strong "Date:"]
              (let [start (from-string (:StartDate event))
                    end   (from-string (:EndDate   event))]
                (str (unparse datetime-formatter start)
                     (when (after? end start)
                       (str " to " (unparse datetime-formatter end)))))]
             [:div.meta
              [:strong "Venue:"]
              (:Venue event)]
             [:div.description
              (:Description event)]
