Mercurial > emacs
comparison src/keymap.c @ 4575:bf0f07186369
(describe_buffer_bindings): Declare shadow just once.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 11 Aug 1993 21:10:44 +0000 |
parents | 42faad1466fa |
children | 1fc792473491 |
comparison
equal
deleted
inserted
replaced
4574:503af6aa135b | 4575:bf0f07186369 |
---|---|
1681 nominal alternate\n\ | 1681 nominal alternate\n\ |
1682 ------- ---------\n"; | 1682 ------- ---------\n"; |
1683 | 1683 |
1684 descbuf = XCONS (arg)->car; | 1684 descbuf = XCONS (arg)->car; |
1685 prefix = XCONS (arg)->cdr; | 1685 prefix = XCONS (arg)->cdr; |
1686 shadow = Qnil; | |
1686 | 1687 |
1687 Fset_buffer (Vstandard_output); | 1688 Fset_buffer (Vstandard_output); |
1688 | 1689 |
1689 /* Report on alternates for keys. */ | 1690 /* Report on alternates for keys. */ |
1690 if (XTYPE (Vkeyboard_translate_table) == Lisp_String) | 1691 if (XTYPE (Vkeyboard_translate_table) == Lisp_String) |
1718 } | 1719 } |
1719 | 1720 |
1720 { | 1721 { |
1721 int i, nmaps; | 1722 int i, nmaps; |
1722 Lisp_Object *modes, *maps; | 1723 Lisp_Object *modes, *maps; |
1723 Lisp_Object shadow; | |
1724 | |
1725 shadow = Qnil; | |
1726 | 1724 |
1727 /* Temporarily switch to descbuf, so that we can get that buffer's | 1725 /* Temporarily switch to descbuf, so that we can get that buffer's |
1728 minor modes correctly. */ | 1726 minor modes correctly. */ |
1729 Fset_buffer (descbuf); | 1727 Fset_buffer (descbuf); |
1730 nmaps = current_minor_maps (&modes, &maps); | 1728 nmaps = current_minor_maps (&modes, &maps); |
1731 Fset_buffer (Vstandard_output); | 1729 Fset_buffer (Vstandard_output); |
1732 | |
1733 shadow = Qnil; | |
1734 | 1730 |
1735 /* Print the minor mode maps. */ | 1731 /* Print the minor mode maps. */ |
1736 for (i = 0; i < nmaps; i++) | 1732 for (i = 0; i < nmaps; i++) |
1737 { | 1733 { |
1738 /* Tht title for a minor mode keymap | 1734 /* Tht title for a minor mode keymap |