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

on checkTools () {
	<<This is a lightweight Tools checker.
		<<If a Tools changes status, install or uninstall. Also install new Tools.
		<<01/06/01; 3:34:11 PM by PBS
		<<9/9/01; 2:15:17 PM by JES
			<<Call to get the short name of the tool.
				<<Fixes a bug reported by Philippe Martin 9/9/01 on the frontier-bugs mailing list. (); //install any new Tools
	on checkOneTool (f) {
		local (fname = file.fileFromPath (f));
		local (shortName = (fname));
		if (f) { //possibly install enabled Tool
			local (flInstalled = false);
			if defined ([shortName].flInstalled) {
				if[shortName].flInstalled {
					flInstalled = true}};
			if not flInstalled { (f)}}
		else { //possibly uninstall disabled Tool
			if defined ([shortName].flInstalled) {
				if[shortName].flInstalled { (f)}}};
		return (true)}; //keep visiting (@checkOneTool)};
bundle { //testing
	checkTools ()}

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.