diff options
author | Kim F. Storm <storm@cua.dk> | 2002-02-08 23:51:56 +0000 |
---|---|---|
committer | Kim F. Storm <storm@cua.dk> | 2002-02-08 23:51:56 +0000 |
commit | c5752dcb2f8e970a2f4703ed8c0a425f35cc5a55 (patch) | |
tree | 4772e02456b5651e7d4414819e9a407660695a28 /lisp/faces.el | |
parent | 039b63946283a15deea8f14bbc0ba1909c75568d (diff) | |
download | emacs-c5752dcb2f8e970a2f4703ed8c0a425f35cc5a55.tar.gz |
(mode-line-inactive): New face for mode-line for
non-selected windows.
(mode-line): Doc fix: Only used for selected window.
Diffstat (limited to 'lisp/faces.el')
-rw-r--r-- | lisp/faces.el | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/lisp/faces.el b/lisp/faces.el index 95434f33dcb..45b5d585282 100644 --- a/lisp/faces.el +++ b/lisp/faces.el @@ -1708,13 +1708,27 @@ created." :background "grey75" :foreground "black")) (t (:inverse-video t))) - "Basic mode line face." + "Basic mode line face for selected window." :version "21.1" :group 'modeline :group 'basic-faces) +(defface mode-line-inactive + '((((type x w32 mac) (class color)) + :inherit mode-line + :weight light + :box (:line-width -1 :color "grey75" :style nil) + :foreground "grey20" :background "grey90") + (t + :inverse-video t)) + "Basic mode line face for non-selected windows." + :version "21.2" + :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) (defface header-line '((((type tty)) |