Merge pull request #8498 from NBKelly/ws-kalive

set ws keepalive to 5 seconds

Author: NBKelly

src/clj/web/ws.clj

@@ -19,7 +19,8 @@
 
 (let [chsk-server (sente/make-channel-socket-server!
                     (get-sch-adapter)
-                    {:user-id-fn (fn [ring-req]
+                    {:ws-kalive-ms 2500
+                     :user-id-fn (fn [ring-req]
                                    (or (-> ring-req :session :uid)
                                        (:client-id ring-req)))})
       {:keys [ch-recv send-fn connected-uids

src/cljs/nr/ws.cljs

@@ -16,6 +16,7 @@
           "/chsk"
           ?csrf-token
           {:type (if (get-in @app-state [:options :disable-websockets]) :ajax :auto)
+           :ws-kalive-ms 2500 ;; note - supposedly this will help SEA/LATAM connections
            :wrap-recv-evs? false})]
     (def chsk chsk)
     (def ch-chsk ch-recv)