Mercurial > emacs
changeset 29379:ad856393dab2
(signal_before_change, signal_after_change): Don't check
Vbefore_change_function, Vafter_change_function.
author | Dave Love <fx@gnu.org> |
---|---|
date | Fri, 02 Jun 2000 12:42:54 +0000 |
parents | 141820271eff |
children | 23090a9f86f4 |
files | src/insdel.c |
diffstat | 1 files changed, 1 insertions(+), 19 deletions(-) [+] |
line wrap: on
line diff
--- a/src/insdel.c Fri Jun 02 12:42:20 2000 +0000 +++ b/src/insdel.c Fri Jun 02 12:42:54 2000 +0000 @@ -1878,16 +1878,6 @@ call1 (Vrun_hooks, Qfirst_change_hook); } - /* Run the before-change-function if any. - We don't bother "binding" this variable to nil - because it is obsolete anyway and new code should not use it. */ - if (!NILP (Vbefore_change_function)) - { - PRESERVE_VALUE; - PRESERVE_START_END; - call2 (Vbefore_change_function, FETCH_START, FETCH_END); - } - /* Now run the before-change-functions if any. */ if (!NILP (Vbefore_change_functions)) { @@ -1954,7 +1944,7 @@ and there are no before-change functions, just record the args that we were going to use. */ if (! NILP (Vcombine_after_change_calls) - && NILP (Vbefore_change_function) && NILP (Vbefore_change_functions) + && NILP (Vbefore_change_functions) && NILP (current_buffer->overlays_before) && NILP (current_buffer->overlays_after)) { @@ -1977,14 +1967,6 @@ if (!NILP (combine_after_change_list)) Fcombine_after_change_execute (); - /* Run the after-change-function if any. - We don't bother "binding" this variable to nil - because it is obsolete anyway and new code should not use it. */ - if (!NILP (Vafter_change_function)) - call3 (Vafter_change_function, - make_number (charpos), make_number (charpos + lenins), - make_number (lendel)); - if (!NILP (Vafter_change_functions)) { Lisp_Object args[4];