At 05:43 -0700 09/09/2011, erikmh wrote:

Here's what I have:

on run {input, parameters}
  tell application "BBEdit"
    set wasVisible to visible of scratchpad window
    set contents of scratchpad window to input
    set w to open scratchpad window
    rewrap quoted text w width 68 with paragraph fill and removing quote
spaces and leaving trailing quote spaces
    if not wasVisible then close w
    return contents of scratchpad window
  end tell
end run

Try a Text Filter instead, which will work on the selection or onthe whole text of a doc -- and lacks verbosity, of course:

#!/usr/bin/perl
use Text::Wrap; $Text::Wrap::columns = 70;
print Text::Wrap::fill( '', '', join '', <> );

JD


--
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>

Reply via email to