Modify tests to use doto instead of threading

Author: Trevor Bernard

test/zeromq/zmq_test.clj

@@ -6,18 +6,18 @@
 (defonce context (zmq/zcontext))
 
 (deftest push-pull-test
-  (with-open [push (-> (zmq/socket context :push)
-                       (zmq/connect "tcp://127.0.0.1:12349"))
-              pull (-> (zmq/socket context :pull)
-                       (zmq/bind "tcp://*:12349"))]
+  (with-open [push (doto (zmq/socket context :push)
+                     (zmq/connect "tcp://127.0.0.1:12349"))
+              pull (doto (zmq/socket context :pull)
+                     (zmq/bind "tcp://*:12349"))]
     (s/send "hello" push 0)
     (let [actual (String. (zmq/receive pull))]
       (is (= "hello" actual)))))
 
 
 (deftest receive-str-timeout-test
-  (with-open [pull (-> (zmq/socket context :pull)
-                       (zmq/bind "tcp://*:12310"))]
-    (zmq/set-receive-timeout pull 100)
+  (with-open [pull (doto (zmq/socket context :pull)
+                     (zmq/set-receive-timeout 100)
+                     (zmq/bind "tcp://*:12310"))]
     (let [actual (zmq/receive-str pull)]
       (is (= nil actual)))))