From 470b88d719fb6e740569c8e35affa0db6d3ed7fd Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ra=C3=BAl=20Benencia?= <rul@kalgan.cc>
Date: Wed, 28 Aug 2013 11:28:38 -0300
Subject: Colorful header

---
 State.hs | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'State.hs')

diff --git a/State.hs b/State.hs
index d047c06..80d562a 100644
--- a/State.hs
+++ b/State.hs
@@ -57,6 +57,7 @@ data ColorStyle = ColorStyle {
     baseColorID      :: ColorID
   , selectionColorID :: ColorID
   , statusBarColorID :: ColorID
+  , headerColorID    :: ColorID    
 }
 
 initialState = LazymailState {
@@ -100,6 +101,7 @@ initialColorStyle = ColorStyle {
     baseColorID      = defaultColorID
   , selectionColorID = defaultColorID
   , statusBarColorID = defaultColorID
+  , headerColorID    = defaultColorID                       
 }
 
 scrColsAsInteger st = toInteger $ screenColumns st
-- 
cgit v1.2.3