浏览代码

Fix finding line start.

Margers 1 月之前
父节点
当前提交
4f9950e92e
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      packages/fv/src/editors.pas

+ 1 - 1
packages/fv/src/editors.pas

@@ -2486,7 +2486,7 @@ begin
   if P>CurPtr then
    begin
      start:=PAnsiChar(Buffer)+GapLen;
-     pc:=start;
+     pc:=start+P;
      i:=P-CurPtr;
      dec(pc);
      while (i>0) do