@@ -135,8 +135,14 @@ instance ToJSON Query where
135135
136136 toJSON (TermsQuery terms termsQueryMinimumMatch) =
137137 object [ "terms" .= object conjoined ]
138− where conjoined = [ "tags" .= fmap toJSON terms
139− , "minimum_should_match" .= toJSON termsQueryMinimumMatch ]
138+ where conjoined =
139+ [ "tags" .= fmap toJSON terms
140+ , "minimum_should_match" .= toJSON termsQueryMinimumMatch ]
141+
142+ toJSON (IdsQuery idsQueryMappingName docIds) =
143+ object [ "ids" .= object conjoined ]
144+ where conjoined = [ "type" .= toJSON idsQueryMappingName
145+ , "values" .= fmap toJSON docIds ]
140146
141147 toJSON (QueryMatchQuery matchQuery) =
142148 object [ "match" .= toJSON matchQuery ]
@@ -479,6 +485,8 @@ instance ToJSON StopWord
479485instance ToJSON QueryPath
480486instance ToJSON MinimumTermFrequency
481487instance ToJSON PercentMatch
488+instance ToJSON MappingName
489+instance ToJSON DocId
482490instance FromJSON Version
483491instance FromJSON IndexName
484492instance FromJSON MappingName