diff options
| author | Stefan Kangas <stefankangas@gmail.com> | 2022-09-13 15:05:28 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefankangas@gmail.com> | 2022-09-13 15:05:38 +0200 |
| commit | aac4965702d3d8c665e13e8c8c7f6fb229b05097 (patch) | |
| tree | af8ce215a68d6aab37a9bc8eba9f3bc5a82b0960 /lisp/calc/calc-yank.el | |
| parent | 280b40cd8a46b325768f757ae9b50064524a46e1 (diff) | |
| download | emacs-aac4965702d3d8c665e13e8c8c7f6fb229b05097.tar.gz emacs-aac4965702d3d8c665e13e8c8c7f6fb229b05097.tar.bz2 emacs-aac4965702d3d8c665e13e8c8c7f6fb229b05097.zip | |
Prefer defvar-keymap in several cases
* lisp/calc/calc-embed.el (calc-override-minor-modes-map):
* lisp/calc/calc-yank.el (calc-edit-mode-map):
* lisp/calc/calc.el (calc-trail-mode-map):
* lisp/cedet/semantic/mru-bookmark.el (semantic-mru-bookmark-mode-map):
* lisp/cedet/semantic/util-modes.el (semantic-highlight-edits-mode-map)
(semantic-show-unmatched-syntax-mode-map)
(semantic-show-parser-state-mode-map)
(semantic-stickyfunc-mode-map, semantic-highlight-func-mode-map):
* lisp/cedet/srecode/srt-mode.el (srecode-template-mode-map):
* lisp/gnus/gnus-art.el (gnus-prev-page-map, gnus-next-page-map):
* lisp/gnus/gnus-search.el (gnus-search-minibuffer-map):
* lisp/gnus/score-mode.el (gnus-score-mode-map):
* lisp/gnus/smime.el (smime-mode-map):
* lisp/indent.el (edit-tab-stops-map):
* lisp/isearch.el (minibuffer-local-isearch-map):
* lisp/printing.el (pr-interface-map):
* lisp/progmodes/prog-mode.el (prog-mode-map):
* lisp/progmodes/subword.el (subword-mode-map):
* lisp/reveal.el (reveal-mode-map):
* lisp/strokes.el (strokes-mode-map):
* lisp/textmodes/flyspell.el (flyspell-mouse-map):
* lisp/textmodes/less-css-mode.el (less-css-mode-map):
* lisp/textmodes/remember.el (remember-mode-map)
(remember-notes-mode-map):
* lisp/wid-browse.el (widget-browse-mode-map):
* lisp/wid-edit.el (widget-key-sequence-map): Prefer defvar-keymap in
some easy-to-convert cases.
Diffstat (limited to 'lisp/calc/calc-yank.el')
| -rw-r--r-- | lisp/calc/calc-yank.el | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/lisp/calc/calc-yank.el b/lisp/calc/calc-yank.el index 504ba5b40d1..35014e022be 100644 --- a/lisp/calc/calc-yank.el +++ b/lisp/calc/calc-yank.el @@ -668,13 +668,11 @@ Interactively, reads the register using `register-read-with-preview'." (backward-char 1) (calc-set-command-flag 'do-edit)) -(defvar calc-edit-mode-map - (let ((map (make-sparse-keymap))) - (define-key map "\n" #'calc-edit-finish) - (define-key map "\r" #'calc-edit-return) - (define-key map "\C-c\C-c" #'calc-edit-finish) - map) - "Keymap for use by the `calc-edit' command.") +(defvar-keymap calc-edit-mode-map + :doc "Keymap for use by the `calc-edit' command." + "C-j" #'calc-edit-finish + "RET" #'calc-edit-return + "C-c C-c" #'calc-edit-finish) (defvar calc-original-buffer nil) (defvar calc-return-buffer nil) |