Mercurial > emacs
diff lisp/textmodes/texinfo.el @ 63229:72fae6758182
Revision: miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-393
Remove "-face" suffix from texinfo-heading face
2005-06-10 Miles Bader <miles@gnu.org>
* lisp/textmodes/texinfo.el (texinfo-heading): Remove "-face" suffix
from face name.
(texinfo-heading-face): New backward-compatibility alias for
renamed face.
(texinfo-heading-face): Use renamed texinfo-heading face.
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Fri, 10 Jun 2005 10:46:19 +0000 |
| parents | f2a72c23fa03 |
| children | 6807fe842dea a1b34dec1104 |
line wrap: on
line diff
--- a/lisp/textmodes/texinfo.el Fri Jun 10 10:45:56 2005 +0000 +++ b/lisp/textmodes/texinfo.el Fri Jun 10 10:46:19 2005 +0000 @@ -1,7 +1,7 @@ ;;; texinfo.el --- major mode for editing Texinfo files ;; Copyright (C) 1985, 1988, 1989, 1990, 1991, 1992, 1993, 1996, 1997, -;; 2000, 2001, 2003, 2004 Free Software Foundation, Inc. +;; 2000, 2001, 2003, 2004, 2005 Free Software Foundation, Inc. ;; Author: Robert J. Chassell ;; Date: [See date below for texinfo-version] @@ -343,11 +343,13 @@ "Regexp for environment-like Texinfo list commands. Subexpression 1 is what goes into the corresponding `@end' statement.") -(defface texinfo-heading-face +(defface texinfo-heading '((t (:inherit font-lock-function-name-face))) "Face used for section headings in `texinfo-mode'." :group 'texinfo) -(defvar texinfo-heading-face 'texinfo-heading-face) +;; backward-compatibility alias +(put 'texinfo-heading-face 'face-alias 'texinfo-heading) +(defvar texinfo-heading-face 'texinfo-heading) (defvar texinfo-font-lock-keywords `(;; All but the first had an OVERRIDE of t.