Use Position for dimensions

darcs-hash:20070521162809-a5988-fbabe930a50582fb828cd3683167e158bec904ad.gz

1 files changed, 4 insertions, 4 deletions

diff --git a/XMonad.hs b/XMonad.hs
index 0355e6f..853fdeb 100644
--- a/XMonad.hs
+++ b/XMonad.hs
@@ -38,10 +38,10 @@ import qualified Data.Map as M
 -- | XState, the window manager state.
 -- Just the display, width, height and a window list
 data XState = XState
-    { windowset         :: !WindowSet                      -- ^ workspace list
-    , xineScreens       :: ![Rectangle] -- ^ dimensions of each screen
-    , dimensions        :: !(Int,Int)   -- ^ dimensions of the screen,
-                                        -- used for hiding windows
+    { windowset         :: !WindowSet           -- ^ workspace list
+    , xineScreens       :: ![Rectangle]         -- ^ dimensions of each screen
+    , dimensions        :: !(Position,Position) -- ^ dimensions of the screen,
+                                                -- used for hiding windows
     , layouts           :: !(M.Map WorkspaceId (Layout, [Layout]))  }
                        -- ^ mapping of workspaces to descriptions of their layouts