Mercurial > emacs
changeset 45680:c9e70e34b426
(Vchar_property_alias_alist): New variable.
(syms_of_textprop) <Vchar_property_alias_alist>: DEFVAR_LISP.
| author | Colin Walters <walters@gnu.org> |
|---|---|
| date | Sat, 08 Jun 2002 20:24:35 +0000 |
| parents | 85f61bf6ce1d |
| children | 322be4c4e11d |
| files | src/textprop.c |
| diffstat | 1 files changed, 10 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/textprop.c Sat Jun 08 18:33:56 2002 +0000 +++ b/src/textprop.c Sat Jun 08 20:24:35 2002 +0000 @@ -70,6 +70,7 @@ Lisp_Object Vinhibit_point_motion_hooks; Lisp_Object Vdefault_text_properties; +Lisp_Object Vchar_property_alias_alist; Lisp_Object Vtext_property_default_nonsticky; /* verify_interval_modification saves insertion hooks here @@ -2177,6 +2178,15 @@ character that does not have its own value for that property. */); Vdefault_text_properties = Qnil; + DEFVAR_LISP ("char-property-alias-alist", &Vchar_property_alias_alist, + doc: /* Alist of alternative properties for properties without a value. +Each element should look like (PROPERTY ALTERNATIVE1 ALTERNATIVE2...). +If a piece of text has no direct value for a particular property, then +this alist is consulted. If that property appears in the alist, then +the first non-nil value from the associated alternative properties is +returned. */); + Vchar_property_alias_alist = Qnil; + DEFVAR_LISP ("inhibit-point-motion-hooks", &Vinhibit_point_motion_hooks, doc: /* If non-nil, don't run `point-left' and `point-entered' text properties. This also inhibits the use of the `intangible' text property. */);