From 4ab387e7191b68fd4e72abdad4d11a0204be9ec9 Mon Sep 17 00:00:00 2001 From: nyamatongwe Date: Tue, 23 Dec 2008 23:52:01 +0000 Subject: Fixes for GCC 4.3 warnings. The Pascal change fixes behaviour. --- src/LexPerl.cxx | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/LexPerl.cxx') diff --git a/src/LexPerl.cxx b/src/LexPerl.cxx index f57f73c29..4b7c9878a 100644 --- a/src/LexPerl.cxx +++ b/src/LexPerl.cxx @@ -569,7 +569,7 @@ static void ColourisePerlDoc(unsigned int startPos, int length, int initStyle, sc.Forward(ws_skip + 1); HereDoc.Quote = delim_ch; HereDoc.Quoted = true; - } else if (ws_skip == 0 && setNonHereDoc.Contains(sc.chNext) + } else if ((ws_skip == 0 && setNonHereDoc.Contains(sc.chNext)) || ws_skip > 0) { // left shift << or <<= operator cases // restore position if operator -- cgit v1.2.3