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 = "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 = mod4Mask
@ -422,22 +432,22 @@ myScratchpads :: [NamedScratchpad]
myScratchpads =
[ NS
"cmus"
(myTerm ++ " -T 'cmus' cmus")
(mkTermProgramCommand "cmus" "cmus")
(title =? "cmus")
(customFloating centeredFloat)
, NS
"btop"
(myTerm ++ " -T 'btop' btop")
(mkTermProgramCommand "btop" "btop")
(title =? "btop")
(customFloating fullFloat)
, NS
"pass"
(myTerm ++ " -T 'pass' -- fish -i -c 'while :; fzf-pass; end'")
(mkTermProgramCommand "pass" "fish -i -c 'while :; fzf-pass; end'")
(title =? "pass")
(customFloating smallFloat)
, NS
"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")
(customFloating smallFloat)
]