Mercurial > emacs
diff src/macfns.c @ 47731:755c4233cfba
* frame.c (Vdelete_frame_functions): New variable.
(syms_of_frame): Initialize and defvar it.
(Fdelete_frame): Use it instead of delete-frame-hook. Don't run
it when frame's `tooltip' parameter is non-nil.
* xfns.c (x_create_tip_frame): Set `tooltip' frame parameter to t.
* w32fns.c (x_create_tip_frame): Likewise
* macfns.c (x_create_tip_frame): Likewise.
| author | John Paul Wallington <jpw@pobox.com> |
|---|---|
| date | Wed, 02 Oct 2002 08:28:17 +0000 |
| parents | fc811b81d1a3 |
| children | 080b4586492b |
line wrap: on
line diff
--- a/src/macfns.c Tue Oct 01 20:27:23 2002 +0000 +++ b/src/macfns.c Wed Oct 02 08:28:17 2002 +0000 @@ -9471,6 +9471,11 @@ f->height = 0; SET_FRAME_WIDTH (f, 0); change_frame_size (f, height, width, 1, 0, 0); + + /* Add `tooltip' frame parameter's default value. */ + if (NILP (Fframe_parameter (frame, intern ("tooltip")))) + Fmodify_frame_parameters (frame, Fcons (Fcons (intern ("tooltip"), Qt), + Qnil)); f->no_split = 1;
