From 690f9878a600818be24788fd7aa85f52dcb6ad8d Mon Sep 17 00:00:00 2001 From: Spencer Janssen Date: Fri, 28 Dec 2007 07:18:41 +0100 Subject: -Wall police (again) darcs-hash:20071228061841-a5988-8f51255824b0011f3114d6c645f27f1e11a0056c.gz --- XMonad/Hooks/EwmhDesktops.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'XMonad/Hooks/EwmhDesktops.hs') diff --git a/XMonad/Hooks/EwmhDesktops.hs b/XMonad/Hooks/EwmhDesktops.hs index d65c3c8..231525d 100644 --- a/XMonad/Hooks/EwmhDesktops.hs +++ b/XMonad/Hooks/EwmhDesktops.hs @@ -70,8 +70,8 @@ ewmhDesktopsLogHook = withWindowSet $ \s -> do -- 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) $ \s -> - forM_ (W.integrate' (W.stack (W.workspace s))) $ \win -> do + 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 -> -- cgit v1.2.3