paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-26 14:40:29 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: fpc msg parser: reverse source files from test build directory

Browse Source 
git-svn-id: trunk@53211 -
This commit is contained in:
mattias 2016-10-26 07:25:58 +00:00
parent b250b13bbc
commit 018e27b67c
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ide/etfpcmsgparser.pas
View File

@ -3026,8 +3026,10 @@ begin
MsgLine.Attribute[MsgAttrDiskFilename]:=LastFilename; MsgLine.Attribute[MsgAttrDiskFilename]:=LastFilename;
MsgLine.Flags:=MsgLine.Flags+[mlfTestBuildFile]; MsgLine.Flags:=MsgLine.Flags+[mlfTestBuildFile];
Result:=LastMsgLine.Filename; Result:=LastMsgLine.Filename;
end else end else begin
Result:=LastFilename; Result:=LastFilename;
ReverseTestBuildDir(MsgLine,Result);
end;
exit; exit;
end; end;
end; end;