From 00aca0696d5c8ec212842c811bc4a6338a942804 Mon Sep 17 00:00:00 2001
From: Vidhu Kant Sharma <vidhukant@vidhukant.com>
Date: Sun, 29 Oct 2023 16:30:28 +0530
Subject: added more useful keybinds

---
 .config/XMonad/lib/Defaults.hs    | 4 +++-
 .config/XMonad/lib/Keybindings.hs | 8 +++++---
 2 files changed, 8 insertions(+), 4 deletions(-)

(limited to '.config/XMonad/lib')

diff --git a/.config/XMonad/lib/Defaults.hs b/.config/XMonad/lib/Defaults.hs
index 5f855d0..c36cf6d 100644
--- a/.config/XMonad/lib/Defaults.hs
+++ b/.config/XMonad/lib/Defaults.hs
@@ -42,7 +42,6 @@ backlightUp       = "brightnessctl s +5"
 backlightDown     = "brightnessctl s 5-"
 
 wifiOn            = "nmcli radio wifi on"
-wifiOff :: String
 wifiOff           = "nmcli radio wifi off"
 
 screenshot        = "flameshot screen"
@@ -62,6 +61,9 @@ myFileManager'    = "lf"
 myTextEditor      = "doom run"
 myTextEditor'     = "nvim"
 
+myEmailClient     = "thunderbird"
+myPasswordManager = "keepassxc"
+
 -- workspaces
 myExtraWorkspaces = [(xK_0, "十")]
 myWorkspaces      = ["一", "二", "三", "四", "五", "六", "七", "八", "九"] ++ map snd myExtraWorkspaces
diff --git a/.config/XMonad/lib/Keybindings.hs b/.config/XMonad/lib/Keybindings.hs
index ee91379..6e16414 100644
--- a/.config/XMonad/lib/Keybindings.hs
+++ b/.config/XMonad/lib/Keybindings.hs
@@ -191,6 +191,7 @@ myKeybindingsP = [
     , ("M-b d",     myScratchpad "arandr")
     , ("M-b c",     myScratchpad "calc")
     , ("M-b b",     myScratchpad "blueman")
+    , ("M-S-b",     myScratchpad "blueman")
     , ("M-b p",     myScratchpad "pavucontrol")
     , ("M-x",       myScratchpad "pavucontrol")
     , ("M-b m",     myScratchpad "BPYTOP")
@@ -208,12 +209,11 @@ myKeybindingsP = [
     , ("M-n v",     spawn $ myBrowser ++ " https://vidhukant.xyz")
     , ("M-n m",     spawn $ myBrowser ++ " https://myanimelist.net/profile/0ZeroTsu")
     -- other apps
-    -- TODO: add scrcpy
     , ("M-y e",     spawn myTextEditor)
     , ("M-d",       spawn myTextEditor)
     , ("M-S-d",     spawn "firejail discord")
-    , ("M-y S-e",   spawn "thunderbird")
-    , ("M-t",       spawn "thunderbird")
+    , ("M-y S-e",   spawn myEmailClient)
+    , ("M-t",       spawn myEmailClient)
     , ("M-y t",     spawn myTorrentClient)
     , ("M-S-t",     spawn myTorrentClient)
     , ("M-y S-t",   spawn "torbrowser-launcher")
@@ -224,6 +224,8 @@ myKeybindingsP = [
     , ("M-v",       spawn "virt-manager")
     , ("M-y b",     spawn "brave")
     , ("M-y p",     spawn myFileManager)
+    , ("M-s",       spawn myFileManager)
+    , ("M-z",       spawn myPasswordManager)
     , ("M-y S-p",   spawn $ myTerminal' ++ " -e " ++ myFileManager')
     -- XMonad
     , ("M-q q",     gridselectWindow myGridSelect >>= flip whenJust (\w -> killWindow w))
-- 
cgit v1.2.3