luciano/monger
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Adapt to 3.0

Browse source
This commit is contained in:
Michael Klishin 2015-05-11 01:20:18 +03:00
parent 26be7bb1b9
commit 05dd57731a
1 changed files with 9 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
src/clojure/monger/core.clj
View file

@ -56,6 +56,15 @@
(MongoClient. server-list options))
;; connect to a single instance
(MongoClient. ^ServerAddress server-address options)))
([server-address ^MongoClientOptions options credentials]
(let [creds (if (coll? credentials)
credentials
[credentials])]
(if (coll? server-address)
(let [server-list ^ArrayList (ArrayList. ^java.util.Collection server-address)
]
(MongoClient. server-list creds options))
(MongoClient. ^ServerAddress server-address options))))
([{ :keys [host port uri] :or { host *mongodb-host* port *mongodb-port* }}]
(MongoClient. ^String host ^Long port)))