move initColor to Operations and only store the Pixel value of colors

Moving initColor to Operations allows it to be used by extensions.

The Pixel component of the color is the only thing we need, so it's simpler
just to deal with that.

darcs-hash:20070613234501-b9aa7-5b39416db9f9d5ac42692262c233179baeb2540f

1 files changed, 2 insertions, 2 deletions

diff --git a/XMonad.hs b/XMonad.hs
index 4e20382..46ef260 100644
--- a/XMonad.hs
+++ b/XMonad.hs
@@ -48,8 +48,8 @@ data XState = XState
 data XConf = XConf
     { display       :: Display      -- ^ the X11 display
     , theRoot       :: !Window      -- ^ the root window
-    , normalBorder  :: !Color       -- ^ border color of unfocused windows
-    , focusedBorder :: !Color     } -- ^ border color of the focused window
+    , normalBorder  :: !Pixel       -- ^ border color of unfocused windows
+    , focusedBorder :: !Pixel     } -- ^ border color of the focused window
 
 type WindowSet = StackSet WorkspaceId Window ScreenId