Update XMonad config
This commit is contained in:
@@ -70,7 +70,7 @@ myScreenshotName = "Screenshot-%Y-%m-%d-%H%M%S.png"
|
||||
|
||||
myScratchpads :: [NamedScratchpad]
|
||||
myScratchpads =
|
||||
[ NS "Windscribe" "windscribe" (className =? "Windscribe2") (customFloating $ W.RationalRect 0.4 0.4 0.6 0.6),
|
||||
[ NS "Riseup-vpn" "riseup-vpn" (className =? "RiseupVPN") (customFloating $ W.RationalRect 0.15 0.4 0.15 0.4),
|
||||
NS "Terminal" spawnTerminal (title =? "kitty-float") (customFloating $ W.RationalRect 0.2 0.2 0.6 0.6),
|
||||
NS "Music" spawnMusic (title =? "ncmpcpp") (customFloating $ W.RationalRect 0.2 0.2 0.6 0.6),
|
||||
NS "Mail" spawnMail (title =? "mutt") (customFloating $ W.RationalRect 0.2 0.2 0.6 0.6),
|
||||
@@ -107,7 +107,7 @@ myConfig =
|
||||
("M-i", spawn $ "setxkbmap" ++ myKeyboardLayoutIT),
|
||||
("M-u", spawn $ "setxkbmap" ++ myKeyboardLayoutUS),
|
||||
("M-s", spawn $ "setxkbmap" ++ myKeyboardLayoutSK),
|
||||
("M-S-v", namedScratchpadAction myScratchpads "Windscribe"),
|
||||
("M-S-v", namedScratchpadAction myScratchpads "Riseup-vpn"),
|
||||
("M-S-s", namedScratchpadAction myScratchpads "Terminal"),
|
||||
("M-S-a", namedScratchpadAction myScratchpads "Cal"),
|
||||
("M-o", namedScratchpadAction myScratchpads "Btop"),
|
||||
|
||||
Reference in New Issue
Block a user