diff options
Diffstat (limited to '.config/XMonad')
-rw-r--r-- | .config/XMonad/lib/Defaults.hs | 4 | ||||
-rw-r--r-- | .config/XMonad/lib/Keybindings.hs | 8 |
2 files changed, 8 insertions, 4 deletions
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)) |