# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 959949774 0
# Node ID ad856393dab204f18dd964d43c82f5732d989699
# Parent  141820271effa36465c8b3c70431fe47e93fce18
(signal_before_change, signal_after_change): Don't check
Vbefore_change_function, Vafter_change_function.

diff -r 141820271eff -r ad856393dab2 src/insdel.c
--- 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];