summaryrefslogtreecommitdiff
path: root/UConfig.pas
diff options
context:
space:
mode:
authorTomas Bzatek <tbzatek@users.sourceforge.net>2009-10-04 12:39:05 +0200
committerTomas Bzatek <tbzatek@users.sourceforge.net>2009-10-04 12:39:05 +0200
commitc04230ac95cf53ce73a4c7872e6eb64aeeba9668 (patch)
tree6aca02a26a535663052036f7760e9cecffeee881 /UConfig.pas
parentc36919073910a98ddf1b8008227e0f5ede1a53bb (diff)
downloadtuxcmd-c04230ac95cf53ce73a4c7872e6eb64aeeba9668.tar.xz
Add "do-not-show-again" checkbox to some VFS questions
Also remove active VFS connection question on quit
Diffstat (limited to 'UConfig.pas')
-rw-r--r--UConfig.pas8
1 files changed, 7 insertions, 1 deletions
diff --git a/UConfig.pas b/UConfig.pas
index a58363a..e4f919f 100644
--- a/UConfig.pas
+++ b/UConfig.pas
@@ -103,7 +103,7 @@ var ConfPanelSep, ConfRowHeight, ConfRowHeightReal, ConfNumHistoryItems,
ConfMounterUseFSTab, ConfShowTextUIDs, ConfMounterPushDown, ConfSavePanelTabs, ConfDuplicateTabWarning,
ConfOpenConnectionsWarning, ConfSortDirectoriesLikeFiles, ConfQuickRenameSkipExt, ConfRightClickSelect,
ConfSearchFilterCaseSensitive, ConfSearchOtherFS, ConfSearchArchives, ConfSearchTextCaseSensitive,
- ConfMakeSymlinkRelative: boolean;
+ ConfMakeSymlinkRelative, ConfReplaceConnectionWarning, ConfWarnUnsavedConnection: boolean;
ConfShowMounterBar: integer;
ConfColumnSizes, ConfColumnIDs: array[1..ConstNumPanelColumns] of integer;
@@ -271,6 +271,8 @@ begin
ConfSearchArchives := False;
ConfSearchTextCaseSensitive := False;
ConfMakeSymlinkRelative := False;
+ ConfReplaceConnectionWarning := True;
+ ConfWarnUnsavedConnection := True;
// Setup default values for colors
@@ -517,6 +519,8 @@ begin
(********************************************* NEW SINCE 0.6.55 *************************************************)
ConfRightClickSelect := IniFile.ReadBool(ConfProfileName, 'RightClickSelect', ConfRightClickSelect);
+ ConfReplaceConnectionWarning := IniFile.ReadBool(ConfProfileName, 'ReplaceConnectionWarning', ConfReplaceConnectionWarning);
+ ConfWarnUnsavedConnection := IniFile.ReadBool(ConfProfileName, 'WarnUnsavedConnection', ConfWarnUnsavedConnection);
SearchForDefaultApps;
@@ -610,6 +614,8 @@ begin
(********************************************* NEW SINCE 0.6.55 *************************************************)
IniFile.WriteBool(ConfProfileName, 'RightClickSelect', ConfRightClickSelect);
+ IniFile.WriteBool(ConfProfileName, 'ReplaceConnectionWarning', ConfReplaceConnectionWarning);
+ IniFile.WriteBool(ConfProfileName, 'WarnUnsavedConnection', ConfWarnUnsavedConnection);
except
on E: Exception do DebugMsg(['*** Error: Cannot save user settings (', E.ClassName, '): ', E.Message]);