[nickel]

Takes the (text) contents of the clipboard and puts each paragraph in its own box:

on run
set theText to get the clipboard
try
set theTextItems to every paragraph of theText
on error errStr number errorNumber
display dialog errStr
end try
tell application "OmniGraffle Professional 5"
set startingY to 20.0
repeat with aTextItem in theTextItems
try
tell canvas of front window
make new shape at end of graphics with properties {text:{alignment:left, text:aTextItem}, autosizing:full, origin:{100.0, startingY}}
end tell
set startingY to startingY + 30.0
on error errStr number errorNumber
display dialog errStr
end try
end repeat
end tell
end run

It's inspired by Jason Kunesh's great work on generating site maps