From 9e1d9075fbb09cf32e073169ad6c256633ac3a37 Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Wed, 30 Jun 2010 09:53:56 +0000
Subject: [PATCH] Converter: Better title for unit replacement grid.

git-svn-id: trunk@26345 -
---
 converter/convertdelphi.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/converter/convertdelphi.pas b/converter/convertdelphi.pas
index 56d1e0103c..c8d529dd01 100644
--- a/converter/convertdelphi.pas
+++ b/converter/convertdelphi.pas
@@ -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;