summaryrefslogtreecommitdiffstats
path: root/lib/EwmhDesktops.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/EwmhDesktops.hs')
-rw-r--r--lib/EwmhDesktops.hs9
1 files changed, 1 insertions, 8 deletions
diff --git a/lib/EwmhDesktops.hs b/lib/EwmhDesktops.hs
index 74d0260..334233d 100644
--- a/lib/EwmhDesktops.hs
+++ b/lib/EwmhDesktops.hs
@@ -85,14 +85,7 @@ ewmhDesktopsLogHook = withWindowSet $ \s -> do
Just curr -> do
setCurrentDesktop curr
- -- Per window Desktop
- -- To make gnome-panel accept our xinerama stuff, we display
- -- all visible windows on the current desktop.
- forM_ (W.current s : W.visible s) $ \x ->
- forM_ (W.integrate' (W.stack (W.workspace x))) $ \win -> do
- setWindowDesktop win curr
-
- forM_ (W.hidden s) $ \w ->
+ forM_ (map W.workspace (W.current s : W.visible s) ++ W.hidden s) $ \w ->
case elemIndex (W.tag w) (map W.tag ws) of
Nothing -> return ()
Just wn -> forM_ (W.integrate' (W.stack w)) $ \win -> do