From: Karl Heuer Date: Fri, 16 Jun 1995 05:24:27 +0000 (+0000) Subject: (Fkey_binding, describe_buffer_bindings): X-Git-Tag: emacs-19.34~3597 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e784236dea01e06e6581a4e03db90fdeb253b77d;p=emacs.git (Fkey_binding, describe_buffer_bindings): Check Voverriding_terminal_local_map before Voverriding_local_map. --- diff --git a/src/keymap.c b/src/keymap.c index e89e9e4501e..57932de4d61 100644 --- a/src/keymap.c +++ b/src/keymap.c @@ -887,7 +887,14 @@ recognize the default bindings, just as `read-key-sequence' does.") GCPRO1 (key); - if (!NILP (Voverriding_local_map)) + if (!NILP (current_kboard->Voverriding_terminal_local_map)) + { + value = Flookup_key (current_kboard->Voverriding_terminal_local_map, + key, accept_default); + if (! NILP (value) && !INTEGERP (value)) + RETURN_UNGCPRO (value); + } + else if (!NILP (Voverriding_local_map)) { value = Flookup_key (Voverriding_local_map, key, accept_default); if (! NILP (value) && !INTEGERP (value)) @@ -1843,7 +1850,8 @@ nominal alternate\n\ /* Temporarily switch to descbuf, so that we can get that buffer's minor modes correctly. */ Fset_buffer (descbuf); - if (!NILP (Voverriding_local_map)) + if (!NILP (current_kboard->Voverriding_terminal_local_map) + || !NILP (Voverriding_local_map)) nmaps = 0; else nmaps = current_minor_maps (&modes, &maps); @@ -1877,7 +1885,9 @@ nominal alternate\n\ } /* Print the (major mode) local map. */ - if (!NILP (Voverriding_local_map)) + if (!NILP (current_kboard->Voverriding_terminal_local_map)) + start1 = current_kboard->Voverriding_terminal_local_map; + else if (!NILP (Voverriding_local_map)) start1 = Voverriding_local_map; else start1 = XBUFFER (descbuf)->keymap;