From ac4e97ef40fa725e15591ed26310b05818d57739 Mon Sep 17 00:00:00 2001 From: Vidhu Kant Sharma Date: Mon, 29 Nov 2021 02:17:53 +0530 Subject: added keybindings for all scratchpads --- .config/XMonad/xmonad.hs | 35 +++++++++++++++++++++++++---------- 1 file changed, 25 insertions(+), 10 deletions(-) diff --git a/.config/XMonad/xmonad.hs b/.config/XMonad/xmonad.hs index 85d13db..66d3bde 100644 --- a/.config/XMonad/xmonad.hs +++ b/.config/XMonad/xmonad.hs @@ -54,8 +54,9 @@ myScratchpads = , NS "lf" "alacritty -t 'lf' -e 'lf'" (title =? "lf") (customFloating $ W.RationalRect (1/16) (1/16) (7/8) (7/8)) , NS "calc" "kcalc" (className =? "kcalc") defaultFloating , NS "arandr" "arandr" (className =? "Arandr") defaultFloating - , NS "BPYTOP" "alacritty -t 'BPYTOP' -e 'bpytop'" (title =? "BPYTOP") (customFloating $ W.RationalRect (1/16) (1/16) (7/8) (7/8)) - ] where role = stringProperty "WM_WINDOW_ROLE" + , NS "pavucontrol" "pavucontrol" (className =? "Pavucontrol") (customFloating $ W.RationalRect (1/16) (1/16) (7/8) (7/8)) + , NS "BPYTOP" "alacritty -t 'BPYTOP' -e 'bpytop'" (title =? "BPYTOP") (customFloating $ W.RationalRect (1/16) (1/16) (7/8) (7/8)) + ] myTabTheme = def { fontName = myFont , activeColor = "#755999" @@ -116,14 +117,15 @@ gamingTS = myGamingTS a = TS.treeselectAction a gamingTS scratchpadTS = - [ Node (TS.TSNode "Term 0" "" (namedScratchpadAction myScratchpads "Term 0")) [] - , Node (TS.TSNode "Term 1" "" (namedScratchpadAction myScratchpads "Term 1")) [] - , Node (TS.TSNode "Term 2" "" (namedScratchpadAction myScratchpads "Term 2")) [] - , Node (TS.TSNode "OBS" "" (namedScratchpadAction myScratchpads "OBS")) [] - , Node (TS.TSNode "lf" "" (namedScratchpadAction myScratchpads "lf")) [] - , Node (TS.TSNode "BPYTOP" "" (namedScratchpadAction myScratchpads "BPYTOP")) [] - , Node (TS.TSNode "Calculator" "" (namedScratchpadAction myScratchpads "calc")) [] - , Node (TS.TSNode "Arandr" "" (namedScratchpadAction myScratchpads "arandr")) [] + [ Node (TS.TSNode "Term 0" "" (namedScratchpadAction myScratchpads "Term 0")) [] + , Node (TS.TSNode "Term 1" "" (namedScratchpadAction myScratchpads "Term 1")) [] + , Node (TS.TSNode "Term 2" "" (namedScratchpadAction myScratchpads "Term 2")) [] + , Node (TS.TSNode "OBS" "" (namedScratchpadAction myScratchpads "OBS")) [] + , Node (TS.TSNode "lf" "" (namedScratchpadAction myScratchpads "lf")) [] + , Node (TS.TSNode "BPYTOP" "" (namedScratchpadAction myScratchpads "BPYTOP")) [] + , Node (TS.TSNode "Calculator" "" (namedScratchpadAction myScratchpads "calc")) [] + , Node (TS.TSNode "Arandr" "" (namedScratchpadAction myScratchpads "arandr")) [] + , Node (TS.TSNode "Pavucontrol" "" (namedScratchpadAction myScratchpads "pavucontrol")) [] ] myScratchpadTS a = TS.treeselectAction a scratchpadTS @@ -308,4 +310,17 @@ main = do , ("M-S-", myPowerTS myTSConfig) , ("M-p", myTreeMenu myTSConfig) , ("M-S-p", spawn "dmenu_run") + -- scratchpads + , ("M-r", namedScratchpadAction myScratchpads "Term 0") + , ("M-t", namedScratchpadAction myScratchpads "Term 1") + , ("M-y", namedScratchpadAction myScratchpads "Term 2") + , ("M-S-o", namedScratchpadAction myScratchpads "OBS") + , ("M-m", namedScratchpadAction myScratchpads "BPYTOP") + , ("M-S-m", namedScratchpadAction myScratchpads "calc") + , ("M-n", namedScratchpadAction myScratchpads "pavucontrol") + , ("M-S-n", namedScratchpadAction myScratchpads "arandr") + , ("M-b", namedScratchpadAction myScratchpads "lf") + -- other apps + , ("M-S-b", spawn "dolphin") ] + -- used keys: u x e w o i p r t y q n b -- cgit v1.2.3