Mercurial > emacs
comparison src/keymap.c @ 12262:a7d5578ebb25
(Fkey_binding, describe_buffer_bindings):
Check Voverriding_terminal_local_map before Voverriding_local_map.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Fri, 16 Jun 1995 05:24:27 +0000 |
parents | 43b030e896eb |
children | fe458a8ecfa2 |
comparison
equal
deleted
inserted
replaced
12261:cd2e7821bbf5 | 12262:a7d5578ebb25 |
---|---|
885 int nmaps, i; | 885 int nmaps, i; |
886 struct gcpro gcpro1; | 886 struct gcpro gcpro1; |
887 | 887 |
888 GCPRO1 (key); | 888 GCPRO1 (key); |
889 | 889 |
890 if (!NILP (Voverriding_local_map)) | 890 if (!NILP (current_kboard->Voverriding_terminal_local_map)) |
891 { | |
892 value = Flookup_key (current_kboard->Voverriding_terminal_local_map, | |
893 key, accept_default); | |
894 if (! NILP (value) && !INTEGERP (value)) | |
895 RETURN_UNGCPRO (value); | |
896 } | |
897 else if (!NILP (Voverriding_local_map)) | |
891 { | 898 { |
892 value = Flookup_key (Voverriding_local_map, key, accept_default); | 899 value = Flookup_key (Voverriding_local_map, key, accept_default); |
893 if (! NILP (value) && !INTEGERP (value)) | 900 if (! NILP (value) && !INTEGERP (value)) |
894 RETURN_UNGCPRO (value); | 901 RETURN_UNGCPRO (value); |
895 } | 902 } |
1841 Lisp_Object *modes, *maps; | 1848 Lisp_Object *modes, *maps; |
1842 | 1849 |
1843 /* Temporarily switch to descbuf, so that we can get that buffer's | 1850 /* Temporarily switch to descbuf, so that we can get that buffer's |
1844 minor modes correctly. */ | 1851 minor modes correctly. */ |
1845 Fset_buffer (descbuf); | 1852 Fset_buffer (descbuf); |
1846 if (!NILP (Voverriding_local_map)) | 1853 if (!NILP (current_kboard->Voverriding_terminal_local_map) |
1854 || !NILP (Voverriding_local_map)) | |
1847 nmaps = 0; | 1855 nmaps = 0; |
1848 else | 1856 else |
1849 nmaps = current_minor_maps (&modes, &maps); | 1857 nmaps = current_minor_maps (&modes, &maps); |
1850 Fset_buffer (Vstandard_output); | 1858 Fset_buffer (Vstandard_output); |
1851 | 1859 |
1875 shadow = Fcons (maps[i], shadow); | 1883 shadow = Fcons (maps[i], shadow); |
1876 } | 1884 } |
1877 } | 1885 } |
1878 | 1886 |
1879 /* Print the (major mode) local map. */ | 1887 /* Print the (major mode) local map. */ |
1880 if (!NILP (Voverriding_local_map)) | 1888 if (!NILP (current_kboard->Voverriding_terminal_local_map)) |
1889 start1 = current_kboard->Voverriding_terminal_local_map; | |
1890 else if (!NILP (Voverriding_local_map)) | |
1881 start1 = Voverriding_local_map; | 1891 start1 = Voverriding_local_map; |
1882 else | 1892 else |
1883 start1 = XBUFFER (descbuf)->keymap; | 1893 start1 = XBUFFER (descbuf)->keymap; |
1884 | 1894 |
1885 if (!NILP (start1)) | 1895 if (!NILP (start1)) |