Mercurial > emacs
changeset 12298:7c4b729e4b21
(menu_item_equiv_key): Do reconsider a command that had
no equivalent before, if it is in Vdefine_key_rebound_commands.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 17 Jun 1995 23:48:10 +0000 |
| parents | fe458a8ecfa2 |
| children | d4e2494f12cb |
| files | src/xmenu.c |
| diffstat | 1 files changed, 9 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/src/xmenu.c Sat Jun 17 23:46:27 1995 +0000 +++ b/src/xmenu.c Sat Jun 17 23:48:10 1995 +0000 @@ -86,6 +86,8 @@ extern Lisp_Object Qmenu_bar; extern Lisp_Object Qmouse_click, Qevent_kind; +extern Lisp_Object Vdefine_key_rebound_commands; + #ifdef USE_X_TOOLKIT extern void process_expose_from_menu (); extern XtAppContext Xt_app_con; @@ -381,9 +383,13 @@ check if the original command matches the cached command. */ && !(SYMBOLP (def) && SYMBOLP (XSYMBOL (def)->function) && EQ (def1, XSYMBOL (def)->function)) - /* If something had no key binding before, don't recheck it-- - doing that takes too much time and makes menus too slow. */ - && !(!NILP (cachelist) && NILP (savedkey))) + /* If something had no key binding before, don't recheck it + because that is too slow--except if we have a list of rebound + commands in Vdefine_key_rebound_commands, do recheck any command + that appears in that list. */ + && (NILP (cachelist) || !NILP (savedkey) + || (! EQ (Qt, Vdefine_key_rebound_commands) + && !NILP (Fmemq (def, Vdefine_key_rebound_commands))))) { changed = 1; descrip = Qnil;