Tuesday, August 18, 2009 at 7:31 PM.

---

newsRiverSuite.menuCommands.addRssAtts

if typeof (window.frontmost ()^) != outlinetype {
	scripterror ("Can't Add a feed to an outline because the frontmot window doesn't contain an outline.")};
if dialog.ask ("URL for feed:", @newsRiverData.prefs.lastFeedUrl) {
	local (adrdata = xml.aggregator.init ());
	local (url = newsRiverData.prefs.lastFeedUrl);
	local (adrservice = @adrdata^.services.[url], atts);
	
	local (servicestable);
	if not defined (adrservice^) {
		new (tabletype, @servicestable);
		xml.aggregator.readService (url, @servicestable); //10/14/02 DW
		adrservice = @servicestable.[url]};
	
	op.insert (adrservice^.compilation.channeltitle, down);
	new (tabletype, @atts);
	atts.type = "rss";
	atts.xmlUrl = url;
	atts.title = adrservice^.compilation.channeltitle;
	atts.htmlUrl = adrservice^.compilation.channellink;
	op.attributes.addgroup (@atts)}

---

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.