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

on uploadManila (adrblog, dateList, textList) {
	<<1/25/01; 4:53:57 PM by JES
		<<Send multiple days of home page text to a Manila site.
		<<1/26/01; 3:49:54 PM by JES
			<<Renamed to uploadManila.
	local (siteName, host, port, procedure="manila.homepage.setMultiple", rpcPath="/RPC2");
	if not defined (adrblog^.prefs.manila.siteName) { //get the site's canonical name
		siteName = manila.getSiteName (adrblog^.prefs.manila.url);
		adrblog^.prefs.manila.siteName = siteName}; //remember the siteName, since it costs an RPC call
	bundle { //compute the host and port
		local (urlParts = string.urlSplit (adrblog^.prefs.manila.url));
		host = urlParts [2];
		if host contains ':' {
			port = string.nthField (host, ':', 2);
			host = string.nthField (host, ':', 1)}};
	with adrblog^.prefs.manila {
		local (params = {username, string (password), siteName, dateList, textList});
		return (betty.rpc.client (host, port, procedure, @params, rpcPath:rpcPath))}}

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.