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


on setProfilePart (groupname, username, password, partpath, struct) {
	<<local (adrtable = log.addToGuestDatabase ("setProfilePart", flHourlyRoll:false))
	<<adrtable^.memavailOnEntry = string.megabytestring (sys.memavail ())
	if sizeof (partpath) == 0 {
		scriptError ("Can't set the profile part because the partial path is empty.")};
	local (nomad = mainResponder.members.getMemberTableWithPassword (groupname, username, password));
	while sizeof (partpath) > 0 {
		local (s = string.nthField (partpath, ".", 1));
		nomad = @nomad^.[s];
		partpath = string.delete (partpath, 1, sizeof (s) + 1)}; //pop off the dot too
	nomad^ = struct;
	fileMenu.saveMyRoot (nomad);
	<<adrtable^.memavailOnExit = string.megabytestring (sys.memavail ())
	return (true)}

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.