aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1995-11-18 15:58:54 +0000
committerRichard M. Stallman1995-11-18 15:58:54 +0000
commitbeea50e4154cc223d21287d70bb3fb56a48790f0 (patch)
treeb69f42181a4c38aa81d1ff3387beebb732d72835
parentc5c4b51cc68d84b6cf3db933ac595c95e54de104 (diff)
downloademacs-beea50e4154cc223d21287d70bb3fb56a48790f0.tar.gz
emacs-beea50e4154cc223d21287d70bb3fb56a48790f0.zip
(Fexecute_extended_command):
Call Fwhere_is_internal just once to handle all the maps.
-rw-r--r--src/keyboard.c12
1 files changed, 3 insertions, 9 deletions
diff --git a/src/keyboard.c b/src/keyboard.c
index ee31c02f478..74614ce2f10 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -6565,16 +6565,10 @@ DEFUN ("execute-extended-command", Fexecute_extended_command, Sexecute_extended_
6565 if (!NILP (Vsuggest_key_bindings) 6565 if (!NILP (Vsuggest_key_bindings)
6566 && SYMBOLP (function)) 6566 && SYMBOLP (function))
6567 { 6567 {
6568 Lisp_Object *maps, bindings; 6568 Lisp_Object bindings;
6569 int nmaps, i;
6570 6569
6571 bindings = Qnil; 6570 bindings = Fwhere_is_internal (function, Voverriding_local_map,
6572 nmaps = current_active_maps (&maps); 6571 Qt, Qnil);
6573
6574 for (i = 0; i < nmaps && NILP (bindings); i++)
6575 bindings = Fwhere_is_internal (function, maps[i], Qt, Qnil);
6576
6577 free (maps);
6578 6572
6579 if (!NILP (bindings)) 6573 if (!NILP (bindings))
6580 { 6574 {