Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
be15a518
Commit
be15a518
authored
Sep 13, 1996
by
Richard M. Stallman
Browse files
(read_minibuf): If not in minibuffer window,
cancel the active minibuffer.
parent
adabc3a9
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
9 additions
and
3 deletions
+9
-3
src/minibuf.c
src/minibuf.c
+9
-3
No files found.
src/minibuf.c
View file @
be15a518
...
...
@@ -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. */
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment