diff options
| -rw-r--r-- | src/Blog.hs | 2 | ||||
| -rw-r--r-- | src/Main.hs | 1 |
2 files changed, 2 insertions, 1 deletions
diff --git a/src/Blog.hs b/src/Blog.hs index 208552c10e24..631bfa013d34 100644 --- a/src/Blog.hs +++ b/src/Blog.hs @@ -72,7 +72,7 @@ blogTemplate lang t_append body = H.docTypeHtml $ do --add body toHtml $ orText lang H.a ! A.class_ "link" ! A.href (toValue imu) ! A.target "_blank" $ "iMessage" "." - feedURL = "/" ++ show lang ++ "/rss" + feedURL = "/" ++ show lang ++ "/rss.xml" renderEntries :: Bool -> [Entry] -> Text -> Maybe Html -> Html renderEntries showAll entries topText footerLinks = do diff --git a/src/Main.hs b/src/Main.hs index 06bf4d3f63e4..0ad5d979c288 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -95,6 +95,7 @@ blogHandler acid lang = \(eId :: Integer) -> addComment acid lang $ EntryId eId , nullDir >> showIndex acid lang , dir "rss" $ nullDir >> showRSS acid lang + , dir "rss.xml" $ nullDir >> showRSS acid lang , notFound $ toResponse $ showError NotFound lang ] |