diff options
Diffstat (limited to 'XMonad')
-rw-r--r-- | XMonad/Hooks/EwmhDesktops.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/XMonad/Hooks/EwmhDesktops.hs b/XMonad/Hooks/EwmhDesktops.hs index c0856d7..c6fd3a2 100644 --- a/XMonad/Hooks/EwmhDesktops.hs +++ b/XMonad/Hooks/EwmhDesktops.hs @@ -129,7 +129,8 @@ setSupported = withDisplay $ \dpy -> do setWMName "xmonad" setActiveWindow :: X () -setActiveWindow = withFocused $ \w -> withDisplay $ \dpy -> do +setActiveWindow = withWindowSet $ \s -> withDisplay $ \dpy -> do + let w = fromMaybe 0 (W.peek s) r <- asks theRoot a <- getAtom "_NET_ACTIVE_WINDOW" c <- getAtom "WINDOW" |