Commit c3649419 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files


For insertion, run the insert-before-hooks and insert-after-hooks,
not the modification-hooks.
parent e58aa385
......@@ -1473,11 +1473,11 @@ verify_interval_modification (buf, start, end)
error ("Attempt to insert within read-only text");
/* Run both mod hooks (just once if they're the same). */
/* Run both insert hooks (just once if they're the same). */
if (!NULL_INTERVAL_P (prev))
prev_mod_hooks = textget (prev->plist, Qmodification_hooks);
prev_mod_hooks = textget (prev->plist, Qinsert_after_hooks);
mod_hooks = textget (i->plist, Qmodification_hooks);
mod_hooks = textget (i->plist, Qinsert_before_hooks);
GCPRO1 (mod_hooks);
if (! NILP (prev_mod_hooks))
call_mod_hooks (prev_mod_hooks, make_number (start),
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment