module Network.Google.Translate.Types.Sum where
import Network.Google.Prelude
data TranslationsListFormat
= HTML
| Text
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable TranslationsListFormat
instance FromHttpApiData TranslationsListFormat where
parseQueryParam = \case
"html" -> Right HTML
"text" -> Right Text
x -> Left ("Unable to parse TranslationsListFormat from: " <> x)
instance ToHttpApiData TranslationsListFormat where
toQueryParam = \case
HTML -> "html"
Text -> "text"
instance FromJSON TranslationsListFormat where
parseJSON = parseJSONText "TranslationsListFormat"
instance ToJSON TranslationsListFormat where
toJSON = toJSONText