* 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.

1 files changed, 5 insertions, 0 deletions

diff --git a/src/macfns.c b/src/macfns.c
index 49e4aad78ca..f1e42d17aec 100644
--- a/src/macfns.c
+++ b/src/macfns.c
@@ -9471,6 +9471,11 @@ x_create_tip_frame (dpyinfo, parms)
   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;