add positions with height information

Ignore-this: 1244d13c44610fc3b1d9b73a0ebfac59

darcs-hash:20091230074604-76d51-a3415c7365aa22dfb9891cc6bb5c5ef4e726a805.gz

1 files changed, 2 insertions, 0 deletions

diff --git a/Config.hs b/Config.hs
index 4873711..36c1c85 100644
--- a/Config.hs
+++ b/Config.hs
@@ -58,8 +58,10 @@ data Config =
 
 data XPosition = Top
                | TopW Align Int
+               | TopSize Align Int Int
                | Bottom
                | BottomW Align Int
+               | BottomSize Align Int Int
                | Static {xpos, ypos, width, height :: Int}
                | OnScreen Int XPosition
                  deriving ( Read, Eq )