Browse Source

update mode-line-inactive face

pull/1/head
10sr 12 years ago
parent
commit
9d558de528
1 changed files with 4 additions and 2 deletions
  1. +4
    -2
      emacs.el

+ 4
- 2
emacs.el View File

@@ -399,8 +399,10 @@ return nil if LIB unfound and downloading failed, otherwise the path of LIB."
(progn
(require 'set-modeline-color nil t)))

(set-face-background 'mode-line-inactive (if (face-inverse-video-p 'mode-line) "white" "black"))
(set-face-foreground 'mode-line-inactive (if (face-inverse-video-p 'mode-line) "black" "white"))
(let ((fg (face-foreground 'default))
(bg (face-background 'default)))
(set-face-background 'mode-line-inactive (if (face-inverse-video-p 'mode-line) fg bg))
(set-face-foreground 'mode-line-inactive (if (face-inverse-video-p 'mode-line) bg fg)))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; file handling


Loading…
Cancel
Save