summaryrefslogtreecommitdiff
path: root/UConfig.pas
diff options
context:
space:
mode:
Diffstat (limited to 'UConfig.pas')
-rw-r--r--UConfig.pas4
1 files changed, 2 insertions, 2 deletions
diff --git a/UConfig.pas b/UConfig.pas
index ed62068..f6bd6d8 100644
--- a/UConfig.pas
+++ b/UConfig.pas
@@ -143,7 +143,7 @@ function CheckConfFilesMod(var ChangedMainGUI, ChangedAssoc, ChangedBookmarks, C
implementation
-uses ULibc, glib2, SysUtils, UCoreUtils, UCore, UFileAssoc, UCoreClasses, UGnome, UVFSCore;
+uses ULibc, lazglib2, SysUtils, UCoreUtils, UCore, UFileAssoc, UCoreClasses, UGnome, UVFSCore;
var InternalQuickExit, InternalDeleteHistory: boolean;
InternalMainGUIConfmtime, InternalBookmarksConfmtime, InternalFAssocConfmtime, InternalMounterConfmtime,
@@ -1070,7 +1070,7 @@ begin
if ConnectionMgrList.Count > 0 then
for i := 0 to ConnectionMgrList.Count - 1 do
with TConnMgrItem(ConnectionMgrList[i]) do begin
- SectionTitle := Format('%d_%d_%d', [g_str_hash(PChar(ConnectionName)), i, g_str_hash(PChar(GetURI(False)))]);
+ SectionTitle := Format('%d_%d_%d', [g_str_hash(gpointer(PChar(ConnectionName))), i, g_str_hash(gpointer(PChar(GetURI(False))))]);
IniFile.EraseSection(SectionTitle);
IniFile.WriteString(SectionTitle, 'ConnectionName', ConnectionName);
IniFile.WriteString(SectionTitle, 'ServiceType', ServiceType);