diff options
| author | Vincent Ambo <tazjin@googlemail.com> | 2012-03-25T18·56+0200 |
|---|---|---|
| committer | Vincent Ambo <tazjin@googlemail.com> | 2012-03-25T18·56+0200 |
| commit | 5b80f528c7c518c7d82e70635f265be3c0120327 (patch) | |
| tree | d4028b3f8ba47769b9a361629f05a20d05f9055e /src | |
| parent | 1e45dcf7c8ddd00e08b51dfc4f325426ab96a265 (diff) | |
* default rss feed link now points to an XML file
Diffstat (limited to 'src')
| -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 ] |