From c24e1160ff40c156e0d0a7b9f7ab89587bd11111 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 24 Sep 1994 01:41:54 +0000 Subject: [PATCH] (read_minibuf_unwind): Preserve Vdeactivate_mark. --- src/minibuf.c | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/src/minibuf.c b/src/minibuf.c index 3654c01d845..d5f75bd35b7 100644 --- a/src/minibuf.c +++ b/src/minibuf.c @@ -358,6 +358,8 @@ void 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 @@ read_minibuf_unwind (data) /* 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 */ -- 2.39.5