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

---

system.verbs.apps.FinderMenu.listSelectedScripts

<<Fri, Dec 5, 1997 at 1:28:29 AM by PBS
	<<Moved from toys.listSelectedScripts.
	<<Cleaned up for Frontier 5:
		<<Files can be of type 2CLK, FATP, or FTsc.
		<<Don't set font and size of new outline.
		<<Change 'LAND' to frontier.id.
on visit (path) {
	local (f);
	fileloop (f in path, infinity) {
		if file.creator (f) == frontier.id {
			case file.type (f) {
				'FTsc';
				'FATP';
				'2CLK' {
					if firstline {
						op.setLineText (f); <<replace the blank line in all new outline windows
						firstline = false}
					else {
						op.insert (f, down)}}}}}; <<add a new line
	return (true)};

local (firstline = true);
local (adrOutline = @scratchpad.finderList);
Frontier.bringToFront ();
new (outlineType, adrOutline); <<create a new outline, overwrites any existing outline
target.set (adrOutline); <<all subsequent commands apply to this window
edit (adrOutline); <<open the outline in a window so you can watch the script run
FinderMenu.visitPaths (@visit); <<process each of the files selected in the Finder
target.clear ()

---

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.