mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-08 10:59:05 +02:00
IDE: create TBrowseEditorTabHistoryDialog only when needed
This commit is contained in:
parent
444f10ecab
commit
46e5442514
@ -7834,7 +7834,9 @@ end;
|
||||
|
||||
function TSourceNotebook.GetHistoryDlg: TBrowseEditorTabHistoryDialog;
|
||||
begin
|
||||
FHistoryDlg := TBrowseEditorTabHistoryDialog.CreateNew(Self);
|
||||
if FHistoryDlg=nil then
|
||||
FHistoryDlg := TBrowseEditorTabHistoryDialog.CreateNew(Self);
|
||||
Result:=FHistoryDlg;
|
||||
end;
|
||||
|
||||
procedure TSourceNotebook.BeginIncrementalFind;
|
||||
|
Loading…
Reference in New Issue
Block a user