Commit 0142e36b authored by Glenn Morris's avatar Glenn Morris
Browse files

Mark face aliases with "-face" suffix as obsolete.

parent 2fb1ec93
...@@ -50,6 +50,11 @@ ...@@ -50,6 +50,11 @@
* eshell/em-prompt.el (eshell-prompt-face): * eshell/em-prompt.el (eshell-prompt-face):
* eshell/esh-test.el (eshell-test-ok-face, eshell-test-failed-face): * eshell/esh-test.el (eshell-test-ok-face, eshell-test-failed-face):
* obsolete/old-whitespace.el (whitespace-highlight-face): * obsolete/old-whitespace.el (whitespace-highlight-face):
* progmodes/antlr-mode.el (antlr-font-lock-default-face)
(antlr-font-lock-keyword-face, antlr-font-lock-syntax-face)
(antlr-font-lock-ruledef-face, antlr-font-lock-tokendef-face)
(antlr-font-lock-ruleref-face, antlr-font-lock-tokenref-face)
(antlr-font-lock-literal-face):
* progmodes/ebrowse.el (ebrowse-tree-mark-face) * progmodes/ebrowse.el (ebrowse-tree-mark-face)
(ebrowse-root-class-face, ebrowse-file-name-face) (ebrowse-root-class-face, ebrowse-file-name-face)
(ebrowse-default-face, ebrowse-member-attribute-face) (ebrowse-default-face, ebrowse-member-attribute-face)
......
...@@ -835,6 +835,7 @@ Do not change." ...@@ -835,6 +835,7 @@ Do not change."
:group 'antlr) :group 'antlr)
;; backward-compatibility alias ;; backward-compatibility alias
(put 'antlr-font-lock-default-face 'face-alias 'antlr-default) (put 'antlr-font-lock-default-face 'face-alias 'antlr-default)
(put 'antlr-font-lock-default-face 'obsolete-face "22.1")
(defvar antlr-keyword-face 'antlr-keyword) (defvar antlr-keyword-face 'antlr-keyword)
(defface antlr-keyword (defface antlr-keyword
...@@ -846,6 +847,7 @@ Do not change." ...@@ -846,6 +847,7 @@ Do not change."
:group 'antlr) :group 'antlr)
;; backward-compatibility alias ;; backward-compatibility alias
(put 'antlr-font-lock-keyword-face 'face-alias 'antlr-keyword) (put 'antlr-font-lock-keyword-face 'face-alias 'antlr-keyword)
(put 'antlr-font-lock-keyword-face 'obsolete-face "22.1")
(defvar antlr-syntax-face 'antlr-keyword) (defvar antlr-syntax-face 'antlr-keyword)
(defface antlr-syntax (defface antlr-syntax
...@@ -857,6 +859,7 @@ Do not change." ...@@ -857,6 +859,7 @@ Do not change."
:group 'antlr) :group 'antlr)
;; backward-compatibility alias ;; backward-compatibility alias
(put 'antlr-font-lock-syntax-face 'face-alias 'antlr-syntax) (put 'antlr-font-lock-syntax-face 'face-alias 'antlr-syntax)
(put 'antlr-font-lock-syntax-face 'obsolete-face "22.1")
(defvar antlr-ruledef-face 'antlr-ruledef) (defvar antlr-ruledef-face 'antlr-ruledef)
(defface antlr-ruledef (defface antlr-ruledef
...@@ -868,6 +871,7 @@ Do not change." ...@@ -868,6 +871,7 @@ Do not change."
:group 'antlr) :group 'antlr)
;; backward-compatibility alias ;; backward-compatibility alias
(put 'antlr-font-lock-ruledef-face 'face-alias 'antlr-ruledef) (put 'antlr-font-lock-ruledef-face 'face-alias 'antlr-ruledef)
(put 'antlr-font-lock-ruledef-face 'obsolete-face "22.1")
(defvar antlr-tokendef-face 'antlr-tokendef) (defvar antlr-tokendef-face 'antlr-tokendef)
(defface antlr-tokendef (defface antlr-tokendef
...@@ -879,6 +883,7 @@ Do not change." ...@@ -879,6 +883,7 @@ Do not change."
:group 'antlr) :group 'antlr)
;; backward-compatibility alias ;; backward-compatibility alias
(put 'antlr-font-lock-tokendef-face 'face-alias 'antlr-tokendef) (put 'antlr-font-lock-tokendef-face 'face-alias 'antlr-tokendef)
(put 'antlr-font-lock-tokendef-face 'obsolete-face "22.1")
(defvar antlr-ruleref-face 'antlr-ruleref) (defvar antlr-ruleref-face 'antlr-ruleref)
(defface antlr-ruleref (defface antlr-ruleref
...@@ -888,6 +893,7 @@ Do not change." ...@@ -888,6 +893,7 @@ Do not change."
:group 'antlr) :group 'antlr)
;; backward-compatibility alias ;; backward-compatibility alias
(put 'antlr-font-lock-ruleref-face 'face-alias 'antlr-ruleref) (put 'antlr-font-lock-ruleref-face 'face-alias 'antlr-ruleref)
(put 'antlr-font-lock-ruleref-face 'obsolete-face "22.1")
(defvar antlr-tokenref-face 'antlr-tokenref) (defvar antlr-tokenref-face 'antlr-tokenref)
(defface antlr-tokenref (defface antlr-tokenref
...@@ -897,6 +903,7 @@ Do not change." ...@@ -897,6 +903,7 @@ Do not change."
:group 'antlr) :group 'antlr)
;; backward-compatibility alias ;; backward-compatibility alias
(put 'antlr-font-lock-tokenref-face 'face-alias 'antlr-tokenref) (put 'antlr-font-lock-tokenref-face 'face-alias 'antlr-tokenref)
(put 'antlr-font-lock-tokenref-face 'obsolete-face "22.1")
(defvar antlr-literal-face 'antlr-literal) (defvar antlr-literal-face 'antlr-literal)
(defface antlr-literal (defface antlr-literal
...@@ -910,6 +917,7 @@ It is used to highlight strings matched by the first regexp group of ...@@ -910,6 +917,7 @@ It is used to highlight strings matched by the first regexp group of
:group 'antlr) :group 'antlr)
;; backward-compatibility alias ;; backward-compatibility alias
(put 'antlr-font-lock-literal-face 'face-alias 'antlr-literal) (put 'antlr-font-lock-literal-face 'face-alias 'antlr-literal)
(put 'antlr-font-lock-literal-face 'obsolete-face "22.1")
(defcustom antlr-font-lock-literal-regexp "\"\\(\\sw\\(\\sw\\|-\\)*\\)\"" (defcustom antlr-font-lock-literal-regexp "\"\\(\\sw\\(\\sw\\|-\\)*\\)\""
"Regexp matching literals with special syntax highlighting, or nil. "Regexp matching literals with special syntax highlighting, or nil.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment