# HG changeset patch # User Karl Heuer # Date 803280968 0 # Node ID 6ceecf7d1ec3143af5f2825dddef091578e88738 # Parent a7d5578ebb25f4477e9a96807f10c66cbebae425 (Qoverriding_terminal_local_map): New variable. (syms_of_xdisp): staticpro it. (update_menu_bar): If we bind overriding-local-map, also bind overriding-terminal-local-map. diff -r a7d5578ebb25 -r 6ceecf7d1ec3 src/xdisp.c --- a/src/xdisp.c Fri Jun 16 05:24:27 1995 +0000 +++ b/src/xdisp.c Fri Jun 16 05:36:08 1995 +0000 @@ -48,7 +48,7 @@ extern Lisp_Object Voverriding_local_map; extern Lisp_Object Voverriding_local_map_menu_flag; -Lisp_Object Qoverriding_local_map; +Lisp_Object Qoverriding_local_map, Qoverriding_terminal_local_map; /* Nonzero means print newline to stdout before next minibuffer message. */ @@ -1268,7 +1268,10 @@ if (save_match_data) record_unwind_protect (Fstore_match_data, Fmatch_data ()); if (NILP (Voverriding_local_map_menu_flag)) - specbind (Qoverriding_local_map, Qnil); + { + specbind (Qoverriding_terminal_local_map, Qnil); + specbind (Qoverriding_local_map, Qnil); + } /* Run the Lucid hook. */ call1 (Vrun_hooks, Qactivate_menubar_hook); @@ -4057,6 +4060,9 @@ staticpro (&Qmenu_bar_update_hook); Qmenu_bar_update_hook = intern ("menu-bar-update-hook"); + staticpro (&Qoverriding_terminal_local_map); + Qoverriding_local_map = intern ("overriding-terminal-local-map"); + staticpro (&Qoverriding_local_map); Qoverriding_local_map = intern ("overriding-local-map");