diff options
author | Glenn Morris <rgm@gnu.org> | 2009-09-01 07:24:13 +0000 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2009-09-01 07:24:13 +0000 |
commit | c4f6e489aa5c0d3559f442587b32b01cf7dbdb8d (patch) | |
tree | 77117e072ab68f0ad7a1039105faaac2368d5429 /lisp/generic-x.el | |
parent | d80619faefb04b289ea2dfb9d83256d3a61159f6 (diff) | |
download | emacs-c4f6e489aa5c0d3559f442587b32b01cf7dbdb8d.tar.gz |
Mark face aliases with "-face" suffix as obsolete.
Diffstat (limited to 'lisp/generic-x.el')
-rw-r--r-- | lisp/generic-x.el | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/lisp/generic-x.el b/lisp/generic-x.el index 3677c9732a9..06e663441bd 100644 --- a/lisp/generic-x.el +++ b/lisp/generic-x.el @@ -1,7 +1,7 @@ ;;; generic-x.el --- A collection of generic modes -;; Copyright (C) 1997, 1998, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc. +;; Copyright (C) 1997, 1998, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008, 2009 Free Software Foundation, Inc. ;; Author: Peter Breton <pbreton@cs.umb.edu> ;; Created: Tue Oct 08 1996 @@ -1775,8 +1775,7 @@ like an INI file. You can add this hook to `find-file-hook'." (t (:weight bold))) "Font Lock mode face used to highlight TABs." :group 'generic-x) -;; backward-compatibility alias -(put 'show-tabs-tab-face 'face-alias 'show-tabs-tab) +(define-obsolete-face-alias 'show-tabs-tab-face 'show-tabs-tab "22.1") (defface show-tabs-space '((((class grayscale) (background light)) (:background "DimGray" :weight bold)) @@ -1786,8 +1785,7 @@ like an INI file. You can add this hook to `find-file-hook'." (t (:weight bold))) "Font Lock mode face used to highlight spaces." :group 'generic-x) -;; backward-compatibility alias -(put 'show-tabs-space-face 'face-alias 'show-tabs-space) +(define-obsolete-face-alias 'show-tabs-space-face 'show-tabs-space "22.1") (define-generic-mode show-tabs-generic-mode nil ;; no comment char |