mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-03 08:18:13 +02:00
IDE: clean up
git-svn-id: trunk@63608 -
This commit is contained in:
parent
d0123e2ed8
commit
950091831c
@ -4624,7 +4624,6 @@ var
|
||||
OldUnitName, NewUnitName: string;
|
||||
ACaption, AText, APath: string;
|
||||
Filter, AllEditorExt, AllFilter: string;
|
||||
NeedOverwritePrompt: Boolean;
|
||||
begin
|
||||
if (AnUnitInfo<>nil) and (AnUnitInfo.OpenEditorInfoCount>0) then
|
||||
SrcEdit := TSourceEditor(AnUnitInfo.OpenEditorInfo[0].EditorComponent)
|
||||
|
Loading…
Reference in New Issue
Block a user