mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-09 01:48:03 +02:00
favorites: use AppendPathDelim instead of IncludeTrailingPathDelimiter for config paths.
git-svn-id: trunk@51405 -
This commit is contained in:
parent
01a9fd311b
commit
5a4006d0a4
@ -32,7 +32,7 @@ interface
|
||||
uses
|
||||
Classes, SysUtils, ToolBarIntf, IDEImagesIntf, Graphics, PackageIntf,
|
||||
Menus, LazIDEIntf, ProjectIntf, Laz2_XMLCfg, IDEOptionsIntf,
|
||||
IDECommands, ComCtrls, favoritesstr, ImgList;
|
||||
IDECommands, ComCtrls, favoritesstr, ImgList, LazFileUtils;
|
||||
|
||||
type
|
||||
TFavoritesHandler = class
|
||||
@ -234,7 +234,7 @@ begin
|
||||
FFavoriteProjects.Duplicates := dupIgnore;
|
||||
FFavoriteProjects.CaseSensitive := False;
|
||||
FFavoriteProjects.Sorted := True;
|
||||
FConfig := TXMLConfig.Create(IncludeTrailingPathDelimiter(LazarusIDE.GetPrimaryConfigPath)+'favorites.xml');
|
||||
FConfig := TXMLConfig.Create(AppendPathDelim(LazarusIDE.GetPrimaryConfigPath)+'favorites.xml');
|
||||
LoadFromConfig;
|
||||
|
||||
xToolButton := IDEToolButtonCategories.FindItemByCommand(ecOpen);
|
||||
|
Loading…
Reference in New Issue
Block a user