diff options
author | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-05-21 17:27:59 +0200 |
---|---|---|
committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-05-21 17:27:59 +0200 |
commit | a603848f85c3645c7115a56b195eae42d9b797fc (patch) | |
tree | 95b5fc6d4a3f727cc583c6b209211db0a6ad9fe5 /XMonad.hs | |
parent | 742baf40fb7b461b81236fd5653dfad0a00b780b (diff) | |
download | xmonad-a603848f85c3645c7115a56b195eae42d9b797fc.tar.gz xmonad-a603848f85c3645c7115a56b195eae42d9b797fc.tar.xz xmonad-a603848f85c3645c7115a56b195eae42d9b797fc.zip |
Make screen info dynamic: first step to supporting randr
darcs-hash:20070521152759-a5988-736e7caea5252a77bb01d7631cce0db4287ff6f2.gz
Diffstat (limited to '')
-rw-r--r-- | XMonad.hs | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -39,6 +39,9 @@ import qualified Data.Map as M -- 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 , layouts :: !(M.Map WorkspaceId (Layout, [Layout])) } -- ^ mapping of workspaces to descriptions of their layouts @@ -48,10 +51,7 @@ data XConf = XConf , theRoot :: !Window -- ^ the root window , wmdelete :: !Atom -- ^ window deletion atom , wmprotocols :: !Atom -- ^ wm protocols atom - , dimensions :: !(Int,Int) -- ^ dimensions of the screen, - -- used for hiding windows - , xineScreens :: ![Rectangle] -- ^ dimensions of each screen , normalBorder :: !Color -- ^ border color of unfocused windows , focusedBorder :: !Color } -- ^ border color of the focused window |