     (discover))
 
   (testing "delete"
-    (is (= (:body (http-client/delete host {:accept :json
-                                            :as :json
-                                            :body (json/write-str delete-request)}))
+    (is (= (:body (send-delete-request))
            {test-index-name "name:doe"})))
 
   (testing "store"

   :query query
   :facets {:name {:size 7}}})

(defonce server
  (run-jetty handler {:port 3000
                      :join? false}))

(def id default-identifier)
(def hosts [id id id [id id [id id id id id id id id id [id] [id id [id]]]]])

(def query {:term {:field "name"
                   :value "doe"}})

(def store-request
  {:index test-index-name
   :documents [{:name "jack doe"}
               {:name "john doe"}]
   :facets {:name {}}})

(def delete-request
  {:index test-index-name
   :query query})

(def put-request
  {:index test-index-name
