From 30e13e562470bdbf36dacbf166b32c18491807df Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 14 Mar 1995 21:15:08 +0000 Subject: [PATCH] (read_minibuf): Save Voverriding_local_map. (read_minibuf_unwind): Restore Voverriding_local_map. --- src/minibuf.c | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/src/minibuf.c b/src/minibuf.c index b2230f672ef..f473ad86a3f 100644 --- a/src/minibuf.c +++ b/src/minibuf.c @@ -98,6 +98,8 @@ Lisp_Object Quser_variable_p; /* Non-nil means it is the window for C-M-v to scroll when the minibuffer is selected. */ extern Lisp_Object Vminibuf_scroll_window; + +extern Lisp_Object Voverriding_local_map; /* Actual minibuffer invocation. */ @@ -160,7 +162,8 @@ read_minibuf (map, initial, prompt, backup_n, expflag, histvar, histpos) Fcons (Vcurrent_prefix_arg, Fcons (Vminibuffer_history_position, Fcons (Vminibuffer_history_variable, - minibuf_save_list)))))); + Fcons (Voverriding_local_map, + minibuf_save_list))))))); minibuf_prompt_width = 0; /* xdisp.c puts in the right value. */ minibuf_prompt = Fcopy_sequence (prompt); Vminibuffer_history_position = histpos; @@ -403,6 +406,8 @@ read_minibuf_unwind (data) minibuf_save_list = Fcdr (minibuf_save_list); Vminibuffer_history_variable = Fcar (minibuf_save_list); minibuf_save_list = Fcdr (minibuf_save_list); + Voverriding_local_map = Fcar (minibuf_save_list); + minibuf_save_list = Fcdr (minibuf_save_list); } -- 2.39.5