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