Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
5add3885
Commit
5add3885
authored
Mar 31, 1995
by
Richard M. Stallman
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
[MULTI_FRAME] (Factive_minibuffer_window): New function.
[MULTI_FRAME] (syms_of_frame): Defsubr it.
parent
2eebaacd
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
10 additions
and
1 deletion
+10
-1
src/frame.c
src/frame.c
+10
-1
No files found.
src/frame.c
View file @
5add3885
/* Generic frame functions.
Copyright (C) 1993, 1994 Free Software Foundation.
Copyright (C) 1993, 1994
, 1995
Free Software Foundation.
This file is part of GNU Emacs.
...
...
@@ -556,6 +556,14 @@ If omitted, FRAME defaults to the currently selected frame.")
return
w
;
}
DEFUN
(
"active-minibuffer-window"
,
Factive_minibuffer_window
,
Sactive_minibuffer_window
,
0
,
0
,
0
,
"Return the currently active minibuffer window, or nil if none."
)
()
{
return
minibuf_level
?
minibuf_window
:
Qnil
;
}
DEFUN
(
"frame-root-window"
,
Fframe_root_window
,
Sframe_root_window
,
0
,
1
,
0
,
"Returns the root-window of FRAME.
\n
\
If omitted, FRAME defaults to the currently selected frame."
)
...
...
@@ -1867,6 +1875,7 @@ The `menu-bar-lines' element of the list controls whether new frames\n\
have menu bars; `menu-bar-mode' works by altering this element."
);
Vdefault_frame_alist
=
Qnil
;
defsubr
(
&
Sactive_minibuffer_window
);
defsubr
(
&
Sframep
);
defsubr
(
&
Sframe_live_p
);
defsubr
(
&
Smake_terminal_frame
);
...
...
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