module F2Md.Types where import Data.Text (Text) import Data.Time data FeedMetadata = FeedMetadata { title :: Text, author :: Maybe Text, home :: Maybe Text } deriving (Show) data Message = Message { from :: Text, subject :: Text, date :: Text, messageId :: Text, body :: Text -- newsGroup :: Text } deriving (Show)