diff options
| author | Richard M. Stallman | 1994-05-23 06:32:59 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-05-23 06:32:59 +0000 |
| commit | 8aa034e1fbfe26de0d4d4f3eb21854d0e12f729f (patch) | |
| tree | c6f2ca145fbef328f3295e31b83ada1ea03e7a8a /src | |
| parent | cc4ee3c7c6185805523b41957e5a1dcfd0f7759e (diff) | |
| download | emacs-8aa034e1fbfe26de0d4d4f3eb21854d0e12f729f.tar.gz emacs-8aa034e1fbfe26de0d4d4f3eb21854d0e12f729f.zip | |
(menu_bar_one_keymap):
When there's no item string, use Qnil.
Don't ever put `undefined' into the list of definitions.
Diffstat (limited to 'src')
| -rw-r--r-- | src/keyboard.c | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/src/keyboard.c b/src/keyboard.c index d29903b375b..7179e3a5321 100644 --- a/src/keyboard.c +++ b/src/keyboard.c | |||
| @@ -3758,7 +3758,7 @@ menu_bar_one_keymap (keymap) | |||
| 3758 | menu_bar_item (key, item_string, Fcdr (binding)); | 3758 | menu_bar_item (key, item_string, Fcdr (binding)); |
| 3759 | } | 3759 | } |
| 3760 | else if (EQ (binding, Qundefined)) | 3760 | else if (EQ (binding, Qundefined)) |
| 3761 | menu_bar_item (key, item_string, binding); | 3761 | menu_bar_item (key, Qnil, binding); |
| 3762 | } | 3762 | } |
| 3763 | else if (XTYPE (item) == Lisp_Vector) | 3763 | else if (XTYPE (item) == Lisp_Vector) |
| 3764 | { | 3764 | { |
| @@ -3777,7 +3777,7 @@ menu_bar_one_keymap (keymap) | |||
| 3777 | menu_bar_item (key, item_string, Fcdr (binding)); | 3777 | menu_bar_item (key, item_string, Fcdr (binding)); |
| 3778 | } | 3778 | } |
| 3779 | else if (EQ (binding, Qundefined)) | 3779 | else if (EQ (binding, Qundefined)) |
| 3780 | menu_bar_item (key, item_string, binding); | 3780 | menu_bar_item (key, Qnil, binding); |
| 3781 | } | 3781 | } |
| 3782 | } | 3782 | } |
| 3783 | } | 3783 | } |
| @@ -3818,6 +3818,10 @@ menu_bar_item (key, item_string, def) | |||
| 3818 | menu_bar_items_index -= 3; | 3818 | menu_bar_items_index -= 3; |
| 3819 | return; | 3819 | return; |
| 3820 | } | 3820 | } |
| 3821 | |||
| 3822 | /* If there's no definition for this key yet, | ||
| 3823 | just ignore `undefined'. */ | ||
| 3824 | return; | ||
| 3821 | } | 3825 | } |
| 3822 | 3826 | ||
| 3823 | /* See if this entry is enabled. */ | 3827 | /* See if this entry is enabled. */ |