aboutsummaryrefslogtreecommitdiffhomepage
path: root/lexers/LexPerl.cxx
diff options
context:
space:
mode:
authorZufu Liu <unknown>2019-09-26 12:19:18 +1000
committerZufu Liu <unknown>2019-09-26 12:19:18 +1000
commitd3f8e9aaa4612971f830fb0fa260a88a7b1bd422 (patch)
tree7e8ae936e213ee5dd0cb0477307a03c7207696f5 /lexers/LexPerl.cxx
parent5feb3f8ea47e2628249300575ff207a04b67eca4 (diff)
downloadscintilla-mirror-d3f8e9aaa4612971f830fb0fa260a88a7b1bd422.tar.gz
Backport: Feature [feature-requests:#1306] Fold qw arrays.
Backport of changeset 7688:72933772703e.
Diffstat (limited to 'lexers/LexPerl.cxx')
-rw-r--r--lexers/LexPerl.cxx6
1 files changed, 6 insertions, 0 deletions
diff --git a/lexers/LexPerl.cxx b/lexers/LexPerl.cxx
index 3bf205f70..9b1dc761a 100644
--- a/lexers/LexPerl.cxx
+++ b/lexers/LexPerl.cxx
@@ -1701,6 +1701,12 @@ void SCI_METHOD LexerPerl::Fold(Sci_PositionU startPos, Sci_Position length, int
} else if (ch == ']') {
levelCurrent--;
}
+ } else if (style == SCE_PL_STRING_QW) {
+ // qw
+ if (stylePrevCh != style)
+ levelCurrent++;
+ else if (styleNext != style)
+ levelCurrent--;
}
// POD folding
if (options.foldPOD && atLineStart) {