diff --git a/Yesod/Helpers/RssFeed.hs b/Yesod/Helpers/RssFeed.hs index aaacdf5c..d418cae2 100644 --- a/Yesod/Helpers/RssFeed.hs +++ b/Yesod/Helpers/RssFeed.hs @@ -25,18 +25,6 @@ import Yesod.Widget import Text.Hamlet import Data.Time.Clock (UTCTime) --- | FIXME unneeded if formatRFC822 moves -import Data.Time.Format (formatTime) -import System.Locale (defaultTimeLocale) - --- | FIXME move this to Yesod.Content -formatRFC822 :: UTCTime -> String -formatRFC822 = formatTime defaultTimeLocale "%a, %d %b %Y %H:%M:%S %z" - --- | FIXME move this to Yesod.Content -typeRss :: ContentType -typeRss = "application/rss+xml" - newtype RepRss = RepRss Content instance HasReps RepRss where chooseRep (RepRss c) _ = return (typeRss, c) diff --git a/yesod-newsfeed.cabal b/yesod-newsfeed.cabal index 72bab07f..8ba2034f 100644 --- a/yesod-newsfeed.cabal +++ b/yesod-newsfeed.cabal @@ -16,8 +16,8 @@ library , yesod-core >= 0.7 && < 0.8 , time >= 1.1.4 && < 1.3 , hamlet >= 0.7 && < 0.8 - , old-locale >= 1.0 && < 1.1 - exposed-modules: Yesod.Helpers.AtomFeed, Yesod.Helpers.RssFeed + exposed-modules: Yesod.Helpers.AtomFeed + , Yesod.Helpers.RssFeed ghc-options: -Wall source-repository head