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

---

newsRiverSuite.readingList.subscribe

local (adrdata = newsRiverSuite.init ());
if dialog.ask ("Reading list URL:", @adrdata^.newsRiver.lastSubUrl) {
	local (url = adrdata^.newsRiver.lastSubUrl);
	local (adrlist = @adrdata^.newsRiver.readingLists.[url]);
	if defined (adrlist^) {
		dialog.alert ("Can't subscribe because you are already subscribed to the list.")}
	else {
		try {
			local (opmltext = tcp.httpreadurl (url));
			xml.compile (opmltext, @xstruct);
			new (tabletype, adrlist)}
		else {
			dialog.alert ("Can't subscribe because there was an error reading the OPML.")}}}

---

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.