Make sure field parameters are in the correct order
This commit is contained in:
parent
555ac53d22
commit
f5d87d0aaa
1 changed files with 8 additions and 2 deletions
|
|
@ -6,13 +6,19 @@
|
|||
[monger.test.helper :as helper]
|
||||
[clojure.test :refer [deftest is use-fixtures]]
|
||||
[monger.test.fixtures :refer :all]
|
||||
[monger.result :refer [ok?]]))
|
||||
[monger.result :refer [ok?]])
|
||||
(:import com.mongodb.BasicDBObjectBuilder))
|
||||
|
||||
(helper/connect!)
|
||||
|
||||
(defn enable-search
|
||||
[f]
|
||||
(is (ok? (cmd/admin-command (array-map :textSearchEnabled true :setParameter "*"))))
|
||||
;; {:textSearchEnabled true :setParameter 1}
|
||||
(let [bldr (doto (BasicDBObjectBuilder.)
|
||||
(.append "setParameter" 1)
|
||||
(.append "textSearchEnabled" true))
|
||||
cmd (.get bldr)]
|
||||
(is (ok? (cmd/raw-admin-command cmd))))
|
||||
(f))
|
||||
|
||||
(use-fixtures :each purge-docs)
|
||||
|
|
|
|||
Loading…
Reference in a new issue