mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-18 18:05:07 +00:00
Code Issues Releases Activity

(read_minibuf_unwind): Bind inhibit-modification-hooks.

Browse Source
This commit is contained in:
Gerd Moellmann 2001-09-11 16:11:08 +00:00
parent a41edd99c5
commit bd819d14fd
2 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/ChangeLog
View File

@ -1,5 +1,7 @@
2001-09-11 Gerd Moellmann <gerd@gnu.org> 2001-09-11 Gerd Moellmann <gerd@gnu.org>
* minibuf.c (read_minibuf_unwind): Bind inhibit-modification-hooks.
* minibuf.c (read_minibuf): Bind inhibit-modification-hooks to t, * minibuf.c (read_minibuf): Bind inhibit-modification-hooks to t,
in addition to read-only. in addition to read-only.

1
src/minibuf.c
View File

@ -742,6 +742,7 @@ read_minibuf_unwind (data)
int count = specpdl_ptr - specpdl; int count = specpdl_ptr - specpdl;
/* Prevent error in erase-buffer. */ /* Prevent error in erase-buffer. */
specbind (Qinhibit_read_only, Qt); specbind (Qinhibit_read_only, Qt);
specbind (Qinhibit_modification_hooks, Qt);
old_deactivate_mark = Vdeactivate_mark; old_deactivate_mark = Vdeactivate_mark;
Ferase_buffer (); Ferase_buffer ();
Vdeactivate_mark = old_deactivate_mark; Vdeactivate_mark = old_deactivate_mark;