summaryrefslogtreecommitdiffstats
path: root/XMonad.hs
diff options
context:
space:
mode:
authorJason Creighton <jcreigh@gmail.com>2007-05-21 06:03:30 +0200
committerJason Creighton <jcreigh@gmail.com>2007-05-21 06:03:30 +0200
commit73725db0c3313332832d102aa80e9582a810c643 (patch)
tree3eff554feeb2d788815f3b7aa1a711088d1665c2 /XMonad.hs
parent931f2aa55d01268e5fbac2f35ed20b5c17bfb899 (diff)
downloadmetatile-73725db0c3313332832d102aa80e9582a810c643.tar
metatile-73725db0c3313332832d102aa80e9582a810c643.zip
s/workspace/windowset/
darcs-hash:20070521040330-b9aa7-5a36f8a4f90cc4116ffa3532a14bf405bfb942bb
Diffstat (limited to 'XMonad.hs')
-rw-r--r--XMonad.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/XMonad.hs b/XMonad.hs
index b985de8..cb9ead5 100644
--- a/XMonad.hs
+++ b/XMonad.hs
@@ -38,7 +38,7 @@ import qualified Data.Map as M
-- | XState, the window manager state.
-- Just the display, width, height and a window list
data XState = XState
- { workspace :: !WindowSet -- ^ workspace list
+ { windowset :: !WindowSet -- ^ workspace list
, layouts :: !(M.Map WorkspaceId (Layout, [Layout])) }
-- ^ mapping of workspaces to descriptions of their layouts
@@ -89,7 +89,7 @@ withDisplay f = asks display >>= f
-- | Run a monadic action with the current workspace
withWorkspace :: (WindowSet -> X a) -> X a
-withWorkspace f = gets workspace >>= f
+withWorkspace f = gets windowset >>= f
-- | True if the given window is the root window
isRoot :: Window -> X Bool