diff --git a/Yesod/Helpers/FeedTypes.hs b/Yesod/Helpers/FeedTypes.hs index c45c0e1a..249401e6 100644 --- a/Yesod/Helpers/FeedTypes.hs +++ b/Yesod/Helpers/FeedTypes.hs @@ -5,10 +5,11 @@ module Yesod.Helpers.FeedTypes import Text.Hamlet (Html) import Data.Time.Clock (UTCTime) +import Data.Text (Text) -- | The overal feed data Feed url = Feed - { feedTitle :: String + { feedTitle :: Text , feedLinkSelf :: url , feedLinkHome :: url @@ -18,7 +19,7 @@ data Feed url = Feed -- | note: currently only used for Rss, possible values: -- - , feedLanguage :: String + , feedLanguage :: Text , feedUpdated :: UTCTime , feedEntries :: [FeedEntry url] @@ -28,6 +29,6 @@ data Feed url = Feed data FeedEntry url = FeedEntry { feedEntryLink :: url , feedEntryUpdated :: UTCTime - , feedEntryTitle :: String + , feedEntryTitle :: Text , feedEntryContent :: Html } diff --git a/yesod-newsfeed.cabal b/yesod-newsfeed.cabal index 37d561f7..479d5e53 100644 --- a/yesod-newsfeed.cabal +++ b/yesod-newsfeed.cabal @@ -17,6 +17,7 @@ library , time >= 1.1.4 && < 1.3 , hamlet >= 0.8 && < 0.9 , bytestring >= 0.9 && < 0.10 + , text >= 0.9 && < 1.0 exposed-modules: Yesod.Helpers.AtomFeed , Yesod.Helpers.RssFeed , Yesod.Helpers.Feed