Monday, April 04, 2011 at 1:06 AM.
radio2Suite.viewArchive
on viewArchive (adruser, adrfeed) {
<<Changes
<<3/4/11; 8:04:41 AM by DW
<<Created.
local (htmltext = "", indentlevel = 0);
on add (s) {
htmltext = htmltext + string.filledstring ("\t", indentlevel) + s + "\r"};
on visit (adrday) {
local (d = mainresponder.calendar.getaddressday (adrday));
local (url = urlArchive + file.getdatepath ("/", d) + fname);
local (link = "<a href=\"" + url + "\">" + date.longstring (d) + "</a>");
add (link + "<br><br>");
return (true)};
bundle {
local (url = adrfeed^.stats.feedUrl, fname = string.lastfield (url, "/"));
local (urlArchive = string.delete (url, sizeof (url) - sizeof (fname) + 1, sizeof (fname)));
mainresponder.calendar.visitReverseChronologic (@adrfeed^.calendar, @visit, true)};
return (htmltext)}
This listing is for code that runs in the OPML Editor environment. I created these listings because I wanted the search engines to index it, so that when I want to look up something in my codebase I don't have to use the much slower search functionality in my object database. Dave Winer.