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

Remove screen corner actions

master
Hektor Misplon 2022-10-25 21:13:04 +02:00
parent 7708fd74be
commit 31eb8d11ea
1 changed files with 2 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
.xmonad/xmonad.hs
View File

@ -80,11 +80,6 @@ myLayout = smartBorders $
ratio = 1/2 ratio = 1/2
delta = 4/100 delta = 4/100
myStartupHook = do
addScreenCorners [ (SCUpperRight, nextWS)
, (SCUpperLeft, prevWS)
]
myManageHook = composeAll myManageHook = composeAll
[ className =? "Zathura" --> doShift "ε" [ className =? "Zathura" --> doShift "ε"
, className =? "Launcher" --> doRectFloat (W.RationalRect 0.05 0.4 0.9 0.5) , className =? "Launcher" --> doRectFloat (W.RationalRect 0.05 0.4 0.9 0.5)
@ -106,8 +101,8 @@ myConfig = def
-- Hooks -- Hooks
, startupHook = myStartupHook , startupHook = myStartupHook
, manageHook = myManageHook <+> manageHook def , manageHook = myManageHook <+> manageHook def
, layoutHook = screenCornerLayoutHook $ avoidStruts myLayout , layoutHook = avoidStruts myLayoutHook
, handleEventHook = handleEventHook def <> Hacks.windowedFullscreenFixEventHook <+> screenCornerEventHook , handleEventHook = handleEventHook def <> Hacks.windowedFullscreenFixEventHook
} `additionalKeysP` myKeysP } `additionalKeysP` myKeysP
`removeKeysP` myRemoveKeysP `removeKeysP` myRemoveKeysP