Monday, November 08, 2010 at 12:00 AM.
river2Suite.utilities.gatherOldFeeds
<<Changes
<<8/17/09; 6:13:32 AM by DW
<<Created. I accidentally wiped out my feeds table. This utility re-creates it by getting the feed urls from the river.
local (adrdata = river2suite.init ());
local (adrtable = @river2Suite.utilities.feedcounts);
bundle { //fill the table
new (tabletype, adrtable);
on visit (adritem) {
local (adrsub = @adrtable^.[adritem^.feedurl]);
if defined (adrsub^) {
adrsub^++}
else {
adrsub^ = 1}};
mainresponder.calendar.visitReverseChronologic (@adrdata^.river, @visit)};
bundle { //sub the ones we aren't subbed to
local (adr, url);
for adr in adrtable {
url = nameof (adr^);
if not defined (adrdata^.feeds.[url]) {
msg (url);
river2Suite.subscribeFeed (url)}}}
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.