From 6b3faad82b11e79694f2f1675c68c9d2ce111919 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 22 Sep 1994 07:41:35 +0000 Subject: [PATCH] (Fcompleting_read): Doc fix. (get_minibuffer): Make BUF current to kill its local vars. --- src/minibuf.c | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/src/minibuf.c b/src/minibuf.c index 1a359e91f51..3654c01d845 100644 --- a/src/minibuf.c +++ b/src/minibuf.c @@ -339,8 +339,13 @@ get_minibuffer (depth) } else { + int count = specpdl_ptr - specpdl; + reset_buffer (XBUFFER (buf)); - Fkill_all_local_variables (buf); + record_unwind_protect (Fset_buffer, Fcurrent_buffer ()); + Fset_buffer (buf); + Fkill_all_local_variables (); + unbind_to (count, Qnil); } return buf; @@ -925,7 +930,8 @@ Args: PROMPT, TABLE, PREDICATE, REQUIRE-MATCH, INITIAL-INPUT, HIST.\n\ PROMPT is a string to prompt with; normally it ends in a colon and a space.\n\ TABLE is an alist whose elements' cars are strings, or an obarray.\n\ PREDICATE limits completion to a subset of TABLE.\n\ -See `try-completion' for more details on completion, TABLE, and PREDICATE.\n\ +See `try-completion' and `all-completions' for more details + on completion, TABLE, and PREDICATE.\n\ \n\ If REQUIRE-MATCH is non-nil, the user is not allowed to exit unless\n\ the input is (or completes to) an element of TABLE or is null.\n\ -- 2.39.5