Merge pull request #133 from JaFi-cz/master

GetWordAtRowCol fix
TurboPack · Jan 11, 2022 · d9490d3 · d9490d3
2 parents eb5bf57 + 2ae21b8
commit d9490d3
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/Source/SynEdit.pas b/Source/SynEdit.pas
@@ -8877,9 +8877,9 @@ function TCustomSynEdit.GetWordAtRowCol(XY: TBufferCoord): string;
   begin
     Line := Lines[XY.Line - 1];
     Len := Length(Line);
-    if (Len > 0) and InRange(XY.Char, 1, Len + 1) then
+    Start := XY.Char;
+    if (Len > 0) and InRange(XY.Char, 1, Len + 1) and IsIdentChar(Line[Start]) then
     begin
-       Start := XY.Char;
        while (Start > 1) and IsIdentChar(Line[Start - 1]) do
           Dec(Start);