From b032f6642c454784cb7264bec240afc7d06a2516 Mon Sep 17 00:00:00 2001
From: nyamatongwe <unknown>
Date: Thu, 14 Dec 2000 07:22:49 +0000
Subject: Patch from Steffen for quotes in SCE_PL_LONGQUOTE.

---
 src/LexPerl.cxx | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'src')

diff --git a/src/LexPerl.cxx b/src/LexPerl.cxx
index c2c52533c..9956c8fb2 100644
--- a/src/LexPerl.cxx
+++ b/src/LexPerl.cxx
@@ -600,6 +600,10 @@ static void ColourisePerlDoc(unsigned int startPos, int length, int initStyle,
 					quoteUp = ch;
 					quoteDown = opposite(quoteUp);
 					quotes++;
+				} else if (ch == '\\' && quoteUp != '\\') {
+					i++;
+					ch = chNext;
+					chNext = styler.SafeGetCharAt(i + 1);
 				} else if (ch == quoteDown) {
 					quotes--;
 					if (quotes == 0) {
-- 
cgit v1.2.3