Cleanup tooltips

[gnu-emacs] / src / menu.c

diff --git a/src/menu.c b/src/menu.c
index 90bb19a2e94059d48ebf8c6a2fc36e093e97b984..675caff6b8877f5ad96bd654bdcc1e385cd5e6db 100644 (file)
--- a/src/menu.c
+++ b/src/menu.c
@@ -1400,7 +1400,12 @@ no quit occurs and `x-popup-menu' returns nil.  */)
 #ifdef HAVE_WINDOW_SYSTEM
   /* Hide a previous tip, if any.  */
   if (!FRAME_TERMCAP_P (f))
-    Fx_hide_tip ();
+    {
+      Lisp_Object frame;
+
+      XSETFRAME (frame, f);
+      Fx_hide_tip (frame);
+    }
 #endif
 
 #ifdef HAVE_NTGUI     /* FIXME: Is it really w32-specific?  --Stef  */