forked from colonelpanic/dotfiles
[XMonad] Improve restoreAllMinimized
This commit is contained in:
parent
0dd66e9a93
commit
361971e690
@ -432,8 +432,7 @@ maybeUnminimizeClassAfter = (>> maximizeSameClassesInWorkspace)
|
||||
sameClassOnly action =
|
||||
action >> minimizeOtherClassesInWorkspace >> maximizeSameClassesInWorkspace
|
||||
|
||||
restoreAllMinimized = restoreFocus $
|
||||
withLastMinimized $ \w -> maximizeWindow w >> restoreAllMinimized
|
||||
restoreAllMinimized = void $ join $ mapM maximizeWindow <$> minimizedWindows
|
||||
|
||||
restoreOrMinimizeOtherClasses = null <$> maximizedOtherClass >>=
|
||||
ifL restoreAllMinimized minimizeOtherClassesInWorkspace
|
||||
|
Loading…
Reference in New Issue
Block a user