From c707ad2c7c26355f15bc656efef329fcf5faae81 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Fri, 13 Jun 2014 16:44:42 +0000
Subject: [PATCH] IDE: fpc msg parser: show incompatible ppu file name

git-svn-id: trunk@45498 -
---
 ide/etfpcmsgparser.pas | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/ide/etfpcmsgparser.pas b/ide/etfpcmsgparser.pas
index 0701f6b7d6..665dff7fcd 100644
--- a/ide/etfpcmsgparser.pas
+++ b/ide/etfpcmsgparser.pas
@@ -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