@@ -47,7 +47,7 @@ validateStatus resp expected =
47 `shouldBe` (expected :: Int)
47 `shouldBe` (expected :: Int)
49createExampleIndex :: BH IO Reply
49createExampleIndex :: BH IO Reply
50−createExampleIndex = createIndex defaultIndexSettings testIndex
50+createExampleIndex = createIndex (IndexSettings (ShardCount 1) (ReplicaCount 0)) testIndex
51deleteExampleIndex :: BH IO Reply
51deleteExampleIndex :: BH IO Reply
52deleteExampleIndex = deleteIndex testIndex
52deleteExampleIndex = deleteIndex testIndex