Mercurial > emacs
changeset 63196:72620d384ae2
Revision: miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-367
Remove "-face" suffix from compilation faces
2005-06-10 Miles Bader <miles@gnu.org>
* lisp/progmodes/compile.el (compilation-warning-face)
(compilation-info-face): Remove "-face" suffix from face names.
(compilation-warning-face, compilation-info-face):
New backward-compatibility aliases for renamed faces.
(compilation-warning-face, compilation-info-face):
Use renamed compilation faces.
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Fri, 10 Jun 2005 07:34:16 +0000 |
| parents | d4857c25a45b |
| children | ce2a9eb0ff8a |
| files | lisp/ChangeLog lisp/progmodes/compile.el |
| diffstat | 2 files changed, 15 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Fri Jun 10 07:26:14 2005 +0000 +++ b/lisp/ChangeLog Fri Jun 10 07:34:16 2005 +0000 @@ -1,5 +1,12 @@ 2005-06-10 Miles Bader <miles@gnu.org> + * progmodes/compile.el (compilation-warning-face) + (compilation-info-face): Remove "-face" suffix from face names. + (compilation-warning-face, compilation-info-face): + New backward-compatibility aliases for renamed faces. + (compilation-warning-face, compilation-info-face): + Use renamed compilation faces. + * add-log.el (change-log-date, change-log-name) (change-log-email, change-log-file, change-log-list) (change-log-conditionals, change-log-function)
--- a/lisp/progmodes/compile.el Fri Jun 10 07:26:14 2005 +0000 +++ b/lisp/progmodes/compile.el Fri Jun 10 07:34:16 2005 +0000 @@ -468,15 +468,17 @@ ;; History of compile commands. (defvar compile-history nil) -(defface compilation-warning-face +(defface compilation-warning '((((class color) (min-colors 16)) (:foreground "Orange" :weight bold)) (((class color)) (:foreground "cyan" :weight bold)) (t (:weight bold))) "Face used to highlight compiler warnings." :group 'font-lock-highlighting-faces :version "22.1") +;; backward-compatibility alias +(put 'compilation-warning-face 'face-alias 'compilation-warning) -(defface compilation-info-face +(defface compilation-info '((((class color) (min-colors 16) (background light)) (:foreground "Green3" :weight bold)) (((class color) (min-colors 88) (background dark)) @@ -488,6 +490,8 @@ "Face used to highlight compiler warnings." :group 'font-lock-highlighting-faces :version "22.1") +;; backward-compatibility alias +(put 'compilation-info-face 'face-alias 'compilation-info) (defvar compilation-message-face nil "Face name to use for whole messages. @@ -498,10 +502,10 @@ (defvar compilation-error-face 'font-lock-warning-face "Face name to use for file name in error messages.") -(defvar compilation-warning-face 'compilation-warning-face +(defvar compilation-warning-face 'compilation-warning "Face name to use for file name in warning messages.") -(defvar compilation-info-face 'compilation-info-face +(defvar compilation-info-face 'compilation-info "Face name to use for file name in informational messages.") (defvar compilation-line-face 'font-lock-variable-name-face