From dc8c29203f279e7562c411d8c5b0ad5082cc7630 Mon Sep 17 00:00:00 2001
From: Spencer Janssen <sjanssen@cse.unl.edu>
Date: Mon, 9 Apr 2007 09:35:10 +0200
Subject: Remove unused 'screen' field

darcs-hash:20070409073510-a5988-b2a95e4ba83a58a7be01dc49961449fa1f817014
---
 Main.hs   | 1 -
 XMonad.hs | 1 -
 2 files changed, 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
 
-- 
cgit v1.2.3