          :body (naming-response conn)})
       ;; otherwise we are polling
       (let [messages (volatile! [])]
-        (swap! *connections* update sess-id
-               #(-> %
+        (swap! *connections* update fwsid
+               #(-> (cond-> % fwinit (assoc :created-at (System/currentTimeMillis)))
                     (update ::messages (fn [msgs] (vreset! messages (or msgs [])) []))
                     (assoc ::alive-at (System/currentTimeMillis))))
         {:status 200


  (binding [cljs.repl/*repl-env* re]
    (conns*)
    #_(focus* 'Korey))

  )



  (connections-available re)

  (evaluate re "47")

  (negotiate-id (:ring-request @scratch) @*connections*)

