diff options
Diffstat (limited to 'lisp/gnus/gnus-eform.el')
-rw-r--r-- | lisp/gnus/gnus-eform.el | 13 |
1 files changed, 5 insertions, 8 deletions
diff --git a/lisp/gnus/gnus-eform.el b/lisp/gnus/gnus-eform.el index dc10e3cbce0..96f515119dc 100644 --- a/lisp/gnus/gnus-eform.el +++ b/lisp/gnus/gnus-eform.el @@ -48,13 +48,10 @@ (defvar gnus-edit-form-buffer "*Gnus edit form*") (defvar gnus-edit-form-done-function nil) -(defvar gnus-edit-form-mode-map - (let ((map (make-sparse-keymap))) - (set-keymap-parent map emacs-lisp-mode-map) - (gnus-define-keys map - "\C-c\C-c" gnus-edit-form-done - "\C-c\C-k" gnus-edit-form-exit) - map)) +(defvar-keymap gnus-edit-form-mode-map + :parent emacs-lisp-mode-map + "C-c C-c" #'gnus-edit-form-done + "C-c C-k" #'gnus-edit-form-exit) (defun gnus-edit-form-make-menu-bar () (unless (boundp 'gnus-edit-form-menu) @@ -95,7 +92,7 @@ The optional LAYOUT overrides the `edit-form' window layout." (insert ";;; ") (forward-line 1)) (insert (substitute-command-keys - ";; Type `C-c C-c' after you've finished editing.\n")) + ";; Type \\`C-c C-c' after you've finished editing.\n")) (insert "\n") (let ((p (point))) (gnus-pp form) |