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.