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

scripting2Suite.utilities.reinstallTool

on reinstallTool () {
	<<Changes
		<<6/30/10; 6:16:37 AM by DW
			<<Created. 
	local (f = frontier.getsubfolder ("apps") + "Tools" + file.getpathchar () + "scripting2.root");
	local (filetext = tcp.httpreadurl ("http://codecasting.org/scripting2/scripting2.root"));
	file.surefilepath (f);
	if file.exists (f) {
		if not dialog.confirm ("Replace the \"Scripting2\" tool?") {
			return (true)};
		try {filemenu.close (@[f])}};
	file.writewholefile (f, filetext);
	frontier.tools.install (f);
	dialog.notify ("New version (" + scripting2Info.releaseDate + ") of \"Scripting2\" installed.")};
bundle { //test code
	reinstallTool ()}



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.