From 009d4c6232399eb7c9c5d68fed3fb59c17714b0f Mon Sep 17 00:00:00 2001 From: "Michael S. Klishin" Date: Wed, 11 Apr 2012 16:04:50 +0400 Subject: [PATCH] Eliminate a few reflection warnings --- test/monger/test/core.clj | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/test/monger/test/core.clj b/test/monger/test/core.clj index d0a8b95..f875763 100644 --- a/test/monger/test/core.clj +++ b/test/monger/test/core.clj @@ -25,20 +25,20 @@ (deftest connect-to-mongo-via-uri-without-credentials (let [connection (monger.core/connect-via-uri! "mongodb://127.0.0.1/monger-test4")] - (is (= (-> connection .getAddress (.sameHost "127.0.0.1"))))) + (is (= (-> connection .getAddress ^InetAddress (.sameHost "127.0.0.1"))))) ;; reconnect using regular host (helper/connect!)) (deftest connect-to-mongo-via-uri-with-valid-credentials (let [connection (monger.core/connect-via-uri! "mongodb://clojurewerkz/monger!:monger!@127.0.0.1/monger-test4")] - (is (= (-> connection .getAddress (.sameHost "127.0.0.1"))))) + (is (= (-> connection .getAddress ^InetAddress (.sameHost "127.0.0.1"))))) ;; reconnect using regular host (helper/connect!)) (if-let [uri (System/getenv "MONGOHQ_URL")] (deftest ^{:external true} connect-to-mongo-via-uri-with-valid-credentials (let [connection (monger.core/connect-via-uri! uri)] - (is (= (-> connection .getAddress (.sameHost "127.0.0.1"))))) + (is (= (-> connection .getAddress ^InetAddress (.sameHost "127.0.0.1"))))) ;; reconnect using regular host (helper/connect!)))