cleaner version of main/config inversion.

darcs-hash:20071029184823-72aca-5647e07a0bde65cf7e1d49a1613fb9e4210c6aa5

1 files changed, 3 insertions, 0 deletions

diff --git a/XMonad.hs b/XMonad.hs
index fc06885..df0d78a 100644
--- a/XMonad.hs
+++ b/XMonad.hs
@@ -50,7 +50,10 @@ data XState = XState
     , dragging     :: !(Maybe (Position -> Position -> X (), X ())) }
 data XConf = XConf
     { display       :: Display      -- ^ the X11 display
+    , logHook       :: !(X ())      -- ^ the loghook function
+    , terminal      :: !String      -- ^ the user's preferred terminal
     , theRoot       :: !Window      -- ^ the root window
+    , borderWidth   :: !Dimension   -- ^ the preferred border width
     , normalBorder  :: !Pixel       -- ^ border color of unfocused windows
     , focusedBorder :: !Pixel     } -- ^ border color of the focused window