From 4728bb04b2f5daff7a2ed8c30dd0fd8a8ee9539b Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ra=C3=BAl=20Benencia?= Date: Sat, 24 Aug 2013 17:12:14 -0300 Subject: Advancing with monad transformers --- Config.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'Config.hs') diff --git a/Config.hs b/Config.hs index bf35cb1..d57983e 100644 --- a/Config.hs +++ b/Config.hs @@ -16,7 +16,7 @@ data LazymailConfig = LazymailConfig { , selectionColor :: (Color, Color) , statusBarColor :: (Color, Color) , showStatusBar :: Bool - , basePath :: Maybe FilePath + , initialPath :: Maybe FilePath } defaultConfig = LazymailConfig { @@ -24,7 +24,7 @@ defaultConfig = LazymailConfig { , selectionColor = (ColorBlack, ColorWhite) , statusBarColor = (ColorBlack, ColorWhite) , showStatusBar = True - , basePath = Nothing + , initialPath = Nothing } -- @@ -32,4 +32,4 @@ defaultConfig = LazymailConfig { -- preferences. In a possible future maybe I'll work in a not-so-crappy -- config system. -- -customConfig = defaultConfig { basePath = Just "/home/rul/mail/kalgan" } \ No newline at end of file +customConfig = defaultConfig { initialPath = Just "/home/rul/mail/kalgan" } \ No newline at end of file -- cgit v1.2.3