From aa8e136984e00f18ff9a0474fb5c11455b79a9bb Mon Sep 17 00:00:00 2001
From: martin <laz.git@mfriebe.de>
Date: Sat, 31 Jan 2009 18:47:27 +0000
Subject: [PATCH] SynEdit: Fixed crash when adding "begin" to last line. (bug
 introduced in revision 18436 #42a27dba3d)

git-svn-id: trunk@18520 -
---
 components/synedit/synhighlighterpas.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/synedit/synhighlighterpas.pp b/components/synedit/synhighlighterpas.pp
index a44cf10290..85bd3c4db9 100644
--- a/components/synedit/synhighlighterpas.pp
+++ b/components/synedit/synhighlighterpas.pp
@@ -2345,7 +2345,7 @@ function TSynPasSyn.GetWordTriplet(LogicalCaret: TPoint; Lines: TSynEditStrings;
       end else begin
         MinLvl := 0;
       end;
-    until Result = c;
+    until Result >= c;
     Result := -1;
   end;