diff options
Diffstat (limited to '.config/XMonad/lib/Keybindings.hs')
| -rw-r--r-- | .config/XMonad/lib/Keybindings.hs | 35 |
1 files changed, 17 insertions, 18 deletions
diff --git a/.config/XMonad/lib/Keybindings.hs b/.config/XMonad/lib/Keybindings.hs index 84ebb7c..3a07683 100644 --- a/.config/XMonad/lib/Keybindings.hs +++ b/.config/XMonad/lib/Keybindings.hs @@ -118,26 +118,24 @@ myKeybindings = [ , ((myModMask', xK_k), windows W.focusUp) -- 2D navigation - , ((myModMask, xK_l), sendMessage $ Go R) - , ((myModMask, xK_h), sendMessage $ Go L) - , ((myModMask, xK_k), sendMessage $ Go U) - , ((myModMask, xK_j), sendMessage $ Go D) - + , ((myModMask, xK_l), sendMessage $ Go R) + , ((myModMask, xK_h), sendMessage $ Go L) + , ((myModMask, xK_k), sendMessage $ Go U) + , ((myModMask, xK_j), sendMessage $ Go D) -- swap windows - , ((myModMask .|. shiftMask, xK_l), sendMessage $ WN.Swap R) - , ((myModMask .|. shiftMask, xK_h), sendMessage $ WN.Swap L) - , ((myModMask .|. shiftMask, xK_k), sendMessage $ WN.Swap U) - , ((myModMask .|. shiftMask, xK_j), sendMessage $ WN.Swap D) - + , ((myModMask .|. shiftMask, xK_l), sendMessage $ WN.Swap R) + , ((myModMask .|. shiftMask, xK_h), sendMessage $ WN.Swap L) + , ((myModMask .|. shiftMask, xK_k), sendMessage $ WN.Swap U) + , ((myModMask .|. shiftMask, xK_j), sendMessage $ WN.Swap D) -- resize - , ((myModMask .|. mod1Mask, xK_l), sendMessage $ ExpandTowards R) - , ((myModMask .|. mod1Mask, xK_h), sendMessage $ ExpandTowards L) - , ((myModMask .|. mod1Mask, xK_j), sendMessage $ ExpandTowards D) - , ((myModMask .|. mod1Mask, xK_k), sendMessage $ ExpandTowards U) - , ((myModMask .|. mod1Mask .|. shiftMask, xK_l), sendMessage $ ShrinkFrom R) - , ((myModMask .|. mod1Mask .|. shiftMask, xK_h), sendMessage $ ShrinkFrom L) - , ((myModMask .|. mod1Mask .|. shiftMask, xK_j), sendMessage $ ShrinkFrom D) - , ((myModMask .|. mod1Mask .|. shiftMask, xK_k), sendMessage $ ShrinkFrom U) + , ((myModMask .|. mod1Mask, xK_l), sendMessage $ ExpandTowards R) + , ((myModMask .|. mod1Mask, xK_h), sendMessage $ ExpandTowards L) + , ((myModMask .|. mod1Mask, xK_j), sendMessage $ ExpandTowards D) + , ((myModMask .|. mod1Mask, xK_k), sendMessage $ ExpandTowards U) + , ((myModMask .|. mod1Mask .|. shiftMask, xK_l), sendMessage $ ShrinkFrom R) + , ((myModMask .|. mod1Mask .|. shiftMask, xK_h), sendMessage $ ShrinkFrom L) + , ((myModMask .|. mod1Mask .|. shiftMask, xK_j), sendMessage $ ShrinkFrom D) + , ((myModMask .|. mod1Mask .|. shiftMask, xK_k), sendMessage $ ShrinkFrom U) ] ++ [ -- for extra workspace(s) ((myModMask, key), windows $ W.greedyView ws) @@ -204,6 +202,7 @@ myKeybindingsP = [ , ("M-n m", spawn $ myBrowser ++ " https://myanimelist.net/profile/0ZeroTsu") -- other apps -- TODO: add scrcpy + , ("M-y e", spawn myTextEditor) , ("M-y t", spawn myTorrentClient) , ("M-y S-t", spawn "torbrowser-launcher") , ("M-y i", spawn myBrowser) |