aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorRichard M. Stallman1994-06-07 18:31:56 +0000
committerRichard M. Stallman1994-06-07 18:31:56 +0000
commitcc1032b3f376281e724c2f2903a6e5f23ec42db7 (patch)
tree2bc7ac66f350bd7d883647cc5bcdd1e42bc6393a /src
parent6ee37df2e65931026cb3c46b9359ab79d8027dc1 (diff)
downloademacs-cc1032b3f376281e724c2f2903a6e5f23ec42db7.tar.gz
emacs-cc1032b3f376281e724c2f2903a6e5f23ec42db7.zip
(menu_item_equiv_key): Check whether def1 matches
un-aliased command name as well as given command name.
Diffstat (limited to 'src')
-rw-r--r--src/xmenu.c5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/xmenu.c b/src/xmenu.c
index a00bcb1a78b..3a0e2137cbe 100644
--- a/src/xmenu.c
+++ b/src/xmenu.c
@@ -324,6 +324,11 @@ menu_item_equiv_key (item_string, item1, descrip_ptr)
324 def1 = Fkey_binding (savedkey, Qnil); 324 def1 = Fkey_binding (savedkey, Qnil);
325 /* If not, update it. */ 325 /* If not, update it. */
326 if (! EQ (def1, def) 326 if (! EQ (def1, def)
327 /* If the command is an alias for another
328 (such as easymenu.el and lmenu.el set it up),
329 check if the original command matches the cached command. */
330 && !(SYMBOLP (def) && SYMBOLP (XSYMBOL (def)->function)
331 && EQ (def1, XSYMBOL (def)->function))
327 /* If something had no key binding before, don't recheck it-- 332 /* If something had no key binding before, don't recheck it--
328 doing that takes too much time and makes menus too slow. */ 333 doing that takes too much time and makes menus too slow. */
329 && !(!NILP (cachelist) && NILP (savedkey))) 334 && !(!NILP (cachelist) && NILP (savedkey)))