Saturday, April 02, 2011 at 9:21 PM.


on newBlog () {
	local (adrdata = rsstoblogsuite.init ());
	if dialog.ask ("Feed URL?", @adrdata^.prefs.lastNewBlogUrl) {
		local (nameblog = string.lastfield (adrdata^.prefs.lastNewBlogUrl, "/"));
		local (adrblog = @adrdata^.blogs.[nameblog]);
		rssToBlogSuite.initBlog (adrblog);
		adrblog^.prefs.urlFeed = adrdata^.prefs.lastNewBlogUrl;
		edit (adrblog)}};
bundle { //test code
	newblog ()}

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.