Mercurial > hg > xemacs-beta

comparison src/menubar.c @ 177:6075d714658b r20-3b15

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b15
author cvs
date Mon, 13 Aug 2007 09:51:16 +0200
parents 2d532a89d707
children 3d6bfa290dbd
comparison
equal deleted inserted replaced
176:6866abce6aaf 177:6075d714658b
176 struct frame *f = decode_frame(Qnil); 176 struct frame *f = decode_frame(Qnil);
177 MAYBE_FRAMEMETH (f, popup_menu, (menu_desc,event)); 177 MAYBE_FRAMEMETH (f, popup_menu, (menu_desc,event));
178 return Qnil; 178 return Qnil;
179 } 179 }
180 180
181 DEFUN ("accelerate-menu", Faccelerate_menu, 0, 0, "_", /*
182 Make the menubar active. Menu items can be selected using menu accelerators
183 or by actions defined in menu-accelerator-map.
184 */
185 ())
186 {
187 event_menu_accelerate ();
188 return Qnil;
189 }
190
191 void 181 void
192 syms_of_menubar (void) 182 syms_of_menubar (void)
193 { 183 {
194 defsymbol (&Qcurrent_menubar, "current-menubar"); 184 defsymbol (&Qcurrent_menubar, "current-menubar");
195 DEFSUBR (Fpopup_menu); 185 DEFSUBR (Fpopup_menu);
196 DEFSUBR (Faccelerate_menu);
197 } 186 }
198 187
199 void 188 void
200 vars_of_menubar (void) 189 vars_of_menubar (void)
201 { 190 {