diff options
author | Alex Branham <alex.branham@gmail.com> | 2019-01-21 09:50:11 -0600 |
---|---|---|
committer | Eli Zaretskii <eliz@gnu.org> | 2019-01-25 10:47:57 +0200 |
commit | f52de87166062934735db995d45c1bcb07faaf7f (patch) | |
tree | 93221134e79cbf7a120e2f08ec5073ef3280723f /lisp/emacs-lisp | |
parent | a2f7ed5e705f7b48e9038b5a1c9def1c45ee8fcf (diff) | |
download | emacs-f52de87166062934735db995d45c1bcb07faaf7f.tar.gz emacs-f52de87166062934735db995d45c1bcb07faaf7f.tar.bz2 emacs-f52de87166062934735db995d45c1bcb07faaf7f.zip |
Make tabulated-list-mode-map inherit from special-mode-map
* lisp/emacs-lisp/tabulated-list.el (tabulated-list-mode-map): Use
'make-composed-keymap'.
Bug #30452
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/tabulated-list.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/tabulated-list.el b/lisp/emacs-lisp/tabulated-list.el index 6fdca2cd083..12d0151d67f 100644 --- a/lisp/emacs-lisp/tabulated-list.el +++ b/lisp/emacs-lisp/tabulated-list.el @@ -151,8 +151,10 @@ If ADVANCE is non-nil, move forward by one line afterwards." (forward-line))) (defvar tabulated-list-mode-map - (let ((map (copy-keymap special-mode-map))) - (set-keymap-parent map button-buffer-map) + (let ((map (make-sparse-keymap))) + (set-keymap-parent map (make-composed-keymap + button-buffer-map + special-mode-map)) (define-key map "n" 'next-line) (define-key map "p" 'previous-line) (define-key map "S" 'tabulated-list-sort) |