 (ns elevent-client.core
     (:require
-      [clojure.set :refer [difference]]
+      [clojure.set :as set]
+      [clojure.string :as str]
 
       [goog.crypt.base64 :as b64]
       [goog.events :as events]

       "Sign up"]])])

(defn breadcrumbs-component []
  [:div.sixteen.wide.column
   [:div.ui.breadcrumb
    #_(interpose [:div.divider "/"]
                 (map (fn [[name hash]]
                        (if (= hash @location)
                          [:div.active.section name]
                          [:a.section {:href hash} name]))
                      (cons ["Home" (home-route)]
                            (:breadcrumbs @session))))]])

(defn messages-component []
  (when-let [messages* (seq @messages)]

                              @events-db
                              @attendees-db
                              (get-in @session [:user :UserId]))
        unattending-events (set/difference (into #{}
                                                 (d/q '[:find [?event-id ...]
                                                        :where [?event-id]]
                                                      @events-db))
                                           (into #{} attending-events))]
    [:div.sixteen.wide.column
     [:div.ui.segment
      [:div
