From ebda97db9ca432736383a5663ac9a06c11212499 Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Sun, 2 Oct 2011 21:09:16 +0000
Subject: [PATCH] Packager: fix a message text.

git-svn-id: trunk@32628 -
---
 ide/lazarusidestrconsts.pas  | 3 +--
 packager/addtopackagedlg.pas | 2 +-
 2 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/ide/lazarusidestrconsts.pas b/ide/lazarusidestrconsts.pas
index dd3e26785b..52da939316 100644
--- a/ide/lazarusidestrconsts.pas
+++ b/ide/lazarusidestrconsts.pas
@@ -3848,8 +3848,7 @@ resourcestring
   lisA2PTheUnitNameIsTheSameAsAnRegisteredComponent = 'The unit name %s%s%s '
     +'is the same as an registered component.%sUsing this can cause strange '
     +'error messages.';
-  lisA2PFileAlreadyExistsInTheProject = 'File %s%s%s already exists in the '
-    +'project.';
+  lisA2PFileAlreadyExistsInThePackage = 'File %s%s%s already exists in the package.';
   lisA2PExistingFile = '%sExisting file: %s%s%s';
   lisA2PFileAlreadyExists = 'File already exists';
   lisA2PFileIsUsed = 'File is used';
diff --git a/packager/addtopackagedlg.pas b/packager/addtopackagedlg.pas
index d137c0211a..43393539d7 100644
--- a/packager/addtopackagedlg.pas
+++ b/packager/addtopackagedlg.pas
@@ -287,7 +287,7 @@ begin
   if FilenameIsAbsolute(AFilename) then begin
     PkgFile:=LazPackage.FindPkgFile(AFilename,true,false);
     if PkgFile<>nil then begin
-      Msg:=Format(lisA2PFileAlreadyExistsInTheProject, ['"', AFilename, '"']);
+      Msg:=Format(lisA2PFileAlreadyExistsInThePackage, ['"', AFilename, '"']);
       if PkgFile.Filename<>AFilename then
         Msg:=Format(lisA2PExistingFile, [#13, '"', PkgFile.Filename, '"']);
       MessageDlg(lisA2PFileAlreadyExists, Msg, mtError, [mbCancel], 0);