Forgot a few Typeables

bgamari · Nov 4, 2015 · 8d75ef9 · 8d75ef9
1 parent 0137a8e
commit 8d75ef9
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/Database/Bloodhound/Types.hs b/src/Database/Bloodhound/Types.hs
@@ -926,7 +926,7 @@ data SimpleQueryStringQuery =
     , simpleQueryStringFlags             :: Maybe (NonEmpty SimpleQueryFlag)
     , simpleQueryStringLowercaseExpanded :: Maybe LowercaseExpanded
     , simpleQueryStringLocale            :: Maybe Locale
-    } deriving (Eq, Show)
+    } deriving (Eq, Show, Typeable)
 
 data SimpleQueryFlag =
   SimpleQueryAll
@@ -1068,7 +1068,7 @@ data FuzzyLikeFieldQuery =
   , fuzzyLikeFieldPrefixLength        :: PrefixLength
   , fuzzyLikeFieldBoost               :: Boost
   , fuzzyLikeFieldAnalyzer            :: Maybe Analyzer
-  } deriving (Eq, Show)
+  } deriving (Eq, Show, Typeable)
 
 data FuzzyLikeThisQuery =
   FuzzyLikeThisQuery