hektor
/
dots
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Shift to workspace based on window name

master
Hektor Misplon 2023-06-04 15:17:37 +02:00
parent 14c80c96df
commit bac32dfe10
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
.xmonad/xmonad.hs
View File

@ -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