From f3b1977043a8736ac856d4477b485ee441a4342f Mon Sep 17 00:00:00 2001 From: Matthias Schiffer Date: Tue, 17 Sep 2013 05:32:29 +0200 Subject: 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. --- MetaTile/Core.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'MetaTile/Core.hs') 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)) -- cgit v1.2.3