vanadium/xmonad: center float dialog and email composer

This commit is contained in:
Primrose 2025-11-21 22:30:27 +08:00
parent 7decf821d7
commit 2840500790
Signed by: primrose
GPG key ID: 4E887A4CA9714ADA

View file

@ -85,6 +85,9 @@ isDiscord =
isEvolution :: Query Bool isEvolution :: Query Bool
isEvolution = className ~? "gnome.Evolution" isEvolution = className ~? "gnome.Evolution"
isEvolutionComposer :: Query Bool
isEvolutionComposer = isEvolution <&&> title =? "Compose Message"
isFirefox :: Query Bool isFirefox :: Query Bool
isFirefox = className =? "firefox" isFirefox = className =? "firefox"
@ -136,17 +139,20 @@ myActivateHook =
myManageHook :: ManageHook myManageHook :: ManageHook
myManageHook = myManageHook =
composeOne composeAll
[ isNautilusPreviewer -?> customFloating centeredFloat [ isNautilusPreviewer --> customFloating centeredFloat
, isFeh -?> doF copyToAll <> customFloating buttomRightFloat , isFeh --> doF copyToAll <> customFloating buttomRightFloat
, isMinder -?> customFloating centeredFloat , isMinder --> customFloating centeredFloat
, isFirefoxPip -?> doF copyToAll <> customFloating buttomRightFloat , isFirefoxPip --> doF copyToAll <> customFloating buttomRightFloat
, isDiscord -?> doShift chatWS , isDiscord --> doShift chatWS
, isEvolution -?> doShift chatWS , isEvolution --> doShift chatWS
, isSignal -?> doShift chatWS , isSignal --> doShift chatWS
, isFirefox -?> insertPosition Master Newer , isFirefox --> insertPosition Master Newer
, isKitty -?> insertPosition Below Newer , isKitty --> insertPosition Below Newer
, isNautilus <||> isSioyek -?> insertPosition End Older , isNautilus <||> isSioyek --> insertPosition End Older
, isDialog --> doF copyToAll <> customFloating centeredFloat
, isEvolutionComposer --> customFloating centeredFloat
] ]
<> namedScratchpadManageHook myScratchpads <> namedScratchpadManageHook myScratchpads