aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad
diff options
context:
space:
mode:
Diffstat (limited to 'XMonad')
-rw-r--r--XMonad/Hooks/EwmhDesktops.hs3
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"