Mercurial > emacs
diff lisp/obsolete/old-whitespace.el @ 104778:afa0e028ba97
Mark face aliases with "-face" suffix as obsolete.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Tue, 01 Sep 2009 07:24:13 +0000 |
parents | a9dc0e7c3f2b |
children | 1d1d5d9bd884 |
line wrap: on
line diff
--- a/lisp/obsolete/old-whitespace.el Tue Sep 01 03:27:52 2009 +0000 +++ b/lisp/obsolete/old-whitespace.el Tue Sep 01 07:24:13 2009 +0000 @@ -1,7 +1,7 @@ ;;; whitespace.el --- warn about and clean bogus whitespaces in the file -;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, -;; 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc. +;; Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, +;; 2008, 2009 Free Software Foundation, Inc. ;; Author: Rajesh Vaidheeswarran <rv@gnu.org> ;; Keywords: convenience @@ -308,8 +308,8 @@ (:background "white"))) "Face used for highlighting the bogus whitespaces that exist in the buffer." :group 'whitespace-faces) -;; backward-compatibility alias -(put 'whitespace-highlight-face 'face-alias 'whitespace-highlight) +(define-obsolete-face-alias 'whitespace-highlight-face + 'whitespace-highlight "22.1") (if (not (assoc 'whitespace-mode minor-mode-alist)) (setq minor-mode-alist (cons '(whitespace-mode whitespace-mode-line)