From 33404de82cce78e79d22972daa6faaceb2149c06 Mon Sep 17 00:00:00 2001 From: Brent Yorgey Date: Mon, 22 Oct 2007 18:16:01 +0200 Subject: StackSet.hs: align some comments darcs-hash:20071022161601-bd4d7-af9280b6ae3c27040d865b9fe3ab144d05beac48 --- StackSet.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/StackSet.hs b/StackSet.hs index 97ac573..f607764 100644 --- a/StackSet.hs +++ b/StackSet.hs @@ -125,13 +125,13 @@ import qualified Data.Map as M (Map,insert,delete,empty) -- -- * peek, -- was: peek\/peekStack -- --- * focusUp, focusDown, -- was: rotate +-- * focusUp, focusDown, -- was: rotate -- -- * swapUp, swapDown -- -- * focus -- was: raiseFocus -- --- * insertUp, -- was: insert\/push +-- * insertUp, -- was: insert\/push -- -- * delete, -- @@ -157,8 +157,8 @@ import qualified Data.Map as M (Map,insert,delete,empty) data StackSet i l a sid sd = StackSet { current :: !(Screen i l a sid sd) -- ^ currently focused workspace , visible :: [Screen i l a sid sd] -- ^ non-focused workspaces, visible in xinerama - , hidden :: [Workspace i l a] -- ^ workspaces not visible anywhere - , floating :: M.Map a RationalRect -- ^ floating windows + , hidden :: [Workspace i l a] -- ^ workspaces not visible anywhere + , floating :: M.Map a RationalRect -- ^ floating windows } deriving (Show, Read, Eq) -- | Visible workspaces, and their Xinerama screens. -- cgit v1.2.3