From 07fb5190405bbffc6b2462dd17ae305581870eab Mon Sep 17 00:00:00 2001 From: gwern0 Date: Sun, 14 Mar 2010 21:59:51 +0100 Subject: DynamicWorkspaces.hs: rm whitespace Ignore-this: 9d64301708cb1702b9b46f1068efa891 darcs-hash:20100314205951-f7719-8e10d50daafbf32e3f13d32ab21af82ff37869eb.gz --- XMonad/Actions/DynamicWorkspaces.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'XMonad') diff --git a/XMonad/Actions/DynamicWorkspaces.hs b/XMonad/Actions/DynamicWorkspaces.hs index c9409ad..cb27d01 100644 --- a/XMonad/Actions/DynamicWorkspaces.hs +++ b/XMonad/Actions/DynamicWorkspaces.hs @@ -153,7 +153,7 @@ removeEmptyWorkspaceAfter :: X () -> X () removeEmptyWorkspaceAfter = removeEmptyWorkspaceAfterExcept [] -- | Like 'removeEmptyWorkspaceAfter' but use a list of sticky workspaces, --- whose entries will never be removed. +-- whose entries will never be removed. removeEmptyWorkspaceAfterExcept :: [String] -> X () -> X () removeEmptyWorkspaceAfterExcept sticky f = do before <- gets (currentTag . windowset) -- cgit v1.2.3