paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-15 00:50:49 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fix bug #34241 using provided suggestion by Christo Crause

Browse Source 
git-svn-id: trunk@39713 -
This commit is contained in:
michael 2018-09-08 10:15:57 +00:00
parent 92cce05f5f
commit 2d1ea8070e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fpmkunit/src/fpmkunit.pp
View File

@ -9039,7 +9039,7 @@ Var
begin begin
N:=FixPath(Value, False); N:=FixPath(Value, False);
if ExtractFileExt(N)='' then if ExtractFileExt(N)='' then
ChangeFileExt(N,IncExt); N:=ChangeFileExt(N,IncExt);
Result:=inherited Add(N,CPUs,OSes) as TDependency; Result:=inherited Add(N,CPUs,OSes) as TDependency;
Result.FDependencyType:=depInclude; Result.FDependencyType:=depInclude;
end; end;