diff src/xfns.c @ 109290:1b5ca039f5f2

Fix faulty `if' statement in delete_frame. * frame.c (Qtooltip): New var. (delete_frame): Use it. Fix faulty if statement. Don't update mode line for tooltip frames. Suggested by Martin Rudalics. * xfns.c (x_create_tip_frame): * w32fns.c (x_create_tip_frame): Use it.
author Chong Yidong <cyd@stupidchicken.com>
date Fri, 02 Jul 2010 12:35:08 -0400
parents af52c11fa4bd
children 60516122d066 60266cf487b0
line wrap: on
line diff
--- a/src/xfns.c	Wed Jun 30 15:03:07 2010 -0700
+++ b/src/xfns.c	Fri Jul 02 12:35:08 2010 -0400
@@ -205,6 +205,8 @@
 
 /* The below are defined in frame.c.  */
 
+extern Lisp_Object Qtooltip;
+
 #if GLYPH_DEBUG
 int image_cache_refcount, dpyinfo_refcount;
 #endif
@@ -4914,9 +4916,8 @@
   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));
+  if (NILP (Fframe_parameter (frame, Qtooltip)))
+    Fmodify_frame_parameters (frame, Fcons (Fcons (Qtooltip, Qt), Qnil));
 
   /* FIXME - can this be done in a similar way to normal frames?
      http://lists.gnu.org/archive/html/emacs-devel/2007-10/msg00641.html */