[fpc-pascal] Search path order for fpc.cfg

[fredvs]

Hello.

The last line of function check_configfile(fn:string; var
foundfn:string):boolean;
should be something like this:
   
...
  else
 if CfgFileExists(IncludeTrailingBackslash(ExtractFilePath(ParamStr(0)))+fn)
then
       foundfn:=IncludeTrailingBackslash(ExtractFilePath(ParamStr(0)))+fn
  else      
      check_configfile:=false;





--
Sent from: http://free-pascal-general.1045716.n5.nabble.com/