diff options
| author | Matthias Schiffer <mschiffer@universe-factory.net> | 2013-09-17 05:32:29 +0200 |
|---|---|---|
| committer | Matthias Schiffer <mschiffer@universe-factory.net> | 2013-09-17 05:32:29 +0200 |
| commit | f3b1977043a8736ac856d4477b485ee441a4342f (patch) | |
| tree | 7c1aed57bcc08b37b1c4e4ec6233528ae35e6fd3 /MetaTile/Core.hs | |
| parent | 7754569f8978dff5c7f6304295cafa487c42d318 (diff) | |
| download | metatile-f3b1977043a8736ac856d4477b485ee441a4342f.tar metatile-f3b1977043a8736ac856d4477b485ee441a4342f.zip | |
Keep track of the current desired frame bounds in the frame state
This saved a few round-trips to the X server and is preparation for the
window confinement feature.
Diffstat (limited to 'MetaTile/Core.hs')
| -rw-r--r-- | MetaTile/Core.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/MetaTile/Core.hs b/MetaTile/Core.hs index 3d84ea3..5fa62e6 100644 --- a/MetaTile/Core.hs +++ b/MetaTile/Core.hs @@ -75,6 +75,7 @@ data WindowState = WindowState data FrameState = FrameState { fsWindow :: !Window + , fsBounds :: !Rectangle , fsBorderWidth :: !BorderWidth } deriving Show @@ -83,7 +84,7 @@ data FrameState = FrameState data XState = XState { windowset :: !WindowSet -- ^ workspace list , windowState :: !(M.Map Window WindowState) -- ^ the extended window state - , frameState :: !(M.Map Window FrameState) -- ^ the extended frame state + , frameState :: !(M.Map Window FrameState) -- ^ the extended frame state , dragging :: !(Maybe (Position -> Position -> X (), X ())) , numberlockMask :: !KeyMask -- ^ The numlock modifier , extensibleState :: !(M.Map String (Either String StateExtension)) |