aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/LexPerl.cxx
diff options
context:
space:
mode:
authornyamatongwe <devnull@localhost>2001-01-24 07:02:15 +0000
committernyamatongwe <devnull@localhost>2001-01-24 07:02:15 +0000
commitd0382da733c8acd1099c346d44e067f99118b042 (patch)
treee0ede56f7c97b4723b8b71693b8060a4c3d37d71 /src/LexPerl.cxx
parentc9e1920933629edec944955336837dab81136dae (diff)
downloadscintilla-mirror-d0382da733c8acd1099c346d44e067f99118b042.tar.gz
Patch from Steffen for y (transliteration) operator.
Diffstat (limited to 'src/LexPerl.cxx')
-rw-r--r--src/LexPerl.cxx3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/LexPerl.cxx b/src/LexPerl.cxx
index 7e61080a4..d28c88c6c 100644
--- a/src/LexPerl.cxx
+++ b/src/LexPerl.cxx
@@ -235,6 +235,9 @@ static void ColourisePerlDoc(unsigned int startPos, int length, int initStyle,
} else if (ch == 'q' && !isalnum(chNext)) {
state = SCE_PL_STRING_Q;
Quote.New(1);
+ } else if (ch == 'y' && !isalnum(chNext)) {
+ state = SCE_PL_REGSUBST;
+ Quote.New(2);
} else if (ch == 't' && chNext == 'r' && !isalnum(chNext2)) {
state = SCE_PL_REGSUBST;
Quote.New(2);