packages feed

panda 2008.10.15 → 2008.10.16

raw patch · 3 files changed

+15/−7 lines, 3 files

Files

Panda/View/Widget/RSS.hs view
@@ -12,7 +12,7 @@ import Panda.Model.Post as Post  -entry_uri x = G.root ++ Post.uid x.split "/".tail.join "/"+entry_uri x = Post.uid x.split "/".tail.join "/"  -- RSS channel_rss_template = [ RSS.Language "en-us" ]@@ -25,12 +25,13 @@   , PubDate $ x.Post.date    ] -item_uri x = nullURI { uriScheme = "http://", uriPath = G.host_name ++ x.entry_uri }-rss_uri x  = nullURI { uriScheme = "http://", uriPath = G.root / x / "rss.xml" }+item_uri x = nullURI { uriScheme = "http://", uriPath = host_link (x.entry_uri) }+rss_uri x  = nullURI { uriScheme = "http://", uriPath = host_link x }  rss categary s xs = RSS title  (rss_uri link) title channel_rss_template (xs.take 20 .map item_rss_template)   .rssToXML.showXML-  where -    link =  G.host_name / G.root / categary / s+  where+    link = categary / s     title = G.blog_title ++ " / " ++ s-  ++host_link s = G.host_name ++ (G.root / s)
changelog.markdown view
@@ -1,3 +1,10 @@+2008.10.16+-----------++### Fix++* link within RSS + 2008.10.15 ---------- 
panda.cabal view
@@ -1,5 +1,5 @@ Name:                 panda-Version:              2008.10.15+Version:              2008.10.16 Build-type:           Simple Synopsis:             A simple static blog engine Description:          A simple static blog engine