Set focus *after* revealing windows

This commit is contained in:
Spencer Janssen
2008-04-07 22:25:59 +00:00
parent c24016882e
commit 43c2d26cdb

View File

@@ -151,10 +151,10 @@ windows f = do
return vs
whenJust (W.peek ws) $ \w -> io $ setWindowBorder d w fbc
setTopFocus
asks (logHook . config) >>= userCode
mapM_ reveal visible
setTopFocus
-- hide every window that was potentially visible before, but is not
-- given a position by a layout now.