mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-27 12:00:29 +02:00
Converter: Better title for unit replacement grid.
git-svn-id: trunk@26345 -
This commit is contained in:
parent
07f5ce2d95
commit
9e1d9075fb
@ -767,7 +767,7 @@ begin
|
||||
end;
|
||||
if not fSettings.AutoReplaceUnits then begin
|
||||
// Edit, then remove or replace units.
|
||||
Result:=EditMap(MapToEdit, 'Units to rename or remove.');
|
||||
Result:=EditMap(MapToEdit, 'Units to replace in '+ExtractFileName(fOrigUnitFilename));
|
||||
if Result<>mrOK then exit;
|
||||
// Iterate the map and rename / remove.
|
||||
Node:=MapToEdit.Tree.FindLowest;
|
||||
|
Loading…
Reference in New Issue
Block a user