diff options
| author | Vidhu Kant Sharma <vidhukant@vidhukant.xyz> | 2022-08-31 21:20:40 +0530 |
|---|---|---|
| committer | Vidhu Kant Sharma <vidhukant@vidhukant.xyz> | 2022-08-31 21:20:40 +0530 |
| commit | e5f1bbba2be64cff04cc0bf7d2224c8a50a1c6dc (patch) | |
| tree | 0cbcdaa78a731542776ff113711d9dc6288eedb7 /.config/XMonad/lib/Scratchpads.hs | |
| parent | f7bce96b0b363161c0fbedc77c369ad81027a3d2 (diff) | |
setting alacritty scaling to 1.5 so it looks similar on both monitors
Diffstat (limited to '.config/XMonad/lib/Scratchpads.hs')
| -rw-r--r-- | .config/XMonad/lib/Scratchpads.hs | 26 |
1 files changed, 19 insertions, 7 deletions
diff --git a/.config/XMonad/lib/Scratchpads.hs b/.config/XMonad/lib/Scratchpads.hs index 7ccf044..8769437 100644 --- a/.config/XMonad/lib/Scratchpads.hs +++ b/.config/XMonad/lib/Scratchpads.hs @@ -4,18 +4,30 @@ import XMonad import qualified XMonad.StackSet as W import XMonad.Util.NamedScratchpad +import Defaults + -- open a scratchpad myScratchpad :: String -> X () myScratchpad x = namedScratchpadAction myScratchpads x +-- if I try to concatinate strings directly +-- it won't compile for some reason +term0Cmd = myTerminal' ++ " -t 'Term U'" +term1Cmd = myTerminal' ++ " -t 'Term I'" +term2Cmd = myTerminal' ++ " -t 'Term O'" +term3Cmd = myTerminal' ++ " -t 'Term P'" +lfCmd = myTerminal' ++ " -t 'lf' -e 'lf'" +nmtuiCmd = myTerminal' ++ " -t 'nmtui' -e 'nmtui'" +bpytopCmd = myTerminal' ++ " -t 'BPYTOP' -e 'bpytop'" + myScratchpads = - [ NS "Term 0" "alacritty -t 'Term U'" (title =? "Term U") (customFloating $ W.RationalRect (1/16) (1/16) (7/8) (7/8)) - , NS "Term 1" "alacritty -t 'Term I'" (title =? "Term I") (customFloating $ W.RationalRect (1/16) (1/16) (7/8) (7/8)) - , NS "Term 2" "alacritty -t 'Term O'" (title =? "Term O") (customFloating $ W.RationalRect (1/16) (1/16) (7/8) (7/8)) - , NS "Term 3" "alacritty -t 'Term P'" (title =? "Term P") (customFloating $ W.RationalRect (1/16) (1/16) (7/8) (7/8)) - , NS "lf" "alacritty -t 'lf' -e 'lf'" (title =? "lf") (customFloating $ W.RationalRect (1/16) (1/16) (7/8) (7/8)) - , NS "nmtui" "alacritty -t 'nmtui' -e 'nmtui'" (title =? "nmtui") (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)) + [ NS "Term 0" term0Cmd (title =? "Term U") (customFloating $ W.RationalRect (1/16) (1/16) (7/8) (7/8)) + , NS "Term 1" term1Cmd (title =? "Term I") (customFloating $ W.RationalRect (1/16) (1/16) (7/8) (7/8)) + , NS "Term 2" term2Cmd (title =? "Term O") (customFloating $ W.RationalRect (1/16) (1/16) (7/8) (7/8)) + , NS "Term 3" term3Cmd (title =? "Term P") (customFloating $ W.RationalRect (1/16) (1/16) (7/8) (7/8)) + , NS "lf" lfCmd (title =? "lf") (customFloating $ W.RationalRect (1/16) (1/16) (7/8) (7/8)) + , NS "nmtui" nmtuiCmd (title =? "nmtui") (customFloating $ W.RationalRect (1/16) (1/16) (7/8) (7/8)) + , NS "BPYTOP" bpytopCmd (title =? "BPYTOP") (customFloating $ W.RationalRect (1/16) (1/16) (7/8) (7/8)) , NS "arandr" "arandr" (className =? "Arandr") (customFloating $ W.RationalRect (1/4) (1/4) (1/2) (1/2)) , NS "calc" "galculator" (className =? "Galculator") (customFloating $ W.RationalRect (5/13) (4/13) (3/13) (6/13)) , NS "blueman" "blueman-manager" (className =? "Blueman-manager") (customFloating $ W.RationalRect (5.5/16) (4/13) (5/16) (6/13)) |