* Use ExeSearch instead of FileSearch to find compiler executable

git-svn-id: trunk@12948 -

compiler/utils/fpc.pp

@@ -98,7 +98,7 @@ program fpc;
        end
       else
        begin
-         path:=FileSearch(ppcbin,getenvironmentvariable('PATH'));
+         path:=ExeSearch(ppcbin,getenvironmentvariable('PATH'));
          if path<>'' then
           begin
             ppcbin:=path;