summaryrefslogtreecommitdiff
path: root/lisp/mail/rmailsum.el
diff options
context:
space:
mode:
authorStefan Kangas <stefan@marxist.se>2022-08-04 23:35:46 +0200
committerStefan Kangas <stefan@marxist.se>2022-08-04 23:35:46 +0200
commit8ea7506d724903008910bc47e88212da55549ede (patch)
tree7f60b2d8cfb8de5491893b024c025a6c478faab6 /lisp/mail/rmailsum.el
parent1c736c8c591979a9edaf350fa7d841d39f35ea58 (diff)
downloademacs-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.el9
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."