aboutsummaryrefslogtreecommitdiffstats
path: root/src/xmenu.c
diff options
context:
space:
mode:
authorRichard M. Stallman1995-02-12 01:22:28 +0000
committerRichard M. Stallman1995-02-12 01:22:28 +0000
commit86e00a8a096d66c0825597998e671d27fc345467 (patch)
tree7ca4d2f44656946fa06a5d9bf2b38b46b179eb1b /src/xmenu.c
parenta5425c8d9a5234dc8cc3f2aef18a78f36db8ab24 (diff)
downloademacs-86e00a8a096d66c0825597998e671d27fc345467.tar.gz
emacs-86e00a8a096d66c0825597998e671d27fc345467.zip
(menu_item_equiv_key): If command is an alias,
check only the underlying command for a keyboard equivalent.
Diffstat (limited to 'src/xmenu.c')
-rw-r--r--src/xmenu.c6
1 files changed, 5 insertions, 1 deletions
diff --git a/src/xmenu.c b/src/xmenu.c
index 17d665ebc27..c2a37a8d93b 100644
--- a/src/xmenu.c
+++ b/src/xmenu.c
@@ -344,13 +344,17 @@ menu_item_equiv_key (item_string, item1, descrip_ptr)
344 { 344 {
345 changed = 1; 345 changed = 1;
346 descrip = Qnil; 346 descrip = Qnil;
347 savedkey = Fwhere_is_internal (def, Qnil, Qt, Qnil);
348 /* If the command is an alias for another 347 /* If the command is an alias for another
349 (such as easymenu.el and lmenu.el set it up), 348 (such as easymenu.el and lmenu.el set it up),
350 see if the original command name has equivalent keys. */ 349 see if the original command name has equivalent keys. */
351 if (SYMBOLP (def) && SYMBOLP (XSYMBOL (def)->function)) 350 if (SYMBOLP (def) && SYMBOLP (XSYMBOL (def)->function))
352 savedkey = Fwhere_is_internal (XSYMBOL (def)->function, 351 savedkey = Fwhere_is_internal (XSYMBOL (def)->function,
353 Qnil, Qt, Qnil); 352 Qnil, Qt, Qnil);
353 else
354 /* Otherwise look up the specified command itself.
355 We don't try both, because that makes easymenu menus slow. */
356 savedkey = Fwhere_is_internal (def, Qnil, Qt, Qnil);
357
354 358
355 if (VECTORP (savedkey) 359 if (VECTORP (savedkey)
356 && EQ (XVECTOR (savedkey)->contents[0], Qmenu_bar)) 360 && EQ (XVECTOR (savedkey)->contents[0], Qmenu_bar))