diff options
| author | Tomas Janousek <tomi@nomi.cz> | 2010-01-16 12:20:54 +0100 |
|---|---|---|
| committer | Tomas Janousek <tomi@nomi.cz> | 2010-01-16 12:20:54 +0100 |
| commit | 16d6698f0ccd9de9c840e60f3a93dea4fb64fc22 (patch) | |
| tree | 215c1e98433e84554920cadee73568c1bba79426 /XMonad | |
| parent | 89d40bb48aed82c19c2dcf95a3317375268623a9 (diff) | |
| download | XMonadContrib-16d6698f0ccd9de9c840e60f3a93dea4fb64fc22.tar.gz XMonadContrib-16d6698f0ccd9de9c840e60f3a93dea4fb64fc22.tar.xz XMonadContrib-16d6698f0ccd9de9c840e60f3a93dea4fb64fc22.zip | |
X.L.Decoration: avoid flicker by not showing decowins without rectangles
Ignore-this: 6f38634706c3f35272670b969fc6cc96
These would be hidden by updateDecos immediately after being shown. This
caused flicker with simpleTabbed and only one window on a workspace.
darcs-hash:20100116112054-c9ff5-f60e6a241273df4bcfa4a12a5ae1740f9555e8cb.gz
Diffstat (limited to '')
| -rw-r--r-- | XMonad/Layout/Decoration.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Layout/Decoration.hs b/XMonad/Layout/Decoration.hs index afb2ad6..07b15dc 100644 --- a/XMonad/Layout/Decoration.hs +++ b/XMonad/Layout/Decoration.hs @@ -362,7 +362,7 @@ createDecoWindow t r = let mask = Just (exposureMask .|. buttonPressMask) in createNewWindow r mask (inactiveColor t) True showDecos :: [DecoWin] -> X () -showDecos = showWindows . catMaybes . map fst +showDecos = showWindows . catMaybes . map fst . filter (isJust . snd) hideDecos :: [DecoWin] -> X () hideDecos = hideWindows . catMaybes . map fst |