aboutsummaryrefslogtreecommitdiff
path: root/.config/XMonad/lib/Keybindings.hs
diff options
context:
space:
mode:
authorVidhu Kant Sharma <vidhukant@protonmail.ch>2022-05-21 03:57:45 +0530
committerVidhu Kant Sharma <vidhukant@protonmail.ch>2022-05-21 03:57:45 +0530
commitb914af343344e9e8301008aa62e48c6fc534db80 (patch)
tree50a733a7cdaa98c464da0e54ca6cabe5d392bd58 /.config/XMonad/lib/Keybindings.hs
parentadb06a286531abbf556432699832a9198b99e4e9 (diff)
somehow got lemonbar to at least work
Diffstat (limited to '.config/XMonad/lib/Keybindings.hs')
-rw-r--r--.config/XMonad/lib/Keybindings.hs35
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)