diff options
author | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-03-10 05:10:21 +0100 |
---|---|---|
committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-03-10 05:10:21 +0100 |
commit | e4e6098da9afaade72d756415e1cd85bf1fb0c11 (patch) | |
tree | 99541c3691384863b9cffc6b0659facdb3a8437f | |
parent | 9178813ae7d46973ab481de38a90911cded935cc (diff) | |
download | metatile-e4e6098da9afaade72d756415e1cd85bf1fb0c11.tar metatile-e4e6098da9afaade72d756415e1cd85bf1fb0c11.zip |
Reduce flicker on workspace change.
darcs-hash:20070310041021-a5988-ec9227d72c9e307fa271d507f07b13bd1dd65362
-rw-r--r-- | Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -285,8 +285,8 @@ view o = do ws <- gets workspace let m = W.current ws when (n /= m) $ do - mapM_ hide (W.index m ws) mapM_ reveal (W.index n ws) + mapM_ hide (W.index m ws) windows $ W.view n where n = o-1 |