colonelpanic/dotfiles
1
0
Fork 1
Code Issues Pull Requests Packages Projects Releases Wiki Activity

[XMonad] Make bringNextMaybe restore minimized windows

Browse Source
This commit is contained in:
Ivan Malison 2016-11-25 11:46:36 -08:00
parent 2cd0c1aa29
commit 55a7f36dd4
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
dotfiles/xmonad/xmonad.hs
View File

@ -366,6 +366,8 @@ greedyFocusWindow w ws = W.focusWindow w $ W.greedyView
shiftThenView i = W.greedyView i . W.shift i
shiftToEmptyAndView = doTo Next EmptyWS DWO.getSortByOrder (windows . shiftThenView)
greedyBringWindow w = greedyFocusWindow w . bringWindow w
swapFocusedWith w ws = W.modify' (swapFocusedWith' w) (W.delete' w ws)
@ -393,7 +395,7 @@ doScratchpad = deactivateFullAnd . namedScratchpadAction scratchpads
myRaiseNextMaybe = ((deactivateFullAnd . maybeUnminimizeClassAfter) .) .
raiseNextMaybeCustomFocus greedyFocusWindow
myBringNextMaybe = ((deactivateFullAnd . maybeUnminimizeAfter) .) .
raiseNextMaybeCustomFocus bringWindow
raiseNextMaybeCustomFocus greedyBringWindow
bindBringAndRaise :: KeyMask -> KeySym -> X () -> Query Bool -> [((KeyMask, KeySym), X ())]
bindBringAndRaise mask sym start query =