diff options
| author | Tomas Bzatek <tbzatek@users.sourceforge.net> | 2008-06-11 21:01:51 +0200 |
|---|---|---|
| committer | Tomas Bzatek <tbzatek@users.sourceforge.net> | 2008-06-11 21:01:51 +0200 |
| commit | 30a547b8f4f9f01b8270d653c7ac3784a8ce981c (patch) | |
| tree | b8b9523386f5563bac771101b1ee3b112fb60f9c /UConfig.pas | |
| parent | 540cad830d639a57d9effe9b18283b3bb8cd7a07 (diff) | |
| download | tuxcmd-30a547b8f4f9f01b8270d653c7ac3784a8ce981c.tar.xz | |
Allow optional sorting directories like files
Diffstat (limited to 'UConfig.pas')
| -rw-r--r-- | UConfig.pas | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/UConfig.pas b/UConfig.pas index d4eae70..0b2565b 100644 --- a/UConfig.pas +++ b/UConfig.pas @@ -25,8 +25,8 @@ uses Classes, ULocale; resourcestring ConstAppTitle = 'Tux Commander'; - ConstAboutVersion = '0.6.41-dev'; - ConstAboutBuildDate = '2008-06-10'; + ConstAboutVersion = '0.6.42-dev'; + ConstAboutBuildDate = '2008-06-11'; {$IFDEF __FPC__} {$INCLUDE fpcver.inc} @@ -95,7 +95,7 @@ var ConfPanelSep, ConfRowHeight, ConfRowHeightReal, ConfNumHistoryItems, ConfLinkItemDefaultColors, ConfDotFileItemDefaultColors, ConfLynxLikeMotion, ConfSizeGroupRequestZeroDigits, ConfDisableFileTips, ConfInsMoveDown, ConfSpaceMovesDown, ConfShowFuncButtons, ConfSelectAllDirs, ConfOctalPerm: boolean; ConfMounterUseFSTab, ConfShowTextUIDs, ConfMounterPushDown, ConfSavePanelTabs, ConfDuplicateTabWarning, - ConfOpenConnectionsWarning: boolean; + ConfOpenConnectionsWarning, ConfSortDirectoriesLikeFiles: boolean; ConfShowMounterBar: integer; ConfColumnSizes, ConfColumnIDs: array[1..ConstNumPanelColumns] of integer; @@ -243,6 +243,7 @@ begin ConfCustomDateFormat := '%x'; ConfCustomTimeFormat := '%X'; ConfQuickSearchActivationKey := 0; + ConfSortDirectoriesLikeFiles := False; // Setup default values for colors @@ -466,7 +467,7 @@ begin ConfCustomDateFormat := IniFile.ReadString(ConfProfileName, 'CustomDateFormat', ConfCustomDateFormat); ConfCustomTimeFormat := IniFile.ReadString(ConfProfileName, 'CustomTimeFormat', ConfCustomTimeFormat); ConfQuickSearchActivationKey := IniFile.ReadInteger(ConfProfileName, 'QuickSearchActivationKey', ConfQuickSearchActivationKey); - + ConfSortDirectoriesLikeFiles := IniFile.ReadBool(ConfProfileName, 'SortDirectoriesLikeFiles', ConfSortDirectoriesLikeFiles); SearchForDefaultApps; @@ -555,6 +556,7 @@ begin IniFile.WriteString(ConfProfileName, 'CustomDateFormat', ConfCustomDateFormat); IniFile.WriteString(ConfProfileName, 'CustomTimeFormat', ConfCustomTimeFormat); IniFile.WriteInteger(ConfProfileName, 'QuickSearchActivationKey', ConfQuickSearchActivationKey); + IniFile.WriteBool(ConfProfileName, 'SortDirectoriesLikeFiles', ConfSortDirectoriesLikeFiles); except |