vanadium/xmonad: set ghostty as main terminal

This commit is contained in:
Primrose 2026-01-03 00:09:24 +01:00
parent 71a098a190
commit c5276b74bf
Signed by: primrose
GPG key ID: 4E887A4CA9714ADA

View file

@ -381,7 +381,17 @@ keybinds =
) )
myTerm :: String myTerm :: String
myTerm = "kitty" myTerm = "ghostty"
mkTermProgramCommand :: String -> String -> String
mkTermProgramCommand termTitle progName =
unwords
[ "ghostty"
, "--title=" <> quote termTitle
, "--command=" <> quote progName
]
where
quote x = "\"" <> x <> "\""
superMask, altMask :: KeyMask superMask, altMask :: KeyMask
superMask = mod4Mask superMask = mod4Mask
@ -422,22 +432,22 @@ myScratchpads :: [NamedScratchpad]
myScratchpads = myScratchpads =
[ NS [ NS
"cmus" "cmus"
(myTerm ++ " -T 'cmus' cmus") (mkTermProgramCommand "cmus" "cmus")
(title =? "cmus") (title =? "cmus")
(customFloating centeredFloat) (customFloating centeredFloat)
, NS , NS
"btop" "btop"
(myTerm ++ " -T 'btop' btop") (mkTermProgramCommand "btop" "btop")
(title =? "btop") (title =? "btop")
(customFloating fullFloat) (customFloating fullFloat)
, NS , NS
"pass" "pass"
(myTerm ++ " -T 'pass' -- fish -i -c 'while :; fzf-pass; end'") (mkTermProgramCommand "pass" "fish -i -c 'while :; fzf-pass; end'")
(title =? "pass") (title =? "pass")
(customFloating smallFloat) (customFloating smallFloat)
, NS , NS
"emoji-picker" "emoji-picker"
(myTerm ++ " -T 'emoji-picker' -- fish -i -c 'while :; emoji-picker; end'") (mkTermProgramCommand "emoji-picker" "fish -i -c 'while :; emoji-picker; end'")
(title =? "emoji-picker") (title =? "emoji-picker")
(customFloating smallFloat) (customFloating smallFloat)
] ]