diff options
| author | nyamatongwe <unknown> | 2001-01-27 07:09:48 +0000 |
|---|---|---|
| committer | nyamatongwe <unknown> | 2001-01-27 07:09:48 +0000 |
| commit | 99b35426188b403ae773e78a5361d60804754709 (patch) | |
| tree | 1e512c7a14304df4d790cf57d667baa8f154294f /src/LexPerl.cxx | |
| parent | b1dda3b3d051444939e3bc5bc47cd23b5d13c8c0 (diff) | |
| download | scintilla-mirror-99b35426188b403ae773e78a5361d60804754709.tar.gz | |
Patch from Eric to prefer REs after ';'.
Diffstat (limited to 'src/LexPerl.cxx')
| -rw-r--r-- | src/LexPerl.cxx | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/LexPerl.cxx b/src/LexPerl.cxx index f5487492a..833687741 100644 --- a/src/LexPerl.cxx +++ b/src/LexPerl.cxx @@ -640,7 +640,11 @@ static void ColourisePerlDoc(unsigned int startPos, int length, int initStyle, } else if (iswordstart(ch)) { state = SCE_PL_WORD; preferRE = false; - } else if (isoperator(ch)) { + } else if (isPerlOperator(ch)) { + if (ch == ')' || ch == ']') + preferRE = false; + else + preferRE = true; styler.ColourTo(i, SCE_PL_OPERATOR); } } |