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

IDE: default for macro FPCMsgFile: $(FPCSrcDir)/compiler/msg/errore.msg

Browse Source 
git-svn-id: trunk@42185 -
This commit is contained in:
mattias 2013-07-23 21:13:43 +00:00
parent 2d493a3e4a
commit 08bdff7239
1 changed files with 3 additions and 0 deletions

3
ide/environmentopts.pp
View File

@ -1780,6 +1780,9 @@ begin
Parsing:=true;
try
ParsedValue:=UnparsedValue;
if (ParsedValue='') and (o=eopCompilerMessagesFilename) then
ParsedValue:=SetDirSeparators('$(FPCSrcDir)/compiler/msg/errore.msg');
if not GlobalMacroList.SubstituteStr(ParsedValue) then begin
debugln(['TEnvironmentOptions.GetParsedValue failed for ',dbgs(o),' Value="',UnparsedValue,'"']);
end;