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

IDE: source editor: fixed closing incremental find on closing file, bug #11489

Browse Source 
git-svn-id: trunk@15537 -
This commit is contained in:
mattias 2008-06-23 12:33:43 +00:00
parent 8be0e41f40
commit ab9bf34019
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ide/sourceeditor.pp
View File

@ -5669,6 +5669,7 @@ begin
TempEditor:=FindSourceEditorWithPageIndex(PageIndex);
if TempEditor=nil then exit;
Visible:=true;
EndIncrementalFind;
TempEditor.Close;
TempEditor.Free;
if Notebook.PageCount>1 then