From 1e67a3f13c5ff800ebc6756deee22abb2e4fc6ba Mon Sep 17 00:00:00 2001 From: Joachim Breitner Date: Sun, 5 Oct 2008 21:02:20 +0200 Subject: Merge emptyLayoutMod into redoLayout This removes the emptyLayoutMod method from the LayoutModifier class, and change the Stack parameter to redoLayout to a Maybe Stack one. It also changes all affected code. This should should be a refactoring without any change in program behaviour. darcs-hash:20081005190220-23c07-4701517e3433ecff8c999da75ac582f6f1b65c19.gz --- XMonad/Layout/LayoutHints.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'XMonad/Layout/LayoutHints.hs') diff --git a/XMonad/Layout/LayoutHints.hs b/XMonad/Layout/LayoutHints.hs index 3558cc2..d263f3c 100644 --- a/XMonad/Layout/LayoutHints.hs +++ b/XMonad/Layout/LayoutHints.hs @@ -46,7 +46,8 @@ data LayoutHints a = LayoutHints deriving (Read, Show) instance LayoutModifier LayoutHints Window where modifierDescription _ = "Hinted" - redoLayout _ _ s xs = do + redoLayout _ _ Nothing xs = return (xs, Nothing) + redoLayout _ _ (Just s) xs = do xs' <- mapM applyHint xs return (xs', Nothing) where -- cgit v1.2.3