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

---

newsRiverSuite.importDefaultSubscriptions

<<Changes
	<<12/29/05; 10:59:01 AM by DW
		<<Created.
local (adrdata = xml.aggregator.init ());
local (xmltext = tcp.httpreadurl (newsRiverData.systemUrls.defaultSubscriptions), xstruct);
xml.compile (xmltext, @xstruct);
local (adropml = xml.getAddress (@xstruct, "opml"));
local (adrbody = xml.getAddress (adropml, "body"), adr);
for adr in adrbody {
	if nameof (adr^) contains "outline" {
		local (xmlurl = xml.getAttributeValue (adr, "xmlUrl"));
		<<msg (xmlurl)
		local (adrservice = @adrdata^.services.[xmlurl]);
		if not defined (adrservice^) {
			new (tabletype, adrservice)}}}

---

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.