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

ide: fixed rename identifier

Browse Source
This commit is contained in:
mattias 2025-02-22 09:07:52 +01:00
parent 30fb2bbc22
commit fea75fa494
1 changed files with 1 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
ide/findrenameidentifier.pas
View File

@ -666,8 +666,7 @@ begin
if Options.Rename then begin
if RenamingFile or (ExtractFileName(OldFileName)<>ExtractFilename(NewFilename))
then begin
if RenamingFile then begin
// rename file, and associated lfm, res, etc,
// keeping source editor and session data
// rename source name in this file
@ -722,12 +721,6 @@ begin
LazarusIDE.OpenEditorsOnCodeToolChange:=OldChange;
end;
if RenamingFile then begin
// ToDo
//Result:=RenameIdentifier_SaveFile(OldFileName,NewFilename);
//if Result<>mrOk then exit;
end;
if Options.RenameShowResult then begin
if OldRefs<>nil then begin
// re-add the references