jasmine/xmonad-config
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

update keymap

Browse source
This commit is contained in:
♥ Minnie ♥ 2025-05-19 11:00:55 +08:00
parent 3352033982
commit 0603da927a
Signed by: jasmine
GPG key ID: 8563E358D4E8040E
1 changed files with 22 additions and 19 deletions
Download patch file Download diff file Expand all files Collapse all files

35
src/xmonad.hs
View file

@ -76,14 +76,13 @@ myKeymap =
-- --
-- spawning programs -- spawning programs
[ ("M-<Space> s t", spawn myTerminal ) [ ("M-<Space> <Return>", spawn myTerminal )
, ("M-<Space> s d" , spawn myLauncher ) , ("M-<Space> s d" , spawn myLauncher )
, ("M-<Space> s f" , spawn myFileManager) , ("M-<Space> s f" , spawn myFileManager)
, ("M-<Space> s s" , spawn myScrot ) , ("M-<Space> s s" , spawn myScrot )
-- kill/exit -- quit window
, ("M-<Space> c", kill ) , ("M-<Space> q", kill)
, ("M-<Space> q", io exitSuccess)
-- focus master window -- focus master window
, ("M-<Space> <Backspace>", windows W.focusMaster) , ("M-<Space> <Backspace>", windows W.focusMaster)
@ -118,6 +117,10 @@ myKeymap =
, ("M-4", windows $ W.greedyView "games") , ("M-4", windows $ W.greedyView "games")
, ("M-5", windows $ W.greedyView "misc" ) , ("M-5", windows $ W.greedyView "misc" )
-- cycle workspaces
, ("M-<Home>", prevWS)
, ("M-<End>" , nextWS)
-- send window to workspace -- send window to workspace
, ("M-S-1", windows $ W.shift "code" ) , ("M-S-1", windows $ W.shift "code" )
, ("M-S-2", windows $ W.shift "chat" ) , ("M-S-2", windows $ W.shift "chat" )
@ -177,24 +180,24 @@ editMode = mode "edit" $ mkKeysEz
-- --
-- expand windows -- expand windows
, ("M1-o", sendMessage $ ExpandTowardsBy U 0.01) , ("M-o", sendMessage $ ExpandTowardsBy U 0.01)
, ("M1-n", sendMessage $ ExpandTowardsBy L 0.01) , ("M-n", sendMessage $ ExpandTowardsBy L 0.01)
, ("M1-e", sendMessage $ ExpandTowardsBy D 0.01) , ("M-e", sendMessage $ ExpandTowardsBy D 0.01)
, ("M1-i", sendMessage $ ExpandTowardsBy R 0.01) , ("M-i", sendMessage $ ExpandTowardsBy R 0.01)
-- shrink windows -- shrink windows
, ("M1-C-o", sendMessage $ ShrinkFromBy U 0.01) , ("M-M1-o", sendMessage $ ShrinkFromBy U 0.01)
, ("M1-C-n", sendMessage $ ShrinkFromBy L 0.01) , ("M-M1-n", sendMessage $ ShrinkFromBy L 0.01)
, ("M1-C-e", sendMessage $ ShrinkFromBy D 0.01) , ("M-M1-e", sendMessage $ ShrinkFromBy D 0.01)
, ("M1-C-i", sendMessage $ ShrinkFromBy R 0.01) , ("M-M1-i", sendMessage $ ShrinkFromBy R 0.01)
-- swap/rotate -- swap/rotate
, ("M1-r", sendMessage Rotate) , ("M-r", sendMessage Rotate)
, ("M1-s", sendMessage Swap ) , ("M-s", sendMessage Swap )
-- split shift -- split shift
, ("M1-f", sendMessage $ SplitShift Prev) , ("M-f", sendMessage $ SplitShift Prev)
, ("M1-u", sendMessage $ SplitShift Next) , ("M-u", sendMessage $ SplitShift Next)
] ]