procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(syms_of_frame) <delete-frame-functions>: Fix typo in docstring.

Browse source
This commit is contained in:
Juanma Barranquero 2007-10-26 01:59:44 +00:00
parent 0bde6a03c6
commit a3547743e7
2 changed files with 28 additions and 23 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/ChangeLog
View file

@ -1,3 +1,8 @@
2007-10-26 Juanma Barranquero <lekktu@gmail.com>
* frame.c (syms_of_frame) <delete-frame-functions>:
Fix typo in docstring.
2007-10-25 Juanma Barranquero <lekktu@gmail.com>
* w32.c (init_environment): Fix tiny memory leak.

46
src/frame.c
View file

@ -260,7 +260,7 @@ FRAME defaults to the currently selected frame. */)
return Qnil;
else
return type;
}
}
struct frame *
make_frame (mini_p)
@ -546,10 +546,10 @@ make_initial_frame (void)
f->terminal = terminal;
f->terminal->reference_count++;
f->output_data.nothing = 0;
FRAME_FOREGROUND_PIXEL (f) = FACE_TTY_DEFAULT_FG_COLOR;
FRAME_BACKGROUND_PIXEL (f) = FACE_TTY_DEFAULT_BG_COLOR;
FRAME_CAN_HAVE_SCROLL_BARS (f) = 0;
FRAME_VERTICAL_SCROLL_BAR_TYPE (f) = vertical_scroll_bar_none;
@ -611,10 +611,10 @@ make_terminal_frame (struct terminal *terminal)
f->terminal = terminal;
f->terminal->reference_count++;
create_tty_output (f);
FRAME_FOREGROUND_PIXEL (f) = FACE_TTY_DEFAULT_FG_COLOR;
FRAME_BACKGROUND_PIXEL (f) = FACE_TTY_DEFAULT_BG_COLOR;
FRAME_CAN_HAVE_SCROLL_BARS (f) = 0;
FRAME_VERTICAL_SCROLL_BAR_TYPE (f) = vertical_scroll_bar_none;
@ -622,10 +622,10 @@ make_terminal_frame (struct terminal *terminal)
if (FRAMEP (FRAME_TTY (f)->top_frame)
&& FRAME_LIVE_P (XFRAME (FRAME_TTY (f)->top_frame)))
XFRAME (FRAME_TTY (f)->top_frame)->async_visible = 2; /* obscured */
FRAME_TTY (f)->top_frame = frame;
}
#ifdef CANNOT_DUMP
FRAME_FOREGROUND_PIXEL(f) = FACE_TTY_DEFAULT_FG_COLOR;
FRAME_BACKGROUND_PIXEL(f) = FACE_TTY_DEFAULT_BG_COLOR;
@ -709,7 +709,7 @@ affects all frames on the same terminal device. */)
#endif
#endif
#endif /* not MSDOS */
{
Lisp_Object terminal;
@ -720,9 +720,9 @@ affects all frames on the same terminal device. */)
t = get_terminal (terminal, 1);
}
}
if (!t)
{
{
char *name = 0, *type = 0;
Lisp_Object tty, tty_type;
@ -736,7 +736,7 @@ affects all frames on the same terminal device. */)
strncpy (name, SDATA (tty), SBYTES (tty));
name[SBYTES (tty)] = 0;
}
tty_type = get_future_frame_param
(Qtty_type, parms, (FRAME_TERMCAP_P (XFRAME (selected_frame))
? FRAME_TTY (XFRAME (selected_frame))->type
@ -758,7 +758,7 @@ affects all frames on the same terminal device. */)
get_tty_size (fileno (FRAME_TTY (f)->input), &width, &height);
change_frame_size (f, height, width, 0, 0, 0);
}
adjust_glyphs (f);
calculate_costs (f);
XSETFRAME (frame, f);
@ -773,7 +773,7 @@ affects all frames on the same terminal device. */)
Qnil));
else
Fmodify_frame_parameters (frame, Fcons (Fcons (Qtty, Qnil), Qnil));
/* Make the frame face alist be frame-specific, so that each
frame could change its face definitions independently. */
f->face_alist = Fcopy_alist (sf->face_alist);
@ -1519,7 +1519,7 @@ The functions are run with one arg, the frame to be deleted. */)
{
struct terminal *terminal = FRAME_TERMINAL (f);
f->output_data.nothing = 0;
f->output_data.nothing = 0;
f->terminal = 0; /* Now the frame is dead. */
/* If needed, delete the terminal that this frame was on.
@ -2026,7 +2026,7 @@ doesn't support multiple overlapping frames, this function does nothing. */)
CHECK_LIVE_FRAME (frame);
f = XFRAME (frame);
/* Do like the documentation says. */
Fmake_frame_visible (frame);
@ -2046,14 +2046,14 @@ doesn't support multiple overlapping frames, this function does nothing. */)
Lisp_Object frame;
{
struct frame *f;
if (NILP (frame))
frame = selected_frame;
CHECK_LIVE_FRAME (frame);
f = XFRAME (frame);
if (FRAME_TERMINAL (f)->frame_raise_lower_hook)
(*FRAME_TERMINAL (f)->frame_raise_lower_hook) (f, 0);
@ -2090,7 +2090,7 @@ The redirection lasts until `redirect-frame-focus' is called to change it. */)
Lisp_Object frame, focus_frame;
{
struct frame *f;
/* Note that we don't check for a live frame here. It's reasonable
to redirect the focus of a frame you're about to delete, if you
know what other frame should receive those keystrokes. */
@ -2100,7 +2100,7 @@ The redirection lasts until `redirect-frame-focus' is called to change it. */)
CHECK_LIVE_FRAME (focus_frame);
f = XFRAME (frame);
f->focus_frame = focus_frame;
if (FRAME_TERMINAL (f)->frame_rehighlight_hook)
@ -3289,7 +3289,7 @@ x_set_fullscreen (f, new_value, old_value)
else if (EQ (new_value, Qfullheight))
f->want_fullscreen = FULLSCREEN_HEIGHT;
if (FRAME_TERMINAL (f)->fullscreen_hook != NULL)
if (FRAME_TERMINAL (f)->fullscreen_hook != NULL)
FRAME_TERMINAL (f)->fullscreen_hook (f);
}
@ -4315,7 +4315,7 @@ syms_of_frame ()
staticpro (&Qterminal);
Qterminal_live_p = intern ("terminal-live-p");
staticpro (&Qterminal_live_p);
{
int i;
@ -4417,7 +4417,7 @@ Note that functions in this list may be called twice on the same
frame. In the second invocation, the frame is already deleted, and
the function should do nothing. (You can use `frame-live-p' to check
for this.) This wrinkle happens when an earlier function in
`delete-frame-functions' (indirectly) calls delete-frame
`delete-frame-functions' (indirectly) calls `delete-frame'
recursively. */);
Vdelete_frame_functions = Qnil;
@ -4450,7 +4450,7 @@ automatically. */);
#else
focus_follows_mouse = 0;
#endif
staticpro (&Vframe_list);
defsubr (&Sactive_minibuffer_window);