From a93fc4f1323cbd354957943db98a12ae231ec5c2 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 13 Sep 1996 18:25:17 +0000 Subject: (read_minibuf): If not in minibuffer window, cancel the active minibuffer. --- src/minibuf.c | 12 +++++++++--- 1 file changed, 9 insertions(+), 3 deletions(-) diff --git a/src/minibuf.c b/src/minibuf.c index db6d5f05cff..b9fc7fa5dd6 100644 --- a/src/minibuf.c +++ b/src/minibuf.c @@ -191,9 +191,15 @@ read_minibuf (map, initial, prompt, backup_n, expflag, histvar, histpos) prompt = build_string (""); if (!enable_recursive_minibuffers - && minibuf_level > 0 - && (EQ (selected_window, minibuf_window))) - error ("Command attempted to use minibuffer while in minibuffer"); + && minibuf_level > 0) + { + if (EQ (selected_window, minibuf_window)) + error ("Command attempted to use minibuffer while in minibuffer"); + else + /* If we're in another window, cancel the minibuffer that's active. */ + Fthrow (Qexit, + build_string ("Command attempted to use minibuffer while in minibuffer")); + } /* Choose the minibuffer window and frame, and take action on them. */ -- cgit v1.2.1