From: Richard M. Stallman Date: Sat, 18 Nov 1995 15:58:54 +0000 (+0000) Subject: (Fexecute_extended_command): X-Git-Tag: emacs-19.34~2278 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=beea50e4154cc223d21287d70bb3fb56a48790f0;p=emacs.git (Fexecute_extended_command): Call Fwhere_is_internal just once to handle all the maps. --- 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_ if (!NILP (Vsuggest_key_bindings) && SYMBOLP (function)) { - Lisp_Object *maps, bindings; - int nmaps, i; + Lisp_Object bindings; - bindings = Qnil; - nmaps = current_active_maps (&maps); - - for (i = 0; i < nmaps && NILP (bindings); i++) - bindings = Fwhere_is_internal (function, maps[i], Qt, Qnil); - - free (maps); + bindings = Fwhere_is_internal (function, Voverriding_local_map, + Qt, Qnil); if (!NILP (bindings)) {