@@ -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 =
@@ -1625,7 +1625,9 @@ fieldTagged f o = case HM.toList o of
16251625 [(k, Object o')] -> f (FieldName k) o'
16261626 _ -> fail "Expected object with 1 field-named key"
16271627
1628−{-| Fuzziness value as a number or 'AUTO'. -}
1628+-- | Fuzziness value as a number or 'AUTO'.
1629+-- See:
1630+-- https://www.elastic.co/guide/en/elasticsearch/reference/current/common-options.html#fuzziness
16291631data Fuzziness = Fuzziness Double | FuzzinessAuto
16301632 deriving (Eq, Show)
16311633