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];