From 73725db0c3313332832d102aa80e9582a810c643 Mon Sep 17 00:00:00 2001 From: Jason Creighton Date: Mon, 21 May 2007 06:03:30 +0200 Subject: s/workspace/windowset/ darcs-hash:20070521040330-b9aa7-5a36f8a4f90cc4116ffa3532a14bf405bfb942bb --- XMonad.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'XMonad.hs') 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 -- cgit v1.2.3