           :ajax-get-or-ws-handshake-fn nil)))
 
 (defn new-matcher
-  ""
+  "create new component"
   [event-mult inspect-fn]
   (map->Matcher {:event-mult event-mult
                  :inspect-fn inspect-fn}))

    (log/info "Connected:" (:remote-addr req) uid)
    uid))

(def clients (atom {}))
(def client-maps (atom {}))
(def known-event-types (atom #{}))
(def stats (atom {}))

(defn strip-uid

  [params full-event chsk-send!]
  (let [uid (strip-uid (:client-uuid full-event))
        n (:n params)
        client-map (into {} (map (fn [[t _]] [t n]) (seq @stats)))]
    (swap! client-maps assoc-in [uid] client-map)
    (chsk-send! uid [:info/client-map (get-in @client-maps [uid])])))

