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

---

scripting2Suite.editor.openWorkspace

on openWorkspace () {
	<<Changes
		<<6/1/10; 10:27:45 AM by DW
			<<Created. 
	local (adrdata = scripting2Suite.init (), adroutline = @adrdata^.editor.workspace.outline);
	local (title = "Workspace: " + adrdata^.editor.prefs.username);
	edit (adroutline, adrButtonTable:@scripting2Suite.editor.buttons.workspace, windowtitle:title);
	scripting2Suite.editor.setEditWindowAttributes (adroutline, title:title);
	bundle { //if the workspace is new, create an initial "Hello World" post
		if adrdata^.editor.workspace.flnew {
			scripting2Suite.editor.newPost ("My \"Hello World\" post");
			adrdata^.editor.workspace.flnew = false}}};
bundle { //test code
	openWorkspace ()}

---

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.