* w32menu.c (w32_menu_display_help):

* xmenu.c (menu_help_callback): Use show_help_echo.

diff --git a/src/w32menu.c b/src/w32menu.c
index c047045ff7ea7d67cd25334c06cd872161f5ff61..37be85c6b3b45060e2de21bc069d26ec13422781 100644 (file)
--- a/src/w32menu.c
+++ b/src/w32menu.c
@@ -2158,9 +2158,6 @@ w32_menu_display_help (HMENU menu, UINT item, UINT flags)
 
   if (get_menu_item_info)
     {
-      struct gcpro gcpro1;
-      extern Lisp_Object Vshow_help_function;
-      Lisp_Object msg;
       MENUITEMINFO info;
 
       bzero (&info, sizeof (info));
@@ -2168,19 +2165,8 @@ w32_menu_display_help (HMENU menu, UINT item, UINT flags)
       info.fMask = MIIM_DATA;
       get_menu_item_info (menu, item, FALSE, &info);
 
-      msg = info.dwItemData ? build_string ((char *) info.dwItemData) : Qnil;
-      GCPRO1 (msg);
-
-      if (!NILP (Vshow_help_function))
-        call1 (Vshow_help_function, msg);
-      else if (!MINI_WINDOW_P (XWINDOW (selected_window)))
-        {
-          if (STRINGP(msg))
-            message3_nolog (msg, XSTRING (msg)->size, STRING_MULTIBYTE (msg));
-          else
-            message (0);
-        }
-      UNGCPRO;
+      show_help_echo (info.dwItemData ?
+                     build_string ((char *) info.dwItemData) : Qnil);
     }
 }
 

diff --git a/src/xmenu.c b/src/xmenu.c
index 1cdfe3a923bfa13f40f67f4f78cc8929b95ad826..16292673df263255af139012bb6dc3a1af921541 100644 (file)
--- a/src/xmenu.c
+++ b/src/xmenu.c
@@ -2488,24 +2488,7 @@ static void
 menu_help_callback (help_string)
      char *help_string;
 {
-  Lisp_Object msg;
-  extern Lisp_Object Vshow_help_function;
-  struct gcpro gcpro1;
-
-  msg = help_string ? build_string (help_string) : Qnil;
-  GCPRO1 (msg);
-  
-  if (!NILP (Vshow_help_function))
-    call1 (Vshow_help_function, msg);
-  else if (!MINI_WINDOW_P (XWINDOW (selected_window)))
-    {
-      if (STRINGP (msg))
-       message3_nolog (msg, XSTRING (msg)->size, STRING_MULTIBYTE (msg));
-      else
-       message (0);
-    }
-
-  UNGCPRO;
+  show_help_echo (help_string ? build_string (help_string) : Qnil);
 }