diff options
| author | Gerd Moellmann <gerd@gnu.org> | 2000-10-24 12:27:45 +0000 |
|---|---|---|
| committer | Gerd Moellmann <gerd@gnu.org> | 2000-10-24 12:27:45 +0000 |
| commit | 7f779379f6cbef2513f74813130b8da8e0d38c28 (patch) | |
| tree | eaaedbb7056b5e452c1af083929711ca4be1d15f /lisp/wid-edit.el | |
| parent | bc35d341cab38b8dce45d04cd25a6dfcd8b03d8c (diff) | |
| download | emacs-7f779379f6cbef2513f74813130b8da8e0d38c28.tar.gz | |
(widget-field-keymap, widget-text-keymap): Define
the tool-bar map as nil, as for the menu-bar. Otherwise, we'll
get duplicate tool-bar entries because we'll see the global ones
on more than one path through keymaps.
Diffstat (limited to 'lisp/wid-edit.el')
| -rw-r--r-- | lisp/wid-edit.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el index a17d6b83e5b..debbf510f4f 100644 --- a/lisp/wid-edit.el +++ b/lisp/wid-edit.el @@ -781,6 +781,7 @@ Recommended as a parent keymap for modes using widgets.") (defvar widget-field-keymap (let ((map (copy-keymap widget-keymap))) (define-key map [menu-bar] nil) + (define-key map [tool-bar] nil) (define-key map "\C-k" 'widget-kill-line) (define-key map "\M-\t" 'widget-complete) (define-key map "\C-m" 'widget-field-activate) @@ -792,7 +793,8 @@ Recommended as a parent keymap for modes using widgets.") (defvar widget-text-keymap (let ((map (copy-keymap widget-keymap))) - (define-key map [menu-bar] 'nil) + (define-key map [menu-bar] nil) + (define-key map [tool-bar] nil) (define-key map "\C-a" 'widget-beginning-of-line) (define-key map "\C-e" 'widget-end-of-line) (set-keymap-parent map global-map) |