diff --git a/ide/etfpcmsgparser.pas b/ide/etfpcmsgparser.pas
index 134a386631..084b30e5df 100644
--- a/ide/etfpcmsgparser.pas
+++ b/ide/etfpcmsgparser.pas
@@ -3026,8 +3026,10 @@ begin
           MsgLine.Attribute[MsgAttrDiskFilename]:=LastFilename;
           MsgLine.Flags:=MsgLine.Flags+[mlfTestBuildFile];
           Result:=LastMsgLine.Filename;
-        end else
+        end else begin
           Result:=LastFilename;
+          ReverseTestBuildDir(MsgLine,Result);
+        end;
         exit;
       end;
     end;