diff options
author | nyamatongwe <devnull@localhost> | 2009-07-01 09:54:33 +0000 |
---|---|---|
committer | nyamatongwe <devnull@localhost> | 2009-07-01 09:54:33 +0000 |
commit | 54778e84b158929f9fa76808772d7ff2e77e0fe3 (patch) | |
tree | eb64736d5e6c7dcc5e8a8c2100d89b5c26ffdf6f /src/LexPerl.cxx | |
parent | d9ccaf73cb8bf62b377434ac55792abacabae245 (diff) | |
download | scintilla-mirror-54778e84b158929f9fa76808772d7ff2e77e0fe3.tar.gz |
Patch from Kein-Hong Man for bug #2809168.
Diffstat (limited to 'src/LexPerl.cxx')
-rw-r--r-- | src/LexPerl.cxx | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/LexPerl.cxx b/src/LexPerl.cxx index 22b455d0e..0c6603620 100644 --- a/src/LexPerl.cxx +++ b/src/LexPerl.cxx @@ -963,6 +963,7 @@ static void ColourisePerlDoc(unsigned int startPos, int length, int initStyle, bool hereDocSpace = false; // for: SCALAR [whitespace] '<<' unsigned int bk = (sc.currentPos > 0) ? sc.currentPos - 1: 0; unsigned int bkend; + sc.Complete(); styler.Flush(); if (styler.StyleAt(bk) == SCE_PL_DEFAULT) hereDocSpace = true; @@ -1142,6 +1143,7 @@ static void ColourisePerlDoc(unsigned int startPos, int length, int initStyle, } backFlag = BACK_NONE; } else if (sc.ch == '(' && sc.currentPos > 0) { // '(' or subroutine prototype + sc.Complete(); if (styleCheckSubPrototype(styler, sc.currentPos - 1)) { sc.SetState(SCE_PL_SUB_PROTOTYPE); backFlag = BACK_NONE; |