aboutsummaryrefslogtreecommitdiff
path: root/.config/XMonad/lib
diff options
context:
space:
mode:
authorVidhu Kant Sharma <vidhukant@vidhukant.com>2023-11-06 00:44:47 +0530
committerVidhu Kant Sharma <vidhukant@vidhukant.com>2023-11-06 00:44:47 +0530
commit4ca410cb89d44b85bf0ac5413915e35ff460e4d2 (patch)
tree0daa79794ac6175cf47ebab19d483471315b5cd8 /.config/XMonad/lib
parent7f286b2a73f05f43f2d42b7f5be2cb7e43fd4118 (diff)
added betterlockscreen
Diffstat (limited to '.config/XMonad/lib')
-rw-r--r--.config/XMonad/lib/Defaults.hs2
-rw-r--r--.config/XMonad/lib/Keybindings.hs11
2 files changed, 8 insertions, 5 deletions
diff --git a/.config/XMonad/lib/Defaults.hs b/.config/XMonad/lib/Defaults.hs
index df81331..8492cd7 100644
--- a/.config/XMonad/lib/Defaults.hs
+++ b/.config/XMonad/lib/Defaults.hs
@@ -27,7 +27,7 @@ myModMask' = mod1Mask
myModShiftMask = myModMask .|. shiftMask
myModShiftMask' = myModMask' .|. shiftMask
-myLockscreen = "notify-send 'to be set up!' 'to be set up!'"
+myLockscreen = "betterlockscreen -q -l"
myColorPicker = "colorpicker --short --one-shot --preview | xsel -b"
myTerminal = "open_terminal"
diff --git a/.config/XMonad/lib/Keybindings.hs b/.config/XMonad/lib/Keybindings.hs
index 672e286..7e65e81 100644
--- a/.config/XMonad/lib/Keybindings.hs
+++ b/.config/XMonad/lib/Keybindings.hs
@@ -43,6 +43,7 @@ myMouseKeybindings = [
myKeybindings :: [((KeyMask, KeySym), X ())]
myKeybindings = [
((myModMask, xK_Return), spawn myTerminal)
+ , ((myModShiftMask, xK_Return), spawn myLockscreen)
, ((myModMask .|. shiftMask, xK_q), kill1)
, ((myModShiftMask, xK_p), spawn myLauncher)
@@ -66,10 +67,10 @@ myKeybindings = [
, ((myModMask .|. shiftMask, xK_minus), spawn backlightDown)
-- modify gaps on runtime
- , ((myModMask, xK_F2), incWindowSpacing 1)
- , ((myModMask, xK_F1), decWindowSpacing 1)
- , ((myModMask .|. shiftMask, xK_F2), incScreenSpacing 1)
- , ((myModMask .|. shiftMask, xK_F1), decScreenSpacing 1)
+ -- , ((myModMask, xK_F2), incWindowSpacing 1)
+ -- , ((myModMask, xK_F1), decWindowSpacing 1)
+ -- , ((myModMask .|. shiftMask, xK_F2), incScreenSpacing 1)
+ -- , ((myModMask .|. shiftMask, xK_F1), decScreenSpacing 1)
-- view prev/next workspaces
, ((myModShiftMask, xK_Tab ), prevWS)
@@ -169,6 +170,8 @@ myKeybindingsP = [
, ("M-a m", spawn volMute)
, ("M-a p", spawn pausePlay)
, ("M-a d", myScratchpad "arandr")
+ , ("M-a r", spawn "screenrefresh")
+ , ("M-a S-r", spawn "screenrefresh -b")
-- media
, ("M-m w", myScratchpad "wallpaper")
, ("M-S-x", myScratchpad "wallpaper")