aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/LexPerl.cxx
diff options
context:
space:
mode:
authornyamatongwe <unknown>2010-05-17 02:48:46 +0000
committernyamatongwe <unknown>2010-05-17 02:48:46 +0000
commit7f38038656650505d5a04a7f7ae335a1fbf8f0a7 (patch)
tree15b23e490091f50a587503fcd409ef72ca09b529 /src/LexPerl.cxx
parent74d92c0f19f84c9f1f5f9e87130c89484db155f6 (diff)
downloadscintilla-mirror-7f38038656650505d5a04a7f7ae335a1fbf8f0a7.tar.gz
Fix debug assertions for bug #3000566.
Diffstat (limited to 'src/LexPerl.cxx')
-rw-r--r--src/LexPerl.cxx2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/LexPerl.cxx b/src/LexPerl.cxx
index 0c6603620..bca78f57c 100644
--- a/src/LexPerl.cxx
+++ b/src/LexPerl.cxx
@@ -1243,7 +1243,7 @@ static void FoldPerlDoc(unsigned int startPos, int length, int, WordList *[],
else if (styler.Match(i, "=head"))
isPodHeading = true;
} else if (style == SCE_PL_DATASECTION) {
- if (ch == '=' && isalpha(chNext) && levelCurrent == SC_FOLDLEVELBASE)
+ if (ch == '=' && isascii(chNext) && isalpha(chNext) && levelCurrent == SC_FOLDLEVELBASE)
levelCurrent++;
else if (styler.Match(i, "=cut") && levelCurrent > SC_FOLDLEVELBASE)
levelCurrent--;