diff options
| author | Kim F. Storm | 2002-02-08 23:51:56 +0000 |
|---|---|---|
| committer | Kim F. Storm | 2002-02-08 23:51:56 +0000 |
| commit | c5752dcb2f8e970a2f4703ed8c0a425f35cc5a55 (patch) | |
| tree | 4772e02456b5651e7d4414819e9a407660695a28 | |
| parent | 039b63946283a15deea8f14bbc0ba1909c75568d (diff) | |
| download | emacs-c5752dcb2f8e970a2f4703ed8c0a425f35cc5a55.tar.gz emacs-c5752dcb2f8e970a2f4703ed8c0a425f35cc5a55.zip | |
(mode-line-inactive): New face for mode-line for
non-selected windows.
(mode-line): Doc fix: Only used for selected window.
| -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." | |||
| 1708 | :background "grey75" :foreground "black")) | 1708 | :background "grey75" :foreground "black")) |
| 1709 | (t | 1709 | (t |
| 1710 | (:inverse-video t))) | 1710 | (:inverse-video t))) |
| 1711 | "Basic mode line face." | 1711 | "Basic mode line face for selected window." |
| 1712 | :version "21.1" | 1712 | :version "21.1" |
| 1713 | :group 'modeline | 1713 | :group 'modeline |
| 1714 | :group 'basic-faces) | 1714 | :group 'basic-faces) |
| 1715 | 1715 | ||
| 1716 | (defface mode-line-inactive | ||
| 1717 | '((((type x w32 mac) (class color)) | ||
| 1718 | :inherit mode-line | ||
| 1719 | :weight light | ||
| 1720 | :box (:line-width -1 :color "grey75" :style nil) | ||
| 1721 | :foreground "grey20" :background "grey90") | ||
| 1722 | (t | ||
| 1723 | :inverse-video t)) | ||
| 1724 | "Basic mode line face for non-selected windows." | ||
| 1725 | :version "21.2" | ||
| 1726 | :group 'modeline | ||
| 1727 | :group 'basic-faces) | ||
| 1728 | |||
| 1716 | ;; Make `modeline' an alias for `mode-line', for compatibility. | 1729 | ;; Make `modeline' an alias for `mode-line', for compatibility. |
| 1717 | (put 'modeline 'face-alias 'mode-line) | 1730 | (put 'modeline 'face-alias 'mode-line) |
| 1731 | (put 'modeline-inactive 'face-alias 'mode-line-inactive) | ||
| 1718 | 1732 | ||
| 1719 | (defface header-line | 1733 | (defface header-line |
| 1720 | '((((type tty)) | 1734 | '((((type tty)) |