On Sep 09, 2011, at 07:43, erikmh wrote:
> Any ideas? (Of course, this would all be much simpler if "rewrap quoted text"
> were available as a Text Factory -- but for some reason it is not.)
______________________________________________________________________
This works with BBEdit 10.0.2 (3089) on Lion. I'll leave it to you to recast
to your purpose.
--
Best Regards,
Chris
--------------------------------------------------------------------------------
on reWrapText(textData)
tell application "BBEdit"
try
set tempDoc to make new text document with properties {contents:textData}
tell tempDoc's text
rewrap quoted text width 68 ¬
paragraph fill true ¬
removing quote spaces true ¬
with leaving trailing quote spaces
end tell
on error errMsg number errNum
set sep to "=============================="
set e to sep & return & "Error: " & errMsg & return & sep & return ¬
& "Error Number: " & errNum & return & sep
beep
display dialog e
end try
end tell
end reWrapText
--------------------------------------------------------------------------------
reWrapText(textData)
--
You received this message because you are subscribed to the
"BBEdit Talk" discussion group on Google Groups.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
<http://groups.google.com/group/bbedit?hl=en>
If you have a feature request or would like to report a problem,
please email "[email protected]" rather than posting to the group.
Follow @bbedit on Twitter: <http://www.twitter.com/bbedit>
