aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAdam Vogt <vogt.adam@gmail.com>2009-08-28 23:45:37 +0200
committerAdam Vogt <vogt.adam@gmail.com>2009-08-28 23:45:37 +0200
commit9d4015a2b643cb800b7b879557b2df69359d360a (patch)
treedaf8227019704fd66aa0948eb94c3abe0896617d
parent56c54995ea4ae34d204c5315bdf04b16761f7af1 (diff)
downloadXMonadContrib-9d4015a2b643cb800b7b879557b2df69359d360a.tar.gz
XMonadContrib-9d4015a2b643cb800b7b879557b2df69359d360a.tar.xz
XMonadContrib-9d4015a2b643cb800b7b879557b2df69359d360a.zip
Return True in X.H.FadeInactive.isUnfocused if current workspace is empty. (dschoepe)
Ignore-this: 56a3dac874f6430f10ad23870a4be38a darcs-hash:20090828214537-1499c-746e07cd364f9c4bdf12bb7f633b761bc78953fe.gz
-rw-r--r--XMonad/Hooks/FadeInactive.hs2
1 files changed, 1 insertions, 1 deletions
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 ()