paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-28 21:00:43 +02:00
Code Issues Packages Projects Releases Wiki Activity

SynEdit: Fix a typo in the method name TSynEditStringList.CopyHanlders

Browse Source
This commit is contained in:
n7800 2024-09-14 17:04:50 +05:00 committed by Martin
parent 1ef23cb314
commit 7d398b88c7
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/synedit/synedittextbuffer.pp
View File

@ -241,7 +241,7 @@ type
procedure DetachSynEdit(AEdit: TSynEditBase); procedure DetachSynEdit(AEdit: TSynEditBase);
function AttachedSynEditCount: Integer; function AttachedSynEditCount: Integer;
property AttachedSynEdits[Index: Integer]: TSynEditBase read GetAttachedSynEdits; property AttachedSynEdits[Index: Integer]: TSynEditBase read GetAttachedSynEdits;
procedure CopyHanlders(OtherLines: TSynEditStringList; AOwner: TObject = nil); procedure CopyHandlers(OtherLines: TSynEditStringList; AOwner: TObject = nil);
procedure SendCachedNotify; // ToDO: review caching versus changes to topline and other values procedure SendCachedNotify; // ToDO: review caching versus changes to topline and other values
public public
property DosFileFormat: boolean read fDosFileFormat write fDosFileFormat; property DosFileFormat: boolean read fDosFileFormat write fDosFileFormat;
@ -1366,7 +1366,7 @@ begin
FNotifyLists[AReason].Remove(AHandler); FNotifyLists[AReason].Remove(AHandler);
end; end;
procedure TSynEditStringList.CopyHanlders(OtherLines: TSynEditStringList; AOwner: TObject = nil); procedure TSynEditStringList.CopyHandlers(OtherLines: TSynEditStringList; AOwner: TObject = nil);
var var
i: TSynEditNotifyReason; i: TSynEditNotifyReason;
begin begin