       [alandipert.storage-atom :refer [local-storage]]
       [ajax.core :refer [DELETE GET POST PUT]]
       [cljs-time.coerce :refer [from-string]]
-      [cljs-time.core :refer [after? at-midnight now]]
-      [cljs-time.format :refer [formatter formatters unparse]]
+      [cljs-time.core :refer [after? at-midnight now plus hours]]
+      [cljs-time.format :refer [formatter formatters unparse parse]]
       [datascript :as d]
       [garden.core :refer [css]]
       [secretary.core :as secretary :refer-macros [defroute]]

                                        :on-click #(create-event @form)}
             "Add"]]]]]))))

(defn event-page [event-id]
  (let [event (into {} (seq (d/entity @events-db event-id)))


          [:p (:Description event)]]
         [:div.ui.vertical.segment
          [:h2.ui.header
           "Activities"]
          [:table.ui.table
           [:thead
            [:tr
