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

Correct invalid type hints

Browse source
This commit is contained in:
Michael S. Klishin 2011-08-28 22:37:35 +04:00
parent 58d4a1eff4
commit 1fd3cc719f
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
src/monger/collection.clj
View file

@ -29,11 +29,11 @@
(defn ^WriteResult insert-batch (defn ^WriteResult insert-batch
([^String collection, ^List documents] ([^String collection, ^List documents]
(let [#^DBCollection coll #^DBObject (.getCollection monger.core/*mongodb-database* collection)] (let [#^DBCollection coll (.getCollection monger.core/*mongodb-database* collection)]
(.insert #^DBCollection coll #^DBObject (to-db-object documents) #^WriteConcern WriteConcern/NORMAL))) (.insert #^DBCollection coll #^List (to-db-object documents) #^WriteConcern WriteConcern/NORMAL)))
([^String collection, ^List documents, ^WriteConcern concern] ([^String collection, ^List documents, ^WriteConcern concern]
(let [#^DBCollection coll #^DBObject (.getCollection monger.core/*mongodb-database* collection)] (let [#^DBCollection coll (.getCollection monger.core/*mongodb-database* collection)]
(.insert #^DBCollection coll #^DBObject (to-db-object documents) #^WriteConcern concern)))) (.insert #^DBCollection coll #^List (to-db-object documents) #^WriteConcern concern))))
;; monger.collection/find ;; monger.collection/find
(declare fields-to-db-object) (declare fields-to-db-object)