Don't restore windows when changing workspaces

This commit is contained in:
Peter Jones
2015-03-10 20:17:09 +00:00
parent e2e63440ee
commit a0cd3f92e5

View File

@@ -76,7 +76,6 @@ instance LayoutModifier HiddenWindows Window where
| Just (HideWindow win) <- fromMessage mess = hideWindowMsg h win
| Just (PopNewestHiddenWindow) <- fromMessage mess = popNewestMsg h
| Just (PopOldestHiddenWindow) <- fromMessage mess = popOldestMsg h
| Just Hide <- fromMessage mess = doUnhook
| Just ReleaseResources <- fromMessage mess = doUnhook
| otherwise = return Nothing
where doUnhook = do mapM_ restoreWindow hidden