From ccf5f3193175e164330871d0aa243fd5899287d0 Mon Sep 17 00:00:00 2001
From: mail <mail@joachim-breitner.de>
Date: Fri, 28 Dec 2007 16:42:22 +0100
Subject: Clear _NET_ACTIVE_WINDOW when nothing is focused

darcs-hash:20071228154222-c9905-a2eeeb67751c810010d81b3021ccb033de770ec0.gz
---
 XMonad/Hooks/EwmhDesktops.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

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"
-- 
cgit v1.2.3