aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorKenichi Handa1997-11-27 11:38:17 +0000
committerKenichi Handa1997-11-27 11:38:17 +0000
commit9c3a25140571c3e9b8e1cbef7d58f955ea46ba7b (patch)
tree32573f0060723bb7fcb1bb8f1f1b0f68611fcb7e /src
parent07a592697d726bbf22f845d09d724f1c015f6246 (diff)
downloademacs-9c3a25140571c3e9b8e1cbef7d58f955ea46ba7b.tar.gz
emacs-9c3a25140571c3e9b8e1cbef7d58f955ea46ba7b.zip
(Fexecute_extended_command): Give Voverriding_local_map as the
first arg to Faref.
Diffstat (limited to 'src')
-rw-r--r--src/keyboard.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/keyboard.c b/src/keyboard.c
index 952b9117a3d..142fa40afeb 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -7261,7 +7261,8 @@ DEFUN ("execute-extended-command", Fexecute_extended_command, Sexecute_extended_
7261 7261
7262 /* If the command has a key binding, print it now. */ 7262 /* If the command has a key binding, print it now. */
7263 if (!NILP (bindings) 7263 if (!NILP (bindings)
7264 && ! (ARRAYP (bindings) && EQ (Faref (bindings), Qmouse_movement))) 7264 && ! (ARRAYP (bindings)
7265 && EQ (Faref (Voverriding_local_map, bindings), Qmouse_movement)))
7265 { 7266 {
7266 /* But first wait, and skip the message if there is input. */ 7267 /* But first wait, and skip the message if there is input. */
7267 if (!NILP (Fsit_for ((NUMBERP (Vsuggest_key_bindings) 7268 if (!NILP (Fsit_for ((NUMBERP (Vsuggest_key_bindings)
@@ -7534,7 +7535,6 @@ On such systems, Emacs starts a subshell instead of suspending.")
7534 int old_height, old_width; 7535 int old_height, old_width;
7535 int width, height; 7536 int width, height;
7536 struct gcpro gcpro1, gcpro2; 7537 struct gcpro gcpro1, gcpro2;
7537 extern init_sys_modes ();
7538 7538
7539 if (!NILP (stuffstring)) 7539 if (!NILP (stuffstring))
7540 CHECK_STRING (stuffstring, 0); 7540 CHECK_STRING (stuffstring, 0);