{-# LANGUAGE DeriveGeneric #-} module Model.Json.Translation ( Translation(..) ) where import GHC.Generics import Data.Aeson import Data.Text data Translation = Translation { key :: Text , message :: Text } deriving (Show, Generic) instance FromJSON Translation instance ToJSON Translation