All Notes to Children?

[Curtis Clifton]

Michael,

Thanks for the hint.  I always forget the "at" when I'm trying to hack 
quickly.  I discovered another problem with my script also, which is 
remedied in the completed script.  The script converts every note of 
all selected rows into a child.

tell front document of application "OmniOutliner Professional"
	-- use IDs so insertions below don't mess up order
	set theNotedRows to (id of selected rows whose note is not "")
	repeat with theRowID in theNotedRows
		tell (first row whose id is theRowID)
			set theNote to text of note
			set note to ""
		end tell
		display dialog theNote
		make new row at before first child of (first row whose id is 
theRowID) with properties {topic:theNote}
	end repeat
end tell

Share and enjoy!

Curt

----------------------------------
Curtis Clifton, PhD Candidate
Dept. of Computer Science, Iowa State University
http://www.cs.iastate.edu/~cclifton