Skip to content

Commit

Permalink
[nop] Misc housekeeping
Browse files Browse the repository at this point in the history
  • Loading branch information
ptaoussanis committed Nov 3, 2023
1 parent 45a1b1c commit 3e85a72
Showing 1 changed file with 7 additions and 3 deletions.
10 changes: 7 additions & 3 deletions src/taoensso/sente.cljc
Original file line number Diff line number Diff line change
Expand Up @@ -428,6 +428,9 @@
(slow) reconnecting poller. Actual event dispatch may occur <= given ms
after send call (larger values => larger batch windows)."

;; TODO param names are inconsistent, e.g.:
;; ws-ping-timeout-ms, send-buf-ms-ajax, ws-ping-timeout-ms

[web-server-ch-adapter
& [{:keys [recv-buf-or-n ws-kalive-ms lp-timeout-ms ws-ping-timeout-ms
send-buf-ms-ajax send-buf-ms-ws
Expand Down Expand Up @@ -456,8 +459,9 @@
;;
ws-ping-timeout-ms nil #_(enc/ms :secs 5) ; TODO Enable default val

send-buf-ms-ajax 100
send-buf-ms-ws 30
send-buf-ms-ajax 100
send-buf-ms-ws 30

user-id-fn (fn [ ring-req] (get-in ring-req [:session :uid]))
bad-csrf-fn (fn [_ring-req] {:status 403 :body "Bad CSRF token"})
bad-origin-fn (fn [_ring-req] {:status 403 :body "Unauthorized origin"})
Expand Down Expand Up @@ -743,7 +747,7 @@
conn-id (enc/uuid-str 6) ; 1 per ws/ajax rreq, equiv to server-ch identity
params (get ring-req :params)
client-id (get params :client-id)
uid (user-id-fn ring-req client-id)
uid (user-id-fn ring-req client-id)
lid* (lid uid client-id conn-id)]

(enc/cond
Expand Down

0 comments on commit 3e85a72

Please sign in to comment.