mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-07 14:40:28 +02:00
CheckLFMDialog: remove commented debug lines.
git-svn-id: trunk@25995 -
This commit is contained in:
parent
bc2773b52f
commit
9f37253105
@ -709,12 +709,8 @@ begin
|
||||
Result:=false;
|
||||
for i:=LfmChangeList.Count-1 downto 0 do begin
|
||||
Entry:=TLFMChangeEntry(LfmChangeList[i]);
|
||||
// DebugLn('TCheckLFMDialog.ApplyReplacements A ',IntToStr(i),' ',
|
||||
// IntToStr(Entry.StartPos),',',IntToStr(Entry.EndPos),
|
||||
// ' "',copy(fLFMBuffer.Source,Entry.StartPos,Entry.EndPos-Entry.StartPos),'" -> "',Entry.NewText,'"');
|
||||
fLFMBuffer.Replace(Entry.StartPos,Entry.EndPos-Entry.StartPos,Entry.NewText);
|
||||
end;
|
||||
//writeln(fLFMBuffer.Source);
|
||||
Result:=true;
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user