Mercurial > emacs

comparison src/w32menu.c @ 41251:e6612d08452f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(w32_menu_show, push_menu_pane): Doc fixes.
author Jason Rumney <jasonr@gnu.org>
date Sun, 18 Nov 2001 21:58:26 +0000
parents ef7a153a2c68
children d797ce338b4b
comparison
equal deleted inserted replaced
41250:4423b32c875c 41251:e6612d08452f
331 grow_menu_items (); 331 grow_menu_items ();
332 332
333 XVECTOR (menu_items)->contents[menu_items_used++] = Qquote; 333 XVECTOR (menu_items)->contents[menu_items_used++] = Qquote;
334 } 334 }
335 335
336 /* Start a new menu pane in menu_items.. 336 /* Start a new menu pane in menu_items.
337 NAME is the pane name. PREFIX_VEC is a prefix key for this pane. */ 337 NAME is the pane name. PREFIX_VEC is a prefix key for this pane. */
338 338
339 static void 339 static void
340 push_menu_pane (name, prefix_vec) 340 push_menu_pane (name, prefix_vec)
341 Lisp_Object name, prefix_vec; 341 Lisp_Object name, prefix_vec;
1701 wv->name = (char *) XSTRING (item_name)->data; 1701 wv->name = (char *) XSTRING (item_name)->data;
1702 if (!NILP (descrip)) 1702 if (!NILP (descrip))
1703 wv->key = (char *) XSTRING (descrip)->data; 1703 wv->key = (char *) XSTRING (descrip)->data;
1704 wv->value = 0; 1704 wv->value = 0;
1705 /* Use the contents index as call_data, since we are 1705 /* Use the contents index as call_data, since we are
1706 restricted to 16-bits.. */ 1706 restricted to 16-bits. */
1707 wv->call_data = !NILP (def) ? (void *) (EMACS_INT) i : 0; 1707 wv->call_data = !NILP (def) ? (void *) (EMACS_INT) i : 0;
1708 wv->enabled = !NILP (enable); 1708 wv->enabled = !NILP (enable);
1709 1709
1710 if (NILP (type)) 1710 if (NILP (type))
1711 wv->button_type = BUTTON_TYPE_NONE; 1711 wv->button_type = BUTTON_TYPE_NONE;