From f5d87d0aaa81e0e32c2e22aaf164576e9bb77bf3 Mon Sep 17 00:00:00 2001 From: Michael Klishin Date: Sun, 2 Mar 2014 21:34:54 +0400 Subject: [PATCH] Make sure field parameters are in the correct order --- test/monger/test/full_text_search_test.clj | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/test/monger/test/full_text_search_test.clj b/test/monger/test/full_text_search_test.clj index 20207c2..d40cd87 100644 --- a/test/monger/test/full_text_search_test.clj +++ b/test/monger/test/full_text_search_test.clj @@ -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)