procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Remove message.el face aliases obsolete since 22.1

Browse source 
* lisp/gnus/message.el: Remove face "-face" aliases,
obsolete since 22.1.
This commit is contained in:
Glenn Morris 2018-01-10 15:45:55 -05:00
parent 66d83ce011
commit 9e1664335c
1 changed files with 0 additions and 20 deletions
Download patch file Download diff file Expand all files Collapse all files

20
lisp/gnus/message.el
View file

@ -1435,8 +1435,6 @@ starting with `not' and followed by regexps."
:bold t :italic t))
"Face used for displaying To headers."
:group 'message-faces)
(define-obsolete-face-alias 'message-header-to-face
'message-header-to "22.1")
(defface message-header-cc
'((((class color)
@ -1449,8 +1447,6 @@ starting with `not' and followed by regexps."
:bold t))
"Face used for displaying Cc headers."
:group 'message-faces)
(define-obsolete-face-alias 'message-header-cc-face
'message-header-cc "22.1")
(defface message-header-subject
'((((class color)
@ -1463,8 +1459,6 @@ starting with `not' and followed by regexps."
:bold t))
"Face used for displaying Subject headers."
:group 'message-faces)
(define-obsolete-face-alias 'message-header-subject-face
'message-header-subject "22.1")
(defface message-header-newsgroups
'((((class color)
@ -1477,8 +1471,6 @@ starting with `not' and followed by regexps."
:bold t :italic t))
"Face used for displaying Newsgroups headers."
:group 'message-faces)
(define-obsolete-face-alias 'message-header-newsgroups-face
'message-header-newsgroups "22.1")
(defface message-header-other
'((((class color)
@ -1491,8 +1483,6 @@ starting with `not' and followed by regexps."
:bold t :italic t))
"Face used for displaying other headers."
:group 'message-faces)
(define-obsolete-face-alias 'message-header-other-face
'message-header-other "22.1")
(defface message-header-name
'((((class color)
@ -1505,8 +1495,6 @@ starting with `not' and followed by regexps."
:bold t))
"Face used for displaying header names."
:group 'message-faces)
(define-obsolete-face-alias 'message-header-name-face
'message-header-name "22.1")
(defface message-header-xheader
'((((class color)
@ -1519,8 +1507,6 @@ starting with `not' and followed by regexps."
:bold t))
"Face used for displaying X-Header headers."
:group 'message-faces)
(define-obsolete-face-alias 'message-header-xheader-face
'message-header-xheader "22.1")
(defface message-separator
'((((class color)
@ -1533,8 +1519,6 @@ starting with `not' and followed by regexps."
:bold t))
"Face used for displaying the separator."
:group 'message-faces)
(define-obsolete-face-alias 'message-separator-face
'message-separator "22.1")
(defface message-cited-text
'((((class color)
@ -1547,8 +1531,6 @@ starting with `not' and followed by regexps."
:bold t))
"Face used for displaying cited text names."
:group 'message-faces)
(define-obsolete-face-alias 'message-cited-text-face
'message-cited-text "22.1")
(defface message-mml
'((((class color)
@ -1561,8 +1543,6 @@ starting with `not' and followed by regexps."
:bold t))
"Face used for displaying MML."
:group 'message-faces)
(define-obsolete-face-alias 'message-mml-face
'message-mml "22.1")
(defun message-font-lock-make-header-matcher (regexp)
(let ((form