diff options
Diffstat (limited to 'XMonad/Main.hsc')
-rw-r--r-- | XMonad/Main.hsc | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/XMonad/Main.hsc b/XMonad/Main.hsc index 75cb94c..c038ecb 100644 --- a/XMonad/Main.hsc +++ b/XMonad/Main.hsc @@ -36,7 +36,7 @@ import Graphics.X11.Xlib.Extras import XMonad.Core import qualified XMonad.Config as Default -import XMonad.StackSet (new, floating, member) +import XMonad.StackSet (new, member) import qualified XMonad.StackSet as W import XMonad.Operations @@ -277,8 +277,7 @@ handle e@(ConfigureRequestEvent {ev_window = w}) = withDisplay $ \dpy -> do bw <- asks (borderWidth . config) - if M.member w (floating ws) - || not (member w ws) + if not (member w ws) then do io $ configureWindow dpy w (ev_value_mask e) $ WindowChanges { wc_x = ev_x e , wc_y = ev_y e @@ -287,7 +286,6 @@ handle e@(ConfigureRequestEvent {ev_window = w}) = withDisplay $ \dpy -> do , wc_border_width = fromIntegral bw , wc_sibling = ev_above e , wc_stack_mode = ev_detail e } - when (member w ws) (float w) else io $ allocaXEvent $ \ev -> do setEventType ev configureNotify setConfigureEvent ev w w |