diff options
| author | nyamatongwe <devnull@localhost> | 2000-05-15 14:17:44 +0000 |
|---|---|---|
| committer | nyamatongwe <devnull@localhost> | 2000-05-15 14:17:44 +0000 |
| commit | 56a9f9ab7c2af4a175f3fede0380c6d8f597fcb4 (patch) | |
| tree | 15ae39a53d0ea6a8051fdb63e9e97651caf69bb3 | |
| parent | b0827ac32a9f191d872578dd46f521ec0773a91a (diff) | |
| download | scintilla-mirror-56a9f9ab7c2af4a175f3fede0380c6d8f597fcb4.tar.gz | |
Mod for here documents from Steffen Goeldner.
| -rw-r--r-- | src/LexPerl.cxx | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/src/LexPerl.cxx b/src/LexPerl.cxx index 2ed36e192..3c9972e2d 100644 --- a/src/LexPerl.cxx +++ b/src/LexPerl.cxx @@ -292,11 +292,13 @@ static void ColourisePerlDoc(unsigned int startPos, int length, int initStyle, } else { quotes++; } - - if (quotes > 1 && isMatch(styler, lengthDoc, i, sooked)) { + if (quotes > 1 && isMatch(styler, lengthDoc, i, sooked) && (chPrev == '\n' || chPrev == '\r') ) { styler.ColourTo(i + sookedpos - 1, SCE_PL_HERE); - state = SCE_PL_DEFAULT; i += sookedpos; + chNext = styler.SafeGetCharAt(i); + if (chNext == '\n' || chNext == '\r') { + state = SCE_PL_DEFAULT; + } chNext = ' '; } } else if (state == SCE_PL_STRING) { |