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

scripting2Suite.server.getPrefs

on getPrefs (username, adrprefs) {
	<<Changes
		<<7/2/10; 11:56:01 AM by DW
			<<Created. 
	local (adrdata = scripting2suite.inituser (username));
	adrprefs^ = adrdata^.prefs;
	<<delete (@adrprefs^.baseFolder)
	delete (@adrprefs^.blogroll);
	delete (@adrprefs^.baseFolder);
	delete (@adrprefs^.homeTemplate);
	delete (@adrprefs^.opmlFolder);
	delete (@adrprefs^.password);
	delete (@adrprefs^.storyTemplate);
	delete (@adrprefs^.stylesheet);
	on fix (adrobj) {
		local (s = string (adrobj^));
		try {delete (adrobj)};
		adrobj^ = s};
	fix (@adrprefs^.headerImage);
	<<scratchpad.prefs = adrprefs^
	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.