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
735eeca3
Commit
735eeca3
authored
Jan 09, 1996
by
Erik Naggum
Browse files
(Fhandle_switch_frame, Fset_frame_height): Harmonize arguments with
documentation.
parent
3e670702
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
9 additions
and
9 deletions
+9
-9
src/frame.c
src/frame.c
+9
-9
No files found.
src/frame.c
View file @
735eeca3
...
...
@@ -626,13 +626,13 @@ This function selects the selected window of the frame of EVENT.\n\
\n\
If EVENT is frame object, handle it as if it were a switch-frame event\n\
to that frame.")
(
frame
, no_enter)
Lisp_Object
frame
, no_enter;
(
event
, no_enter)
Lisp_Object
event
, no_enter;
{
/* Preserve prefix arg that the command loop just cleared. */
current_kboard->Vprefix_arg = Vcurrent_prefix_arg;
call1 (Vrun_hooks, Qmouse_leave_buffer_hook);
return do_switch_frame (
frame
, no_enter, 0);
return do_switch_frame (
event
, no_enter, 0);
}
DEFUN ("ignore-event", Fignore_event, Signore_event, 0, 0, "",
...
...
@@ -1876,12 +1876,12 @@ DEFUN ("set-frame-height", Fset_frame_height, Sset_frame_height, 2, 3, 0,
"Specify that the frame FRAME has LINES lines.\n\
Optional third arg non-nil means that redisplay should use LINES lines\n\
but that the idea of the actual height of the frame should not be changed.")
(frame,
row
s, pretend)
Lisp_Object frame,
row
s, pretend;
(frame,
line
s, pretend)
Lisp_Object frame,
line
s, pretend;
{
register struct frame *f;
CHECK_NUMBER (
row
s, 0);
CHECK_NUMBER (
line
s, 0);
if (NILP (frame))
f = selected_frame;
else
...
...
@@ -1894,12 +1894,12 @@ but that the idea of the actual height of the frame should not be changed.")
#ifdef HAVE_WINDOW_SYSTEM
if (FRAME_WINDOW_P (f))
{
if (XINT (
row
s) != f->height)
x_set_window_size (f, 1, f->width, XINT (
row
s));
if (XINT (
line
s) != f->height)
x_set_window_size (f, 1, f->width, XINT (
line
s));
}
else
#endif
change_frame_size (f, XINT (
row
s), 0, !NILP (pretend), 0);
change_frame_size (f, XINT (
line
s), 0, !NILP (pretend), 0);
return Qnil;
}
...
...
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