diff options
| -rw-r--r-- | XMonad/Hooks/EwmhDesktops.hs | 3 |
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 |