# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1182017538 0
# Node ID ea498370bc88e8c3a5e0e00f577f3aa61ec301e5
# Parent  b28852f88acf354b6d365a01f32e4bd9ecec4d69
(add_menu_item): Escape `&' characters in menu items and their keybindings.

diff -r b28852f88acf -r ea498370bc88 src/w32menu.c
--- a/src/w32menu.c	Sat Jun 16 12:50:37 2007 +0000
+++ b/src/w32menu.c	Sat Jun 16 18:12:18 2007 +0000
@@ -23,6 +23,7 @@
 #include <signal.h>
 
 #include <stdio.h>
+#include <mbstring.h>
 #include "lisp.h"
 #include "termhooks.h"
 #include "keyboard.h"
@@ -2261,8 +2262,9 @@
 add_menu_item (HMENU menu, widget_value *wv, HMENU item)
 {
   UINT fuFlags;
-  char *out_string;
+  char *out_string, *p, *q;
   int return_value;
+  size_t nlen, orig_len;
 
   if (name_is_separator (wv->name))
     {
@@ -2286,6 +2288,33 @@
       else
 	out_string = wv->name;
 
+      /* Quote any special characters within the menu item's text and
+	 key binding.  */
+      nlen = orig_len = strlen (out_string);
+      for (p = out_string; *p; p = _mbsinc (p))
+	{
+	  if (_mbsnextc (p) == '&')
+	    nlen++;
+	}
+      if (nlen > orig_len)
+	{
+	  p = out_string;
+	  out_string = alloca (nlen + 1);
+	  q = out_string;
+	  while (*p)
+	    {
+	      if (_mbsnextc (p) == '&')
+		{
+		  _mbsncpy (q, p, 1);
+		  q = _mbsinc (q);
+		}
+	      _mbsncpy (q, p, 1);
+	      p = _mbsinc (p);
+	      q = _mbsinc (q);
+	    }
+	  *q = '\0';
+	}
+
       if (item != NULL)
 	fuFlags = MF_POPUP;
       else if (wv->title || wv->call_data == 0)