mirror of
https://codeberg.org/leana8959/.files.git
synced 2025-12-06 06:39:14 +00:00
vanadium/xmonad: make evolution handling smarter
How many window title are there 😭
This commit is contained in:
parent
ae721808c0
commit
4bb8909218
1 changed files with 8 additions and 1 deletions
|
|
@ -86,7 +86,14 @@ isEvolution :: Query Bool
|
||||||
isEvolution = className ~? "gnome.Evolution"
|
isEvolution = className ~? "gnome.Evolution"
|
||||||
|
|
||||||
isEvolutionComposer :: Query Bool
|
isEvolutionComposer :: Query Bool
|
||||||
isEvolutionComposer = isEvolution <&&> title =? "Compose Message"
|
isEvolutionComposer =
|
||||||
|
isEvolution <&&>
|
||||||
|
(fmap or . sequence)
|
||||||
|
[ title =? "Compose Message"
|
||||||
|
, title ^? "Re: " -- reply message composer
|
||||||
|
, title ^? "Appointment" -- calendar event editor
|
||||||
|
, title ^? "Meeting" -- calendar event editor
|
||||||
|
]
|
||||||
|
|
||||||
isFirefox :: Query Bool
|
isFirefox :: Query Bool
|
||||||
isFirefox = className =? "firefox"
|
isFirefox = className =? "firefox"
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue