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


on hideApplication () {
	if system.environment.isMac { //send Apple event
		if system.environment.isCarbon { //call System
			local (systemEventsId = 'sevs');
			if not (sys.appIsRunning (systemEventsId)) { //Is System running?
				local (f = file.getSystemDisk () + "System:Library:CoreServices:System");
				launch.application (f)};
			local (processName = file.fileFromPath (Frontier.getProgramPath ()));
			local (obj = objspec (['prcs'] [processName].['pvis']));
			return (appleEvent ('sevs', 'core', 'setd', '----', obj, 'data', false))}
		else { //Classic -- call Finder
			local (processName = file.fileFromPath (Frontier.getProgramPath ()));
			with objectModel, Finder {
				return (set (process [processName].visible, false))}}};
	if system.environment.isWindows { //kernel verb
		on kernelCall () {
			kernel (Frontier.hideApplication)};
		return (kernelCall ())}}

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.