From 9bb09acbf6f969e869b4736846107a54a32860ed Mon Sep 17 00:00:00 2001 From: Matt Rkiouak Date: Mon, 24 Feb 2020 14:56:34 -0500 Subject: [PATCH] [#366 #353 #358] Make make-channel-socket-client! respect host option (@Rkiouak) --- src/taoensso/sente.cljc | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/taoensso/sente.cljc b/src/taoensso/sente.cljc index 0780554..7ecb4a8 100644 --- a/src/taoensso/sente.cljc +++ b/src/taoensso/sente.cljc @@ -1502,8 +1502,8 @@ (let [protocol (or protocol (:protocol win-loc) :http) host (if port - (str (:hostname win-loc) ":" port) - (do (:host win-loc)))] + (str (or host (:hostname win-loc)) ":" port) + (do (or host (:host win-loc))))] [(get-chsk-url protocol host path :ws) (get-chsk-url protocol host path :ajax)])))