diff options
| author | Masatake YAMATO <[email protected]> | 2005-05-23 18:30:20 +0000 |
|---|---|---|
| committer | Masatake YAMATO <[email protected]> | 2005-05-23 18:30:20 +0000 |
| commit | d2c619c8357bde4d8a68f8c3baa9a877b5ec656a (patch) | |
| tree | bde2e05f71eaedabdfc0c88a64361b9f8147955f | |
| parent | 71d4fba16fb333ae8ee534ddebdb04fc1e70569f (diff) | |
Install a change I forgot to install at the last committing.
* faces.el (mode-line-highlight): New face.
| -rw-r--r-- | lisp/faces.el | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/lisp/faces.el b/lisp/faces.el index 74a8a1cbb4..27905af734 100644 --- a/lisp/faces.el +++ b/lisp/faces.el @@ -1843,9 +1843,22 @@ created." :group 'modeline :group 'basic-faces) +(defface mode-line-highlight + '((((class color) (min-colors 88) (background light)) + :background "RoyalBlue4" :foreground "white") + (((class color) (min-colors 88) (background dark)) + :background "light sky blue" :foreground "black") + (t + :inverse-video t)) + "Basic mode line face for highlighting." + :version "22.1" + :group 'modeline + :group 'basic-faces) + ;; Make `modeline' an alias for `mode-line', for compatibility. (put 'modeline 'face-alias 'mode-line) (put 'modeline-inactive 'face-alias 'mode-line-inactive) +(put 'modeline-higilight 'face-alias 'mode-line-highlight) (defface header-line '((default |