diff options
| author | Po Lu <luangruo@yahoo.com> | 2021-12-09 10:30:18 +0800 |
|---|---|---|
| committer | Po Lu <luangruo@yahoo.com> | 2021-12-09 10:30:18 +0800 |
| commit | 47cd820d93d282da484ae91e68021736ed7994bc (patch) | |
| tree | a24229d1df8547dfd427ef97cf9968b7f5a1e7a8 /lisp/emacs-lisp | |
| parent | 41b1d223c6ab7bca1b626a4c07a4f2dda2855feb (diff) | |
| parent | 63f07ea22f3954c2154d831017caf494911cb515 (diff) | |
| download | emacs-47cd820d93d282da484ae91e68021736ed7994bc.tar.gz emacs-47cd820d93d282da484ae91e68021736ed7994bc.tar.bz2 emacs-47cd820d93d282da484ae91e68021736ed7994bc.zip | |
Merge remote-tracking branch 'origin/master' into feature/pgtk
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/shortdoc.el | 14 |
1 files changed, 6 insertions, 8 deletions
diff --git a/lisp/emacs-lisp/shortdoc.el b/lisp/emacs-lisp/shortdoc.el index ba08e68af57..5c51e257eb0 100644 --- a/lisp/emacs-lisp/shortdoc.el +++ b/lisp/emacs-lisp/shortdoc.el @@ -1423,14 +1423,12 @@ Example: (setq slist (cdr slist))) (setcdr slist (cons elem (cdr slist)))))) -(defvar shortdoc-mode-map - (let ((map (make-sparse-keymap))) - (define-key map (kbd "n") 'shortdoc-next) - (define-key map (kbd "p") 'shortdoc-previous) - (define-key map (kbd "C-c C-n") 'shortdoc-next-section) - (define-key map (kbd "C-c C-p") 'shortdoc-previous-section) - map) - "Keymap for `shortdoc-mode'.") +(defvar-keymap shortdoc-mode-map + :doc "Keymap for `shortdoc-mode'." + "n" #'shortdoc-next + "p" #'shortdoc-previous + "C-c C-n" #'shortdoc-next-section + "C-c C-p" #'shortdoc-previous-section) (define-derived-mode shortdoc-mode special-mode "shortdoc" "Mode for shortdoc." |