@@ -922,7 +922,7 @@ defaultCache = False
923{-| 'PrefixValue' is used in 'PrefixQuery' as the main query component.
923{-| 'PrefixValue' is used in 'PrefixQuery' as the main query component.
925−type PrefixValue = Text
925+-- type PrefixValue = Text
927{-| 'BooleanOperator' is the usual And/Or operators with an ES compatible
927{-| 'BooleanOperator' is the usual And/Or operators with an ES compatible
928 JSON encoding baked in. Used all over the place.
928 JSON encoding baked in. Used all over the place.
@@ -2338,7 +2338,7 @@ instance FromJSON Query where
2338 queryRangeQuery = pure . QueryRangeQuery
2338 queryRangeQuery = pure . QueryRangeQuery
2339 queryRegexpQuery = pure . QueryRegexpQuery
2339 queryRegexpQuery = pure . QueryRegexpQuery
2340 querySimpleQueryStringQuery = pure . QuerySimpleQueryStringQuery
2340 querySimpleQueryStringQuery = pure . QuerySimpleQueryStringQuery
2341− queryExistsQuery o = QueryExistsQuery <$> o .: "field"
2341+ -- queryExistsQuery o = QueryExistsQuery <$> o .: "field"
2342 queryTemplateQueryInline = pure . QueryTemplateQueryInline
2342 queryTemplateQueryInline = pure . QueryTemplateQueryInline
@@ -2807,10 +2807,10 @@ instance FromJSON BoostingQuery where
2807 <*> o .: "negative_boost"
2807 <*> o .: "negative_boost"
2809instance ToJSON BoolQuery where
2809instance ToJSON BoolQuery where
2810− toJSON (BoolQuery mustM filterM notM shouldM bqMin boost disableCoord) =
2810+ toJSON (BoolQuery mustM filterM' notM shouldM bqMin boost disableCoord) =
2811 omitNulls base
2811 omitNulls base
2812 where base = [ "must" .= mustM
2812 where base = [ "must" .= mustM
2813− , "filter" .= filterM
2813+ , "filter" .= filterM'
2814 , "must_not" .= notM
2814 , "must_not" .= notM
2815 , "should" .= shouldM
2815 , "should" .= shouldM
2816 , "minimum_should_match" .= bqMin
2816 , "minimum_should_match" .= bqMin