# HG changeset patch # User Masatake YAMATO # Date 1116873020 0 # Node ID de74a397ff540725c6be4da5545eba82c67c701d # Parent d60452f30c9271e92d76213bae996cf20d4b3205 Install a change I forgot to install at the last committing. * faces.el (mode-line-highlight): New face. diff -r d60452f30c92 -r de74a397ff54 lisp/faces.el --- a/lisp/faces.el Mon May 23 12:56:23 2005 +0000 +++ b/lisp/faces.el Mon May 23 18:30:20 2005 +0000 @@ -1843,9 +1843,22 @@ :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