]> git.eshelyaron.com Git - emacs.git/commitdiff
(read_minibuf): If not in minibuffer window,
authorRichard M. Stallman <rms@gnu.org>
Fri, 13 Sep 1996 18:25:17 +0000 (18:25 +0000)
committerRichard M. Stallman <rms@gnu.org>
Fri, 13 Sep 1996 18:25:17 +0000 (18:25 +0000)
cancel the active minibuffer.

src/minibuf.c

index db6d5f05cffa9c8ab8ae6abcaf5553bbd74008dd..b9fc7fa5dd60eb419c36a1e63b0a6178bd65abf7 100644 (file)
@@ -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.  */