Monday, November 08, 2010 at 12:01 AM.
system.verbs.apps.Finder.move
on move (obj, moveTo, replacing = nil) { <<Move object(s) to a new location
with objectModel, Finder {
if isScriptable () {
return (appleEvent (id, 'core', 'move', '----', finderSpec (obj), 'insh', insertionSpec (moveTo), 'alrp', replacing))}
else {
local (folder, selection);
folder = alias (moveTo);
selection = makeAliasList (obj);
return (finderEvent (id, class, 'move', '----', folder, 'fsel', selection, 'fmsc', 0))}}}
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.