From df861c3da33bcdf65df090272a00bf2a5654e036 Mon Sep 17 00:00:00 2001
From: 10sr <8slashes+git@gmail.com>
Date: Sun, 22 Jan 2012 17:18:45 +0900
Subject: [PATCH] change modeline color

---
 .emacs.el | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/.emacs.el b/.emacs.el
index 241e4a8..52184e1 100644
--- a/.emacs.el
+++ b/.emacs.el
@@ -144,13 +144,14 @@
                                 (assq state
                                       my-set-mode-line-color-color)))
       (setq my-set-mode-line-color-state state))))
-(defvar my-set-mode-line-color-color
-  '((readonly "blue" "white")
-    (overwrite "red" "white")
-    (insert nil nil))
-  "")
+(defvar my-set-mode-line-color-color nil "")
+(setq my-set-mode-line-color-color
+      '((readonly "blue" "white")
+        (overwrite "red" "white")
+        (insert nil nil)))
 (defvar my-set-mode-line-color-state nil "")
 (add-hook 'post-command-hook 'my-set-mode-line-color-read-only)
+(add-hook 'after-init-hook 'my-set-mode-line-color-read-only)
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; mode-line