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
2d8e7e1f
Commit
2d8e7e1f
authored
Nov 11, 1996
by
Richard M. Stallman
Browse files
Include frame.h and window.h.
(Fy_or_n_p): Handle minibuffer_auto_raise here.
parent
9afd2168
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
14 additions
and
0 deletions
+14
-0
src/fns.c
src/fns.c
+14
-0
No files found.
src/fns.c
View file @
2d8e7e1f
...
...
@@ -32,6 +32,8 @@ Boston, MA 02111-1307, USA. */
#include "buffer.h"
#include "keyboard.h"
#include "intervals.h"
#include "frame.h"
#include "window.h"
#ifndef NULL
#define NULL (void *)0
...
...
@@ -39,6 +41,9 @@ Boston, MA 02111-1307, USA. */
extern
Lisp_Object
Flookup_key
();
extern
int
minibuffer_auto_raise
;
extern
Lisp_Object
minibuf_window
;
Lisp_Object
Qstring_lessp
,
Qprovide
,
Qrequire
;
Lisp_Object
Qyes_or_no_p_history
;
Lisp_Object
Qcursor_in_echo_area
;
...
...
@@ -1612,6 +1617,15 @@ Also accepts Space to mean yes, or Delete to mean no.")
choose_minibuf_frame
();
message_nolog
(
"%s(y or n) "
,
XSTRING
(
xprompt
)
->
data
);
if
(
minibuffer_auto_raise
)
{
Lisp_Object
mini_frame
;
mini_frame
=
WINDOW_FRAME
(
XWINDOW
(
minibuf_window
));
Fraise_frame
(
mini_frame
);
}
obj
=
read_filtered_event
(
1
,
0
,
0
);
cursor_in_echo_area
=
0
;
/* If we need to quit, quit with cursor_in_echo_area = 0. */
...
...
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