aboutsummaryrefslogtreecommitdiffstats
path: root/XMonad/Hooks
diff options
context:
space:
mode:
authorJoachim Breitner <mail@joachim-breitner.de>2008-10-05 02:25:33 +0200
committerJoachim Breitner <mail@joachim-breitner.de>2008-10-05 02:25:33 +0200
commit81b0ea5483e860091598d443df0d277a4663b3fc (patch)
tree78405eafa6aff9d89ab19e0871f0fa203ccae2c3 /XMonad/Hooks
parentfcef18aef35e25cd66a6cbd991030c03bbed951b (diff)
downloadXMonadContrib-81b0ea5483e860091598d443df0d277a4663b3fc.tar.gz
XMonadContrib-81b0ea5483e860091598d443df0d277a4663b3fc.tar.xz
XMonadContrib-81b0ea5483e860091598d443df0d277a4663b3fc.zip
Kill window without focusing it first
This patch requires the patch "add killWindow function" in xmonad. Before this patch, people would experience “workspace flicker” when closing a window via EWMH that is not on the current workspace, for example when quitting pidgin via the panel icon. darcs-hash:20081005002533-23c07-4eac68cd4dcb7de2333276b875023ea4e4ee42d7.gz
Diffstat (limited to 'XMonad/Hooks')
-rw-r--r--XMonad/Hooks/EwmhDesktops.hs3
1 files changed, 1 insertions, 2 deletions
diff --git a/XMonad/Hooks/EwmhDesktops.hs b/XMonad/Hooks/EwmhDesktops.hs
index 6eec3bf..f107c13 100644
--- a/XMonad/Hooks/EwmhDesktops.hs
+++ b/XMonad/Hooks/EwmhDesktops.hs
@@ -151,8 +151,7 @@ handle ClientMessageEvent {
else if mt == a_aw then do
windows $ W.focusWindow w
else if mt == a_cw then do
- windows $ W.focusWindow w
- kill
+ killWindow w
else trace $ "Unknown ClientMessageEvent " ++ show mt
handle _ = undefined -- does not happen, as otherwise ewmhDesktopsHook would not match