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

on stopAll () {
		<<8/16/02; 4:55:17 PM by JES
	local (driverNames = {});
	on getDriversFromTable (adrtable) {
		local (adr);
		for adr in adrtable {
			local (name = string.lower (nameOf (adr^)));
			if not (driverNames contains name) {
				driverNames = driverNames + name;}};
		return (true)};
	getDriversFromTable (;
	getDriversFromTable (;
	local (driver);
	for driver in driverNames {
		local (adrdriver);
		if (driver, @adrdriver) {
			try {
				adrdriver^.stop ()}}};
	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.