Mercurial > emacs
changeset 4242:49007dbbec4c
(syms_of_textprop): Set up Lisp var Vinhibit_point_motion_hooks.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 23 Jul 1993 07:58:22 +0000 |
| parents | 64cfb6d569e4 |
| children | 23fe7f6c9ae4 |
| files | src/textprop.c |
| diffstat | 1 files changed, 7 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/textprop.c Fri Jul 23 07:57:57 1993 +0000 +++ b/src/textprop.c Fri Jul 23 07:58:22 1993 +0000 @@ -55,6 +55,8 @@ traversing plists. */ #define PLIST_ELT_P(o1, o2) (CONSP (o1) && CONSP ((o2) = XCONS (o1)->cdr)) +Lisp_Object Vinhibit_point_motion_hooks; + /* Extract the interval at the position pointed to by BEGIN from OBJECT, a string or buffer. Additionally, check that the positions @@ -1178,6 +1180,11 @@ percentage by which the left interval tree should not differ from the right."); interval_balance_threshold = 8; + DEFVAR_LISP ("inhibit-point-motion-hooks", &Vinhibit_point_motion_hooks, + "If nonnil, don't call the text property values of\n\ +`point-left' and `point-entered'."); + Vinhibit_point_motion_hooks = Qnil; + /* Common attributes one might give text */ staticpro (&Qforeground);