git.iko.soy/typeable/bloodhound
on master help sign in
Removed lower-case representation for auto fuzziness
commit16320685d5803732c9af034cacd37be27f88d36a authorAshutosh Rishi Ranjan <ashutoshrishi92@gmail.com> dateTue 19 Jun 2018, 20:53 (8 years ago) parent7131ac8
1 file changed+16−17
src/Database/V5/Bloodhound/Internal/Query.hs+16−17
src/Database/V5/Bloodhound/Internal/Query.hs+16−17
@@ -9,12 +9,12 @@ module Database.V5.Bloodhound.Internal.Query
99
1010import Bloodhound.Import
1111
12−import Data.Char (isNumber)
13−import qualified Data.HashMap.Strict as HM
14−import Data.List (nub)
15−import qualified Data.Text as T
12+import Data.Char (isNumber)
13+import qualified Data.HashMap.Strict as HM
14+import Data.List (nub)
15+import qualified Data.Text as T
1616
17−import Database.Bloodhound.Common.Script as X
17+import Database.Bloodhound.Common.Script as X
1818import Database.V5.Bloodhound.Internal.Newtypes
1919
2020data Query =
@@ -834,16 +834,16 @@ instance FromJSON DisMaxQuery where
834834 <*> o .:? "boost"
835835
836836data MatchQuery = MatchQuery
837− { matchQueryField :: FieldName
838− , matchQueryQueryString :: QueryString
839− , matchQueryOperator :: BooleanOperator
840− , matchQueryZeroTerms :: ZeroTermsQuery
841− , matchQueryCutoffFrequency :: Maybe CutoffFrequency
842− , matchQueryMatchType :: Maybe MatchQueryType
843− , matchQueryAnalyzer :: Maybe Analyzer
844− , matchQueryMaxExpansions :: Maybe MaxExpansions
845− , matchQueryLenient :: Maybe Lenient
846− , matchQueryBoost :: Maybe Boost
837+ { matchQueryField :: FieldName
838+ , matchQueryQueryString :: QueryString
839+ , matchQueryOperator :: BooleanOperator
840+ , matchQueryZeroTerms :: ZeroTermsQuery
841+ , matchQueryCutoffFrequency :: Maybe CutoffFrequency
842+ , matchQueryMatchType :: Maybe MatchQueryType
843+ , matchQueryAnalyzer :: Maybe Analyzer
844+ , matchQueryMaxExpansions :: Maybe MaxExpansions
845+ , matchQueryLenient :: Maybe Lenient
846+ , matchQueryBoost :: Maybe Boost
847847 , matchQueryMinimumShouldMatch :: Maybe Text
848848 , matchQueryFuzziness :: Maybe Fuzziness
849849 } deriving (Eq, Show)
@@ -1635,5 +1635,4 @@ instance ToJSON Fuzziness where
16351635
16361636instance FromJSON Fuzziness where
16371637 parseJSON (String "AUTO") = return FuzzinessAuto
1638− parseJSON (String "auto") = return FuzzinessAuto
1639− parseJSON v = Fuzziness <$> parseJSON v
1638+ parseJSON v = Fuzziness <$> parseJSON v