changeset 9049:522a9e03ca05

(read_minibuf_unwind): Preserve Vdeactivate_mark.
author Richard M. Stallman <rms@gnu.org>
date Sat, 24 Sep 1994 01:41:54 +0000
parents dc5a9c83dc35
children 953e5ea2b8ea
files src/minibuf.c
diffstat 1 files changed, 5 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/minibuf.c	Sat Sep 24 01:27:46 1994 +0000
+++ b/src/minibuf.c	Sat Sep 24 01:41:54 1994 +0000
@@ -358,6 +358,8 @@
 read_minibuf_unwind (data)
      Lisp_Object data;
 {
+  Lisp_Object old_deactivate_mark;
+
   /* We are exiting the minibuffer one way or the other,
      so run the hook.  */
   if (!NILP (Vminibuffer_exit_hook) && !EQ (Vminibuffer_exit_hook, Qunbound)
@@ -369,7 +371,10 @@
 
   /* Prevent error in erase-buffer.  */
   current_buffer->read_only = Qnil;
+
+  old_deactivate_mark = Vdeactivate_mark;
   Ferase_buffer ();
+  Vdeactivate_mark = old_deactivate_mark;
 
   /* If this was a recursive minibuffer,
      tie the minibuffer window back to the outer level minibuffer buffer */