From 4cc7eef0d99eeab851206783348c1ab1d512854b Mon Sep 17 00:00:00 2001 From: Basile Burg Date: Thu, 19 Apr 2018 17:25:12 +0200 Subject: [PATCH] faster indent patching --- src/ce_synmemo.pas | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/ce_synmemo.pas b/src/ce_synmemo.pas index 8971acc4..4abe49fc 100644 --- a/src/ce_synmemo.pas +++ b/src/ce_synmemo.pas @@ -1471,7 +1471,7 @@ function TCESynMemo.indentationMode: TIndentationMode; u := Lines[index]; if (u.length > 0) and (u[1] = #9) then result := imTabs - else if (u.length >= self.TabWidth) and u.StartsWith(b[0..TabWidth-1]) then + else if (u.length >= TabWidth) and u.StartsWith(b[0..TabWidth-1]) then result := imSpaces; end; var @@ -1500,6 +1500,7 @@ var i: integer; begin assert(w > 0); + lines.BeginUpdate; for i:= 0 to lines.Count-1 do case m of imTabs: @@ -1513,6 +1514,7 @@ begin fModified:=true; end; end; + lines.EndUpdate; end; procedure TCESynMemo.insertLeadingDDocSymbol(c: char);