summaryrefslogtreecommitdiffhomepage
path: root/Config.hs
diff options
context:
space:
mode:
authorAndrea Rossato <andrea.rossato@ing.unitn.it>2007-11-04 16:26:26 +0100
committerAndrea Rossato <andrea.rossato@ing.unitn.it>2007-11-04 16:26:26 +0100
commit094a454324c31b62b418289821b4dc71790736c1 (patch)
treed662772082b898d037fd0a213280cca1278ed927 /Config.hs
parente3dd6aeca60ab216b079c87aa57078a951d0a08b (diff)
downloadxmobar-094a454324c31b62b418289821b4dc71790736c1.tar.gz
xmobar-094a454324c31b62b418289821b4dc71790736c1.tar.bz2
Preserve backward compatibility
WARNING: this patch changes the configuration file This patch reintroduces backward compatibility with recent changes in the configuration option. Now Top and Bottom do not take any argument. To set the width and alignment used TopW (Align Int) and BottomW (Align Int) instead, where Align is either C, L or R. darcs-hash:20071104152626-d6583-a5ee9d7f1e20b33e47b902d11267fb6d2e623483.gz
Diffstat (limited to 'Config.hs')
-rw-r--r--Config.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/Config.hs b/Config.hs
index 7044a22..aff4db6 100644
--- a/Config.hs
+++ b/Config.hs
@@ -44,8 +44,8 @@ data Config =
, template :: String -- ^ The output template
} deriving (Read)
-data XPosition = Top Width | Bottom Width | Static {xpos, ypos, width, height :: Int} deriving ( Read, Eq )
-data Width = A | L Int | R Int | C Int deriving ( Read, Eq )
+data XPosition = Top | TopW Width | Bottom | BottomW Width | Static {xpos, ypos, width, height :: Int} deriving ( Read, Eq )
+data Width = L Int | R Int | C Int deriving ( Read, Eq )
-- | The default configuration values
defaultConfig :: Config
@@ -53,7 +53,7 @@ defaultConfig =
Config { font = "-misc-fixed-*-*-*-*-10-*-*-*-*-*-*-*"
, bgColor = "#000000"
, fgColor = "#BFBFBF"
- , position = Top A
+ , position = Top
, commands = []
, sepChar = "%"
, alignSep = "}{"