I know the old script doesn't work and isn't suppose to for what you
wanted, which is why I wrote the new one, which works very differently.
You didn't describe what happened with the new script so I can't say what
happened. You'll need to give more information and try messing with the
script. Can't magically know what's wrong.
~aw
On Saturday, January 23, 2016 at 8:11:55 AM UTC-5, Vlad Ghitulescu wrote:
>
> Hello
>
>
> and thanks for the quick reply **BUT** it doesn't work.
>
> I had this script of yours:
>
> --
> (*
> Author: Kendall Conrad of Angelwatt.com
> Name: Smart Newline
> Created: 2010-01-23
> Updated: 2012-04-21
> Description: Based on the current line it will generate different
> text for the context. It knows about indentation, code doc syntax,
> function starts, lists, HTML li
> *)
> tell application "BBEdit" to tell front window
> activate
> set lineNum to startLine of selection
> set leng to length of line lineNum
> -- Move cursor to end of line
> if leng > 0 then
> select insertion point after (character (leng) of line
> lineNum)
> end if
>
> -- Find leading whitespace
> set theResult to find "(^[\\s]*)" options {search mode:grep}
> searching
> in line (lineNum)
> -- Set text to the white space found
> set white to ""
> if found of theResult then
> set white to found text of theResult
> end if
> set wleng to length of white
>
> -- Define a tab based on user settings
> set aTab to tab
> if expand tabs then
> set spaceTab to ""
> repeat tab width times
> set spaceTab to spaceTab & space
> end repeat
> set aTab to spaceTab
> end if
>
> -- Are we starting a code doc?
> if (leng - wleng) ≥ 3 then
> if (characters (wleng + 1) through (wleng + 3) of line
> lineNum as
> string) is equal to "/**" then
> set selection to return & white & " * " & return &
> white & " */"
> select insertion point after line (lineNum + 1)
> return
> end if
> end if
>
> -- Are we starting a code doc?
> if (leng - wleng) ≥ 2 then
> if (characters (wleng + 1) through (wleng + 2) of line
> lineNum as
> string) is equal to "/*" then
> set selection to return & white & " * " & return &
> white & " */"
> select insertion point after line (lineNum + 1)
> return
> end if
> end if
>
> -- Check for lists
> set theResult to find "^\\s*[\\*#>\\+\\-]+([\\w ]*)" options
> {search
> mode:grep} searching in (line lineNum)
> if found of theResult then
> set preFind to find "[\\*#>\\+\\-]+" options {search
> mode:grep}
> searching in (line lineNum)
> set _char to found text of preFind
> set selection to return & white & _char & " "
> select insertion point after line (lineNum + 1)
> return
> end if
>
> -- Check for numbered list: (1. goes to 2.), (2.5 goes to 2.6)
> set theResult to find "^\\s*([\\d]+\\.)" options {search
> mode:grep}
> searching in (line lineNum)
> if found of theResult then
> set preNum to ""
> set preNumResult to find "([\\d]+\\.)+\\d" options {search
> mode:grep}
> searching in (line lineNum)
> if found of preNumResult then
> set preNum to characters 1 thru -2 of (found text
> of preNumResult)
> end if
> set numResult to find "[\\d]+\\. " options {search
> mode:grep}
> searching in (line lineNum)
> if found of numResult then
> set nextNum to ((characters 1 thru -3 of (found
> text of numResult))
> as text) + 1
> set selection to return & white & preNum & nextNum
> & ". "
> select insertion point after line (lineNum + 1)
> return
> end if
> end if
>
> -- Check for <li
> if (leng - wleng) > 2 and (characters (wleng + 1) through (wleng +
> 3)
> of line lineNum as string) is equal to "<li" then
> -- Capture the whole li tag including attributes
> set liResult to find "<li[^>]*>" options {search
> mode:grep} searching
> in (line lineNum)
> if found of liResult then
> set selection to return & white & (found text of
> liResult) & "</li>"
> else
> -- just use a plain li tag
> set selection to return & white & "<li></li>"
> end if
> select (insertion point before character -5 of line
> (lineNum + 1))
> return
> end if
>
> -- Check for code block ({});
> if (leng - wleng) > 1 and (characters -2 thru -1 of line lineNum
> as
> string) is equal to "({" then
> set selection to return & white & aTab & return & white &
> "});"
> select insertion point after line (lineNum + 1)
> return
> end if
>
> -- Check for code block {}
> if (leng - wleng) ≥ 1 and (character -1 of line lineNum as string)
> is
> equal to "{" then
> set selection to return & white & aTab & return & white &
> "}"
> select insertion point after line (lineNum + 1)
> return
> end if
>
> -- Check for code block ();
> if (leng - wleng) ≥ 1 and (character -1 of line lineNum as string)
> is
> equal to "(" then
> set selection to return & white & aTab & return & white &
> ");"
> select insertion point after line (lineNum + 1)
> return
> end if
>
> -- Check for code block : (Python)
> if (leng - wleng) ≥ 1 and (character -1 of line lineNum as string)
> is
> equal to ":" then
> set selection to return & white & aTab
> select insertion point after line (lineNum + 1)
> return
> end if
>
> -- Default: Insert a return plus the white space
> set selection to return & white
> select insertion point after selection
> end tell
> --
>
> that I've started with a KeyboardMaestro-macro (living in the KBM-Macros
> for BBEdit) triggered by CMD-Return.
>
> I replaced the above script with the new one and… nothing worked
> anymore: nor the previous *Smart Newline*, neither the new *Smart
> Prefixed Newline*.
>
> What went wrong?
>
>
> Regards,
> Vlad
>
>
>
>
> On 23 Jan 2016, at 0:20, Kendall Conrad wrote:
>
> > What you wanted was a bit different than what Smart Newlines was for,
> > but
> > it was easy enough to create a modified version. I only did a small
> > amount
> > of testing, but seemed OK.
> >
> > (*
> > Author: Kendall Conrad of Angelwatt.com
> > Name: Smart Prefixed Newline
> > Created: 2016-01-22
> > Updated: 2016-01-22
> > Description: Starts new line with the same line prefix as the current
> > line and keeps the text
> > from the current cursor position to the end of the line
> > *)
> > tell application "BBEdit" to tell front window
> > activate
> > set lineNum to startLine of selection
> > set leng to length of line lineNum
> > -- Find leading whitespace
> > set theResult to find "(^[\\s]*)" options {search mode:grep} searching
> > in line (lineNum)
> > -- Set text to the white space found
> > set white to ""
> > if found of theResult then
> > set white to found text of theResult
> > end if
> > set wleng to length of white
> >
> > -- Define a tab based on user settings
> > set aTab to tab
> > if expand tabs then
> > set spaceTab to ""
> > repeat tab width times
> > set spaceTab to spaceTab & space
> > end repeat
> > set aTab to spaceTab
> > end if
> >
> > -- Check for list style lines
> > set theResult to find "^\\s*[\\*#>\\+\\-]+([\\w ]*)" options {search
> > mode:grep} searching in (line lineNum)
> > if found of theResult then
> > set preFind to find "[\\*#>\\+\\-]+" options {search mode:grep}
> > searching in (line lineNum)
> > set _char to found text of preFind
> > set selection to return & white & _char
> > select insertion point after selection
> > return
> > end if
> >
> > -- Default: Insert a return plus the white space
> > set selection to return & white
> > select insertion point after selection
> > end tell
> >
> >
> > ~aw
> >
> >
> >
> >
> > On Tuesday, January 19, 2016 at 8:58:34 AM UTC-5, Vlad Ghitulescu
> > wrote:
> >>
> >> Hello!
> >>
> >>
> >> While testing MailMate as an alternative to Apple's Mail.app I edit
> >> my
> >> mails now in BBEdit.
> >> That brings all the joy BBEdit makes :-)… and a question.
> >>
> >> Replying to an email generates first text like this:
> >>
> >> ---
> >>> Lorem ipsum dolor sit amet, consetetur sadipscing elitr, sed diam
> >>> nonumy eirmod
> >>> tempor invidunt ut labore et dolore magna aliquyam erat, sed diam
> >> ---
> >>
> >> When I put the cursor let's say in the first line, between *(…)
> >> amet,*
> >> and * consetetur (…)* and press ENTER, the cited text looks like
> >> this:
> >>
> >> ---
> >>> Lorem ipsum dolor sit amet,
> >> consetetur sadipscing elitr, sed diam nonumy
> >>> eirmod
> >>> tempor invidunt ut labore et dolore magna aliquyam erat, sed diam
> >> ---
> >>
> >> instead of what I would like:
> >>
> >> ---
> >>> Lorem ipsum dolor sit amet,
> >>> consetetur sadipscing elitr, sed diam nonumy
> >>> eirmod
> >>> tempor invidunt ut labore et dolore magna aliquyam erat, sed diam
> >> ---
> >>
> >> that is, the citation mark *> * is not continued.
> >>
> >> I'm using already the Smart Newline - script
> >> (
> http://www.angelwatt.com/words/2011/04/11/bbedit-smart-newline-open-line/),
>
> >>
> >> but it doesn't do it's magic here.
> >>
> >> Do you have an idea, how could I convince the citation mark to *jump*
> >> on
> >> the next line when inserting something in the middle of a line?
> >>
> >> Thanks!
> >>
> >>
> >> Regards,
> >> Vlad
> >>
> >>
> >>
> >
> > --
> > This is the BBEdit Talk public discussion group. If you have a
> > feature request or would like to report a problem, please email
> > "sup...@barebones.com <javascript:>" rather than posting to the group.
> > Follow @bbedit on Twitter: <http://www.twitter.com/bbedit>
> >
> > ---
> > You received this message because you are subscribed to the Google
> > Groups "BBEdit Talk" group.
> > To unsubscribe from this group and stop receiving emails from it, send
> > an email to bbedit+un...@googlegroups.com <javascript:>.
> > To post to this group, send email to bbe...@googlegroups.com
> <javascript:>.
>
--
This is the BBEdit Talk public discussion group. If you have a
feature request or would like to report a problem, please email
"supp...@barebones.com" rather than posting to the group.
Follow @bbedit on Twitter: <http://www.twitter.com/bbedit>
---
You received this message because you are subscribed to the Google Groups
"BBEdit Talk" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to bbedit+unsubscr...@googlegroups.com.
To post to this group, send email to bbedit@googlegroups.com.
