[XMonad] Fix whitepace
This commit is contained in:
parent
1fe456c42e
commit
21204e420e
@ -301,12 +301,12 @@ toggleFadingForActiveWindow = withWindowSet $ \windowSet -> do
|
|||||||
|
|
||||||
-- Minimize not in class
|
-- Minimize not in class
|
||||||
|
|
||||||
restoreFocus action = withFocused $ \orig -> action >> windows (W.focusWindow orig)
|
restoreFocus action =
|
||||||
|
withFocused $ \orig -> action >> windows (W.focusWindow orig)
|
||||||
|
|
||||||
getCurrentWS = W.stack . W.workspace . W.current
|
getCurrentWS = W.stack . W.workspace . W.current
|
||||||
|
|
||||||
withWorkspace f = withWindowSet $ \ws ->
|
withWorkspace f = withWindowSet $ \ws -> maybe (return ()) f (getCurrentWS ws)
|
||||||
maybe (return ()) f (getCurrentWS ws)
|
|
||||||
|
|
||||||
minimizeOtherClassesInWorkspace =
|
minimizeOtherClassesInWorkspace =
|
||||||
actOnWindowsInWorkspace minimizeWindow windowsWithUnfocusedClass
|
actOnWindowsInWorkspace minimizeWindow windowsWithUnfocusedClass
|
||||||
|
Loading…
Reference in New Issue
Block a user