Monday, April 04, 2011 at 1:08 AM.


on newUser (username, password) {
		<<3/15/11; 11:32:54 AM by DW
			<<New routine, factored from radio2Suite.menuCommands.newUser.
		<<3/13/11; 1:00:40 PM by DW
			<<Open the user's table at the end.
		<<3/9/11; 1:56:50 AM by DW
			<<Publish the user's feed so the initial display has all the elements it's supposed to. Working on the first-time user experience. 
		<<3/7/11; 3:18:48 PM by DW
			<<Prompt for password, store it in members.root.
		<<2/15/11; 12:44:19 PM by DW
	local (adrdata = radio2suite.init ());
	if true { //dialog.ask ("Username:", @adrdata^.prefs.lastNewUserName)
		local (adruser = @adrdata^.users.[username]);
		radio2Suite.initUser (adruser);
		adruser^.prefs.enabled = true;
		local (adrfeed = @adruser^.feeds.[]);
		new (tabletype, adrfeed);
		radio2Suite.initFeed (adrfeed);
		adrfeed^.prefs.enabled = true;
		adrdata^.prefs.s3enabled = true;
		filemenu.savemyroot (adrdata); //3/9/11 by DW
		radio2suite.publish (adruser, adrfeed); //3/9/11 by DW
		filemenu.savemyroot (adruser);
		local (adrmember = opmlEditor.member.initMember (username, flcreate:true));
		adrmember^.prefs.password = password;
		filemenu.savemyroot (adrmember); //3/9/11 by DW
		return (adruser)}};
bundle { //test code
	newUser ()}

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.