Archiv:Crews/Seetiger/Seetiger 09Juli2009-16Sept2010/Logscript

Kleines applescript, was aus dem OmniOutliner Mediawiki erzeugt:

tell front document of application "OmniOutliner"
	set expText to "" 
	
	repeat with aRow in rows
		set rowText to ""
		-- start from 2 to treat top levels as headers
		repeat with i from 1 to level of aRow
			set rowText to rowText & "*"
		end repeat
		set rowText to rowText & "" & topic of aRow
		set expText to expText & return & rowText
	end repeat
	
	set the clipboard to expText
	
	display dialog "The exported text is in the clipboard."
 end tell