From 0303a3797e66fa31b4759a951ffb6f29dbb9cc57 Mon Sep 17 00:00:00 2001
From: David Roundy <droundy@darcs.net>
Date: Mon, 8 Oct 2007 14:52:06 +0200
Subject: make createNewWindow set background and foreground to a given color.

This means we don't need to draw colors that are this color.  Also
speeds up redrawing, since the X server can do all the drawing on its
own, without talking with xmonad.

darcs-hash:20071008125206-72aca-0f17cde109eeb8f66ea651657fcc09599680881d.gz
---
 Tabbed.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Tabbed.hs')

diff --git a/Tabbed.hs b/Tabbed.hs
index 0996e06..378f20a 100644
--- a/Tabbed.hs
+++ b/Tabbed.hs
@@ -172,7 +172,7 @@ createTabs c (Rectangle x y wh ht) owl@(ow:ows) = do
       height = fromIntegral $ tabSize c
       mask   = Just (exposureMask .|. buttonPressMask)
   d  <- asks display
-  w  <- createNewWindow (Rectangle x y wid height) mask
+  w  <- createNewWindow (Rectangle x y wid height) mask (inactiveColor c)
   io $ restackWindows d $ w : [ow]
   ws <- createTabs c (Rectangle (x + fromIntegral wid) y (wh - wid) ht) ows
   return (w:ws)
-- 
cgit v1.2.3