diff options
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 |