From 04ca1eded163c9fc70e521ab88baf22a4d7836e3 Mon Sep 17 00:00:00 2001 From: nek0 Date: Thu, 3 Mar 2016 22:56:45 +0100 Subject: [PATCH] conform --- src/Main.hs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/src/Main.hs b/src/Main.hs index b62d547..8ce12eb 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -131,6 +131,7 @@ main = do >>= renderRss feedConf feedCtx -------------------------------------------------------------------------------- + postCtx :: Tags -> Context String postCtx tags = mconcat [ modificationTimeField "mtime" "%U" @@ -140,6 +141,7 @@ postCtx tags = mconcat ] -------------------------------------------------------------------------------- + feedCtx :: Context String feedCtx = mconcat [ bodyField "description"