mirror of
https://github.com/xmonad/xmonad.git
synced 2025-08-03 05:31:54 -07:00
Reduce flicker on workspace change.
This commit is contained in:
2
Main.hs
2
Main.hs
@@ -285,8 +285,8 @@ view o = do
|
|||||||
ws <- gets workspace
|
ws <- gets workspace
|
||||||
let m = W.current ws
|
let m = W.current ws
|
||||||
when (n /= m) $ do
|
when (n /= m) $ do
|
||||||
mapM_ hide (W.index m ws)
|
|
||||||
mapM_ reveal (W.index n ws)
|
mapM_ reveal (W.index n ws)
|
||||||
|
mapM_ hide (W.index m ws)
|
||||||
windows $ W.view n
|
windows $ W.view n
|
||||||
where n = o-1
|
where n = o-1
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user