View Single Post
An alternative might be the following, which moves any selected task (together with its subtree) to the top of the Inbox.

tell application id "com.omnigroup.omnifocus"
	set oDoc to front document
	tell oDoc
		set refInbox to inbox tasks
		tell front document window
			set lstTasks to value of selected trees of content
			repeat with oTask in lstTasks
				move oTask to before beginning of refInbox
			end repeat
		end tell
	end tell
end tell

Last edited by RobTrew; 2010-11-24 at 01:42 PM.. Reason: Moved trailling "l" back into the code :-) thanks to whpalmer4 for pointing it out.