ZSCORE implemented

[redis.git] / client-libraries / clojure / src / redis / internal.clj

diff --git a/client-libraries/clojure/src/redis/internal.clj b/client-libraries/clojure/src/redis/internal.clj
index d363a58d0c8da1946ecdb935983e15f6a20c3021..d8399bb82540fdbd3711c481f441a489b121cd11 100644 (file)
--- a/client-libraries/clojure/src/redis/internal.clj
+++ b/client-libraries/clojure/src/redis/internal.clj
@@ -39,7 +39,8 @@
   (let [{:keys [host port timeout]} server
         socket (Socket. #^String host #^Integer port)]
     (doto socket
-      (.setTcpNoDelay true))))
+      (.setTcpNoDelay true)
+      (.setKeepAlive true))))
 
 (defn with-server*
   [server-spec func]
@@ -99,8 +100,7 @@
 
 (defn reply-type
   ([#^BufferedReader reader]
-     (let [type (char (.read reader))]
-       type)))
+     (char (.read reader))))
 
 (defmulti parse-reply reply-type :default :unknown)