ref: 739a87e1784ac804326401b429063b07143fb21c
parent: 9f45db11e1c4856f9f3902ef56203d4292b9b052
author: sl <[email protected]>
date: Thu Dec 11 16:38:31 EST 2008
Fix and simplify code that generates rss/atom urls. Now it handles urls in / properly.
--- a/bin/werc.rc
+++ b/bin/werc.rc
@@ -205,12 +205,10 @@
if (~ $#blogDirs 0)
blogDirs = `{basename -d $body}
- u=`{cleanname `{basename -d $uri}}
- rssuri=$baseuri^$"u^/index.rss
- atomuri=$baseuri^$"u^/index.atom
+ u=`{cleanname $baseuri^`{basename -d '/'^$uri}|sed 's,:/,://,'} # Sed recovers '/' in 'http:/' stripped by cleanname
extraHeaders=$"extraHeaders ^ \
- '<link rel="alternate" type="application/rss+xml" title="RSS" href="'$rssuri'" />
- <link rel="alternate" type="application/atom+xml" title="ATOM" href="'$atomuri'"/>
+ '<link rel="alternate" type="application/rss+xml" title="RSS" href="'$"u'/index.rss" />
+<link rel="alternate" type="application/atom+xml" title="ATOM" href="'$"u'/index.atom" />
'
set_handler tpl_handler lib/feeds/html.tpl