From 9d4015a2b643cb800b7b879557b2df69359d360a Mon Sep 17 00:00:00 2001
From: Adam Vogt <vogt.adam@gmail.com>
Date: Fri, 28 Aug 2009 23:45:37 +0200
Subject: Return True in X.H.FadeInactive.isUnfocused if current workspace is
 empty. (dschoepe)

Ignore-this: 56a3dac874f6430f10ad23870a4be38a

darcs-hash:20090828214537-1499c-746e07cd364f9c4bdf12bb7f633b761bc78953fe.gz
---
 XMonad/Hooks/FadeInactive.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'XMonad/Hooks/FadeInactive.hs')

diff --git a/XMonad/Hooks/FadeInactive.hs b/XMonad/Hooks/FadeInactive.hs
index 343b3ee..a7250cf 100644
--- a/XMonad/Hooks/FadeInactive.hs
+++ b/XMonad/Hooks/FadeInactive.hs
@@ -84,7 +84,7 @@ fadeInactiveLogHook = fadeOutLogHook . fadeIf isUnfocused
 
 -- | returns True if the window doesn't have the focus.
 isUnfocused :: Query Bool
-isUnfocused = ask >>= \w -> liftX . gets $ maybe False (w /=) . W.peek . windowset
+isUnfocused = ask >>= \w -> liftX . gets $ maybe True (w /=) . W.peek . windowset
 
 -- | fades out every window by the amount returned by the query.
 fadeOutLogHook :: Query Rational -> X ()
-- 
cgit v1.2.3