ea32ac5 · typeable/bloodhound

5517data DirectGeneratorSuggestModeTypes = DirectGeneratorSuggestModeMissing

5518 | DirectGeneratorSuggestModePopular

5519 | DirectGeneratorSuggestModeAlways

5520− deriving (Show, Eq, Read, Generic)

5520+ deriving (Show, Eq, Read, Generic, Typeable)

5521

5522instance ToJSON DirectGeneratorSuggestModeTypes where

5523 toJSON DirectGeneratorSuggestModeMissing = "missing"

5544 , directGeneratorPreFilter :: Maybe Text

5545 , directGeneratorPostFilter :: Maybe Text

5546 }

5547− deriving (Show, Eq, Read, Generic)

5547+ deriving (Show, Eq, Read, Generic, Typeable)

5548

5549

5550instance ToJSON DirectGenerators where