diff options
author | nyamatongwe <unknown> | 2002-08-13 08:20:23 +0000 |
---|---|---|
committer | nyamatongwe <unknown> | 2002-08-13 08:20:23 +0000 |
commit | 104188fbe2aa005fcb6904105f2ce8268c6565fd (patch) | |
tree | bd64a540cb42d8125a957dbb0f1190b3662dfc6a | |
parent | ebf94cc1fe9e342f269b4d4047cf28bd416185ce (diff) | |
download | scintilla-mirror-104188fbe2aa005fcb6904105f2ce8268c6565fd.tar.gz |
Patch from Laurent to make case statements fold.
-rw-r--r-- | src/LexPascal.cxx | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/src/LexPascal.cxx b/src/LexPascal.cxx index 491d968ac..2f2be32e4 100644 --- a/src/LexPascal.cxx +++ b/src/LexPascal.cxx @@ -32,10 +32,13 @@ static int classifyWordPascal(unsigned int start, unsigned int end, WordList &ke else { if (keywords.InList(s)) { chAttr = SCE_C_WORD; - if (strcmp(s, "begin") == 0 || strcmp(s, "object") == 0) + if (strcmp(s, "begin") == 0 || + strcmp(s, "object") == 0 || + strcmp(s,"case") == 0) { lev=1; - else if (strcmp(s, "end") == 0) + } else if (strcmp(s, "end") == 0) { lev=-1; + } } } styler.ColourTo(end, chAttr); |