Eliminate recently introduced reflection warnings
This commit is contained in:
parent
4a0fb343ec
commit
96d5b4a66f
2 changed files with 4 additions and 3 deletions
|
|
@ -26,7 +26,7 @@
|
|||
(zipmap fields (repeat 1)))
|
||||
|
||||
(definline check-not-nil!
|
||||
[ref message]
|
||||
[ref ^String message]
|
||||
`(when (nil? ~ref)
|
||||
(throw (IllegalArgumentException. ~message))))
|
||||
|
||||
|
|
|
|||
|
|
@ -2,7 +2,8 @@
|
|||
(:require [monger core db]
|
||||
[monger.test.helper :as helper]
|
||||
[monger.collection :as mgcol])
|
||||
(:import (com.mongodb Mongo DB))
|
||||
(:import [com.mongodb Mongo DB]
|
||||
[java.util Set])
|
||||
(:use [clojure.test]))
|
||||
|
||||
(helper/connect!)
|
||||
|
|
@ -34,6 +35,6 @@
|
|||
(deftest test-get-collection-names
|
||||
(mgcol/insert "test-1" { :name "Clojure" })
|
||||
(mgcol/insert "test-2" { :name "Clojure" })
|
||||
(let [collections (monger.db/get-collection-names)]
|
||||
(let [^Set collections (monger.db/get-collection-names)]
|
||||
(is (.contains collections "test-1"))
|
||||
(is (.contains collections "test-2"))))
|
||||
|
|
|
|||
Loading…
Reference in a new issue