Hi,

Calling GetAppConfigDir(True) returns the wrong results...

In my application I expected....

/etc/<AppName>/

but instead it returned

/etc<AppName>/

Note the missing directory separator!

---------------[ rtl/unix/sysutils.pp ]-------------------

Function GetAppConfigDir(Global : Boolean) : String;
begin
  If Global then
    Result:=SysConfigDir
  else
    Result:=XdgConfigHome;
  if VendorName'' then
    Result:=IncludeTrailingPathDelimiter(Result+VendorName);   //<===
No dir separator???
  Result:=IncludeTrailingPathDelimiter(Result+ApplicationName);
//<=== No dir separator???
end;

SysConfigDir is set to '/etc' for unix systems. No trailing directory separator.
Above I indicated two places where the directory separator must be added. I'm using FPC 2.2.3 r11214.

Regards,
- Graeme -

_______________________________________________
fpGUI - a cross-platform Free Pascal GUI toolkit
http://opensoft.homeip.net/fpgui/

GetAppConfigFile() has the same issue.

Regards,
- Graeme -

_______________________________________________
fpGUI - a cross-platform Free Pascal GUI toolkit
http://opensoft.homeip.net/fpgui/

This is fixed in fpc-trunk a few weeks ago. I'll morge it to fixes.

Joost

Op donderdag 07-08-2008 om 12:01 uur [tijdzone +0200], schreef Graeme Geldenhuys:

Joost van der Sluis wrote

This is fixed in fpc-trunk a few weeks ago. I'll morge it to fixes.

Umm, I knew I had to fix the tiOPF unit tests ages ago, that way I would have detected the bug much earlier. :)

I'll get another update of Fixes branch, thanks Joost!

Regards,
- Graeme -

_______________________________________________
fpGUI - a cross-platform Free Pascal GUI toolkit
http://opensoft.homeip.net/fpgui/