diff options
author | Raúl Benencia <rul@kalgan.cc> | 2013-09-03 00:00:50 -0300 |
---|---|---|
committer | Raúl Benencia <rul@kalgan.cc> | 2013-09-03 00:00:50 -0300 |
commit | e41dd5091f597e2252deb9ecbde900eda7c15614 (patch) | |
tree | b60a532b67aa9932dd0af9a00daf5735e496812b /Config.hs | |
parent | 56b4aef769386e9fbe3b074698451e8b74489d61 (diff) |
Sorted index mode
Diffstat (limited to 'Config.hs')
-rw-r--r-- | Config.hs | 13 |
1 files changed, 3 insertions, 10 deletions
@@ -12,24 +12,17 @@ import Data.List(sort, stripPrefix) import System.Posix.Files(getSymbolicLinkStatus, isSymbolicLink) import UI.NCurses(Color(..)) -data LazymailConfig = LazymailConfig { - baseColor :: (Color, Color) -- (foreground, background) - , selectionColor :: (Color, Color) - , statusBarColor :: (Color, Color) - , headerColor :: (Color, Color) - , showStatusBar :: Bool - , initialPath :: FilePath - , filterMaildirsHook :: [FilePath] -> IO [FilePath] -} +import Types(LazymailConfig(..)) defaultConfig = LazymailConfig { baseColor = (ColorWhite, ColorBlack) , selectionColor = (ColorYellow, ColorBlack) , statusBarColor = (ColorYellow, ColorBlack) - , headerColor = (ColorYellow, ColorBlack) + , headerColor = (ColorYellow, ColorBlack) , showStatusBar = True , initialPath = "" , filterMaildirsHook = \mds -> return mds + , indexDateFormat = "%m %d" } -- |