diff options
author | Stefan Kangas <stefan@marxist.se> | 2022-08-04 23:35:46 +0200 |
---|---|---|
committer | Stefan Kangas <stefan@marxist.se> | 2022-08-04 23:35:46 +0200 |
commit | 8ea7506d724903008910bc47e88212da55549ede (patch) | |
tree | 7f60b2d8cfb8de5491893b024c025a6c478faab6 /lisp/mail/rmailsum.el | |
parent | 1c736c8c591979a9edaf350fa7d841d39f35ea58 (diff) | |
download | emacs-8ea7506d724903008910bc47e88212da55549ede.tar.gz emacs-8ea7506d724903008910bc47e88212da55549ede.tar.bz2 emacs-8ea7506d724903008910bc47e88212da55549ede.zip |
Prefer defvar-keymap in mail/*.el
* lisp/mail/mspools.el (mspools-mode-map):
* lisp/mail/rmailedit.el (rmail-edit-map):
* lisp/mail/rmailsum.el (rmail-summary-edit-map):
* lisp/mail/supercite.el (sc-T-keymap, sc-mode-map)
(sc-electric-mode-map, sc-minibuffer-local-completion-map)
(sc-minibuffer-local-map): Prefer defvar-keymap.
Diffstat (limited to 'lisp/mail/rmailsum.el')
-rw-r--r-- | lisp/mail/rmailsum.el | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el index b23fbc3f600..cc76df718c2 100644 --- a/lisp/mail/rmailsum.el +++ b/lisp/mail/rmailsum.el @@ -1480,11 +1480,10 @@ argument says to read a file name and use that file as the inbox." (declare-function rmail-output-read-file-name "rmailout" ()) (declare-function mail-send-and-exit "sendmail" (&optional arg)) -(defvar rmail-summary-edit-map - (let ((map (nconc (make-sparse-keymap) text-mode-map))) - (define-key map "\C-c\C-c" #'rmail-cease-edit) - (define-key map "\C-c\C-]" #'rmail-abort-edit) - map)) +(defvar-keymap rmail-summary-edit-map + :parent text-mode-map + "C-c C-c" #'rmail-cease-edit + "C-c C-]" #'rmail-abort-edit) (defun rmail-summary-edit-current-message () "Edit the contents of this message." |