Monday, November 08, 2010 at 12:06 AM.

---

system.verbs.builtins.tcp.im.builtinResponders.metaWeblog.methods.setServer

on setServer (driverName, screenname, message) {
	<<Changes
		<<8/13/02; 12:12:18 AM by JES
			<<Created.
	local (serverUrl = string.nthField (message, " ", 3));
	local (urlparts = string.urlSplit (serverUrl));
	local (server = urlparts[2], port = 80);
	if server contains ":" {
		port = string.nthField (server, ":", 2);
		server = string.nthField (server, ":", 1)};
	local (path = "/" + urlparts[3]);
	with user.im.responders.metaWeblog.prefs {
		siteInfo.port = port;
		siteInfo.port = port;
		siteInfo.rpcPath = path};
	return ("Server set to: " + serverUrl)}

---

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.