haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Moved some functions to yesod-core

Browse Source
This commit is contained in:
Michael Snoyman 2011-01-17 08:18:07 +02:00
parent b530166c09
commit 8f73e2ab8d
2 changed files with 2 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
Yesod/Helpers/RssFeed.hs
View File

@ -25,18 +25,6 @@ import Yesod.Widget
import Text.Hamlet import Text.Hamlet
import Data.Time.Clock (UTCTime) 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 newtype RepRss = RepRss Content
instance HasReps RepRss where instance HasReps RepRss where
chooseRep (RepRss c) _ = return (typeRss, c) chooseRep (RepRss c) _ = return (typeRss, c)

4
yesod-newsfeed.cabal
View File

@ -16,8 +16,8 @@ library
, yesod-core >= 0.7 && < 0.8 , yesod-core >= 0.7 && < 0.8
, time >= 1.1.4 && < 1.3 , time >= 1.1.4 && < 1.3
, hamlet >= 0.7 && < 0.8 , hamlet >= 0.7 && < 0.8
, old-locale >= 1.0 && < 1.1 exposed-modules: Yesod.Helpers.AtomFeed
exposed-modules: Yesod.Helpers.AtomFeed, Yesod.Helpers.RssFeed , Yesod.Helpers.RssFeed
ghc-options: -Wall ghc-options: -Wall
source-repository head source-repository head