comparison src/insdel.c @ 23400:8a51c720f8d7

(signal_before_change): If inhibit_modification_hooks is nonzero, do nothing. (signal_after_change): Likewise.
author Kenichi Handa <handa@m17n.org>
date Thu, 08 Oct 1998 06:45:36 +0000
parents 6df1b016f5fc
children 84276318b663
comparison
equal deleted inserted replaced
23399:e80c5f687340 23400:8a51c720f8d7
2318 Lisp_Object start, end; 2318 Lisp_Object start, end;
2319 Lisp_Object start_marker, end_marker; 2319 Lisp_Object start_marker, end_marker;
2320 Lisp_Object preserve_marker; 2320 Lisp_Object preserve_marker;
2321 struct gcpro gcpro1, gcpro2, gcpro3; 2321 struct gcpro gcpro1, gcpro2, gcpro3;
2322 2322
2323 if (inhibit_modification_hooks)
2324 return;
2325
2323 start = make_number (start_int); 2326 start = make_number (start_int);
2324 end = make_number (end_int); 2327 end = make_number (end_int);
2325 preserve_marker = Qnil; 2328 preserve_marker = Qnil;
2326 start_marker = Qnil; 2329 start_marker = Qnil;
2327 end_marker = Qnil; 2330 end_marker = Qnil;
2404 2407
2405 void 2408 void
2406 signal_after_change (charpos, lendel, lenins) 2409 signal_after_change (charpos, lendel, lenins)
2407 int charpos, lendel, lenins; 2410 int charpos, lendel, lenins;
2408 { 2411 {
2412 if (inhibit_modification_hooks)
2413 return;
2414
2409 /* If we are deferring calls to the after-change functions 2415 /* If we are deferring calls to the after-change functions
2410 and there are no before-change functions, 2416 and there are no before-change functions,
2411 just record the args that we were going to use. */ 2417 just record the args that we were going to use. */
2412 if (! NILP (Vcombine_after_change_calls) 2418 if (! NILP (Vcombine_after_change_calls)
2413 && NILP (Vbefore_change_function) && NILP (Vbefore_change_functions) 2419 && NILP (Vbefore_change_function) && NILP (Vbefore_change_functions)