Add a test and changelog history.

changelog.md

@@ -16,6 +16,8 @@
 - @rvl
   - Add [character filters][] to the `AnalyzerDefinition` type.
   - Add the "stemmer" and "stop" [token filters][] to `TokenFilterDefinition`.
+- @ahodgen
+  - Add support for wildcard queries
 
 [Character Filters]: https://www.elastic.co/guide/en/elasticsearch/reference/5.6/analysis-charfilters.html
 [Token Filters]: https://www.elastic.co/guide/en/elasticsearch/reference/5.6/analysis-tokenfilters.html

tests/V5/Test/Query.hs

@@ -113,3 +113,11 @@ spec =
           search = mkSearch (Just templateQuery) Nothing
       myTweet <- searchTweet search
       liftIO $ myTweet `shouldBe` Right exampleTweet
+
+    it "returns document for wildcard query" $ withTestEnv $ do
+      _ <- insertData
+      let query = QueryWildcardQuery $ WildcardQuery (FieldName "user") "bitemy*" (Nothing)
+      let search = mkSearch (Just query) Nothing
+      myTweet <- searchTweet search
+      liftIO $
+        myTweet `shouldBe` Right exampleTweet