diff options
| author | joost <joost@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2009-03-22 10:08:24 +0000 |
|---|---|---|
| committer | joost <joost@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2009-03-22 10:08:24 +0000 |
| commit | 8391a696607e11fe7cf84c5d4b6fde0230e6b3b5 (patch) | |
| tree | 42d76c2a95da8cd601e76abd1251f5c14340ada9 /packages/fpmkunit | |
| parent | 17aa8be22e4589c8386ec4552ac2f3a052edd259 (diff) | |
| download | fpc-8391a696607e11fe7cf84c5d4b6fde0230e6b3b5.tar.gz | |
* Use ExeSearch instead of FileSearch to find compiler/command executable
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@12952 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/fpmkunit')
| -rw-r--r-- | packages/fpmkunit/src/fpmkunit.pp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/packages/fpmkunit/src/fpmkunit.pp b/packages/fpmkunit/src/fpmkunit.pp index cda894bcf3..922119f20c 100644 --- a/packages/fpmkunit/src/fpmkunit.pp +++ b/packages/fpmkunit/src/fpmkunit.pp @@ -3231,7 +3231,7 @@ begin O:=Substitute(C.Options,['SOURCE',C.SourceFile,'DEST',C.DestFile]); Cmd:=C.Command; If (ExtractFilePath(Cmd)='') then - Cmd:=FileSearch(Cmd,GetEnvironmentvariable('PATH')); + Cmd:=ExeSearch(Cmd,GetEnvironmentvariable('PATH')); ExecuteCommand(Cmd,O,C.IgnoreResult); If Assigned(C.AfterCommand) then C.AfterCommand(C); @@ -3583,7 +3583,7 @@ begin FCompiler:=Defaults.Compiler; If (ExtractFilePath(FCompiler)='') then begin - S:=FileSearch(FCompiler,GetEnvironmentVariable('PATH')); + S:=ExeSearch(FCompiler,GetEnvironmentVariable('PATH')); If (S<>'') then FCompiler:=S; end; |