diff options
| author | Glenn Morris <rgm@gnu.org> | 2009-09-02 03:06:25 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2009-09-02 03:06:25 +0000 |
| commit | 9f255bc3a8fd760f67d56ca1191eef5cd13e29c0 (patch) | |
| tree | aa13315027b0e0005e1459fcc821942e61bb0ca2 /lisp/faces.el | |
| parent | 3d493bef43be9d2cc91152043103156d5717d33f (diff) | |
| download | emacs-9f255bc3a8fd760f67d56ca1191eef5cd13e29c0.tar.gz | |
(modeline, modeline-inactive, modeline-highlight, modeline-buffer-id):
Mark these face aliases as obsolete.
Diffstat (limited to 'lisp/faces.el')
| -rw-r--r-- | lisp/faces.el | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/lisp/faces.el b/lisp/faces.el index 95d52db4833..cfb6a8b2961 100644 --- a/lisp/faces.el +++ b/lisp/faces.el @@ -2358,6 +2358,8 @@ terminal type to a different value." :version "21.1" :group 'mode-line-faces :group 'basic-faces) +;; No need to define aliases of this form for new faces. +(define-obsolete-face-alias 'modeline 'mode-line "21.1") (defface mode-line-inactive '((default @@ -2374,6 +2376,7 @@ terminal type to a different value." :version "22.1" :group 'mode-line-faces :group 'basic-faces) +(define-obsolete-face-alias 'modeline-inactive 'mode-line-inactive "22.1") (defface mode-line-highlight '((((class color) (min-colors 88)) @@ -2384,6 +2387,7 @@ terminal type to a different value." :version "22.1" :group 'mode-line-faces :group 'basic-faces) +(define-obsolete-face-alias 'modeline-highlight 'mode-line-highlight "22.1") (defface mode-line-emphasis '((t (:weight bold))) @@ -2399,12 +2403,7 @@ Use the face `mode-line-highlight' for features that can be selected." :version "22.1" :group 'mode-line-faces :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-highlight 'face-alias 'mode-line-highlight) -(put 'modeline-buffer-id 'face-alias 'mode-line-buffer-id) +(define-obsolete-face-alias 'modeline-buffer-id 'mode-line-buffer-id "22.1") (defface header-line '((default |