Shift to workspace based on window name
This commit is contained in:
@@ -102,6 +102,13 @@ myManageHook =
|
|||||||
className =? "flameshot" --> doRectFloat (W.RationalRect 0.1 0.1 0.8 0.8)
|
className =? "flameshot" --> doRectFloat (W.RationalRect 0.1 0.1 0.8 0.8)
|
||||||
]
|
]
|
||||||
|
|
||||||
|
myDynamicManageHook :: ManageHook
|
||||||
|
myDynamicManageHook =
|
||||||
|
composeAll
|
||||||
|
[
|
||||||
|
title =? "Zettelkasten — Firefox Developer Edition" --> doShift "1_sh"
|
||||||
|
]
|
||||||
|
|
||||||
-- layoutHook
|
-- layoutHook
|
||||||
myLayoutHook =
|
myLayoutHook =
|
||||||
showWName' myShowWNameConfig $
|
showWName' myShowWNameConfig $
|
||||||
@@ -149,7 +156,7 @@ myConfig =
|
|||||||
startupHook = myStartupHook,
|
startupHook = myStartupHook,
|
||||||
manageHook = myManageHook <+> manageHook def,
|
manageHook = myManageHook <+> manageHook def,
|
||||||
layoutHook = avoidStruts myLayoutHook,
|
layoutHook = avoidStruts myLayoutHook,
|
||||||
handleEventHook = handleEventHook def <> Hacks.windowedFullscreenFixEventHook
|
handleEventHook = dynamicPropertyChange "WM_NAME" myDynamicManageHook <> handleEventHook def <> Hacks.windowedFullscreenFixEventHook
|
||||||
}
|
}
|
||||||
`removeKeysP` myRemoveKeysP
|
`removeKeysP` myRemoveKeysP
|
||||||
`additionalKeysP` myKeysP
|
`additionalKeysP` myKeysP
|
||||||
|
|||||||
Reference in New Issue
Block a user