summaryrefslogtreecommitdiff
path: root/lisp/gnus/sieve-mode.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2009-09-02 03:04:15 +0000
committerGlenn Morris <rgm@gnu.org>2009-09-02 03:04:15 +0000
commit3d493bef43be9d2cc91152043103156d5717d33f (patch)
tree194c0c4c987d2a5dd2a72a9667f742f8490848bd /lisp/gnus/sieve-mode.el
parentf6db4734d7e805dfff6006aa6f6aaa946451c0c3 (diff)
downloademacs-3d493bef43be9d2cc91152043103156d5717d33f.tar.gz
emacs-3d493bef43be9d2cc91152043103156d5717d33f.tar.bz2
emacs-3d493bef43be9d2cc91152043103156d5717d33f.zip
Mark face aliases with "-face" in the name as obsolete.
Diffstat (limited to 'lisp/gnus/sieve-mode.el')
-rw-r--r--lisp/gnus/sieve-mode.el8
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/gnus/sieve-mode.el b/lisp/gnus/sieve-mode.el
index 15d981b58a1..468099a00d6 100644
--- a/lisp/gnus/sieve-mode.el
+++ b/lisp/gnus/sieve-mode.el
@@ -1,7 +1,7 @@
;;; sieve-mode.el --- Sieve code editing commands for Emacs
-;; Copyright (C) 2001, 2002, 2003, 2004, 2005,
-;; 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+;; Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009
+;; Free Software Foundation, Inc.
;; Author: Simon Josefsson <simon@josefsson.org>
@@ -78,6 +78,7 @@
:group 'sieve)
;; backward-compatibility alias
(put 'sieve-control-commands-face 'face-alias 'sieve-control-commands)
+(put 'sieve-control-commands-face 'obsolete-face "22.1")
(defvar sieve-action-commands-face 'sieve-action-commands
"Face name used for Sieve Action Commands.")
@@ -91,6 +92,7 @@
:group 'sieve)
;; backward-compatibility alias
(put 'sieve-action-commands-face 'face-alias 'sieve-action-commands)
+(put 'sieve-action-commands-face 'obsolete-face "22.1")
(defvar sieve-test-commands-face 'sieve-test-commands
"Face name used for Sieve Test Commands.")
@@ -108,6 +110,7 @@
:group 'sieve)
;; backward-compatibility alias
(put 'sieve-test-commands-face 'face-alias 'sieve-test-commands)
+(put 'sieve-test-commands-face 'obsolete-face "22.1")
(defvar sieve-tagged-arguments-face 'sieve-tagged-arguments
"Face name used for Sieve Tagged Arguments.")
@@ -123,6 +126,7 @@
:group 'sieve)
;; backward-compatibility alias
(put 'sieve-tagged-arguments-face 'face-alias 'sieve-tagged-arguments)
+(put 'sieve-tagged-arguments-face 'obsolete-face "22.1")
(defconst sieve-font-lock-keywords