paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-18 04:19:39 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: fpc msg parser: error while compiling resources: append resourcestring only to translated message

Browse Source 
git-svn-id: branches/fixes_1_4@48385 -
This commit is contained in:
mattias 2015-03-15 20:28:07 +00:00
parent 55538796b7
commit 08071795a8
2 changed files with 3 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ide/etfpcmsgparser.pas
View File

@ -2414,8 +2414,6 @@ begin
Translate(p,MsgItem,TranslatedItem,TranslatedMsg,MsgType);
Msg:=p;
case fMsgID of
FPCMsgIDErrorWhileCompilingResources: // Error while compiling resources
Msg+=' -> Compile with -vd for more details. Check for duplicates.';
FPCMsgIDThereWereErrorsCompiling: // There were $1 errors compiling module, stopping
MsgType:=mluVerbose;
end;
@ -2661,8 +2659,8 @@ begin
then begin
// Error while compiling resources
AddResourceMessages;
MsgLine.Msg:=Format(lisCompileWithVdForMoreDetailsCheckForDuplicates, [
MsgLine.Msg]);
MsgLine.Msg:=MsgLine.Msg+' -> '+'Compile with -vd for more details. Check for duplicates.';
MsgLine.TranslatedMsg:=MsgLine.TranslatedMsg+' -> '+lisCompileWithVdForMoreDetailsCheckForDuplicates;
end
else if IsMsgID(MsgLine,FPCMsgIDErrorWhileLinking,fMsgItemErrorWhileLinking) then
AddLinkingMessages

2
ide/lazarusidestrconsts.pas
View File

@ -5876,7 +5876,7 @@ resourcestring
lisEnableFlagUseUnitOfUnitInPackage = '. Enable flag "Use Unit" of unit %s in package %s';
lisOfTheProjectInspector = ' of the Project Inspector';
lisOfPackage = ' of package %s';
lisCompileWithVdForMoreDetailsCheckForDuplicates = '%s -> Compile with -vd '
lisCompileWithVdForMoreDetailsCheckForDuplicates = 'Compile with -vd '
+'for more details. Check for duplicates.';
lisCannotFindUnit = 'Cannot find unit %s';
lisIncompatiblePpu = ', incompatible ppu=%s';