From 640a6c6ffc4edb3916a0a74ea5fd8221d75a1250 Mon Sep 17 00:00:00 2001 From: Andrea Rossato Date: Mon, 28 Jan 2008 00:18:15 +0100 Subject: Decoration: after deleting the windows we must update the layout modifier Thanks to Feuerbach for reporting this. darcs-hash:20080127231815-32816-e877922bacb5f3bd37a65c248c745151107b485c.gz --- XMonad/Layout/Decoration.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'XMonad/Layout/Decoration.hs') diff --git a/XMonad/Layout/Decoration.hs b/XMonad/Layout/Decoration.hs index 884c160..89edfcd 100644 --- a/XMonad/Layout/Decoration.hs +++ b/XMonad/Layout/Decoration.hs @@ -165,7 +165,8 @@ instance (DecorationStyle ds Window, Shrinker s) => LayoutModifier (Decoration d handleMess _ _ = return Nothing - emptyLayoutMod (Decoration (I (Just (DS dwrs _))) _ _) _ _ = deleteWindows (getDWs dwrs) >> return ([], Nothing) + emptyLayoutMod (Decoration (I (Just (DS dwrs _))) sh c) _ _ = do deleteWindows (getDWs dwrs) + return ([], Just $ Decoration (I Nothing) sh c) emptyLayoutMod _ _ _ = return ([], Nothing) modifierDescription (Decoration _ _ c) = describeDeco $ style c -- cgit v1.2.3