summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorBrent Yorgey <byorgey@gmail.com>2007-10-22 18:16:01 +0200
committerBrent Yorgey <byorgey@gmail.com>2007-10-22 18:16:01 +0200
commit33404de82cce78e79d22972daa6faaceb2149c06 (patch)
treebf564d6a07fbd8bf92969198e0c0287e740147e0
parent355e11de3f3b1b9dbf394ee95a11bccd57f62145 (diff)
downloadmetatile-33404de82cce78e79d22972daa6faaceb2149c06.tar
metatile-33404de82cce78e79d22972daa6faaceb2149c06.zip
StackSet.hs: align some comments
darcs-hash:20071022161601-bd4d7-af9280b6ae3c27040d865b9fe3ab144d05beac48
-rw-r--r--StackSet.hs8
1 files 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.