IDE: fpc msg parser: show incompatible ppu file name

git-svn-id: trunk@45498 -
This commit is contained in:
mattias 2014-06-13 16:44:42 +00:00
parent 2b0103804b
commit c707ad2c7c

View File

@ -1824,8 +1824,7 @@ begin
s:=Format(lisCannotFind, [MissingUnitname]);
if UsedByUnit<>'' then
s+=Format(lisUsedBy, [UsedByUnit]);
s+=Format(lisIncompatiblePpu, [CreateRelativePath(PPUFilename,
ExtractFilePath(CodeBuf.Filename))]);
s+=Format(lisIncompatiblePpu, [PPUFilename]);
if PkgName<>'' then
s+=Format(lisPackage3, [PkgName]);
end else if PkgName<>'' then begin