summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSpencer Janssen <sjanssen@cse.unl.edu>2007-04-09 09:35:10 +0200
committerSpencer Janssen <sjanssen@cse.unl.edu>2007-04-09 09:35:10 +0200
commitdc8c29203f279e7562c411d8c5b0ad5082cc7630 (patch)
tree020905a542ca1f2b17591cb4afe9e345962b6a6e
parent44fa1daa46c5c9b7312fec87bc5f93eec04a36b2 (diff)
downloadmetatile-dc8c29203f279e7562c411d8c5b0ad5082cc7630.tar
metatile-dc8c29203f279e7562c411d8c5b0ad5082cc7630.zip
Remove unused 'screen' field
darcs-hash:20070409073510-a5988-b2a95e4ba83a58a7be01dc49961449fa1f817014
-rw-r--r--Main.hs1
-rw-r--r--XMonad.hs1
2 files changed, 0 insertions, 2 deletions
diff --git a/Main.hs b/Main.hs
index c259d74..1b7dc92 100644
--- a/Main.hs
+++ b/Main.hs
@@ -42,7 +42,6 @@ main = do
let st = XState
{ display = dpy
- , screen = dflt
, xineScreens = xinesc
, wsOnScreen = M.fromList $ map (\n -> (n,n)) [0..((length xinesc)-1)]
, theRoot = rootw
diff --git a/XMonad.hs b/XMonad.hs
index 2ab1d70..38e6370 100644
--- a/XMonad.hs
+++ b/XMonad.hs
@@ -34,7 +34,6 @@ import qualified Data.Map as M
-- Just the display, width, height and a window list
data XState = XState
{ display :: Display -- ^ the X11 display
- , screen :: !ScreenNumber
, xineScreens :: ![Rectangle] -- ^ dimensions of each screen