diff options
author | Glenn Morris <rgm@gnu.org> | 2009-03-04 04:20:13 +0000 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2009-03-04 04:20:13 +0000 |
commit | 24683c51e3680440544592133c81374ed1a007d7 (patch) | |
tree | 8c00167b0e0a03cad246db55daa7b0ba02ae2fe3 /lisp/mail/rmailedit.el | |
parent | 65ad19205b90fdd29ef5786613e6a67e3ec11d4e (diff) | |
download | emacs-24683c51e3680440544592133c81374ed1a007d7.tar.gz |
(rmail-edit-mode): Doc fix.
Diffstat (limited to 'lisp/mail/rmailedit.el')
-rw-r--r-- | lisp/mail/rmailedit.el | 17 |
1 files changed, 8 insertions, 9 deletions
diff --git a/lisp/mail/rmailedit.el b/lisp/mail/rmailedit.el index 46c1ab6e03c..7d757793eff 100644 --- a/lisp/mail/rmailedit.el +++ b/lisp/mail/rmailedit.el @@ -45,19 +45,18 @@ (declare-function rmail-summary-disable "rmailsum" ()) (defun rmail-edit-mode () - "Major mode for editing the contents of an RMAIL message. -The editing commands are the same as in Text mode, together with two commands -to return to regular RMAIL: - * \\[rmail-abort-edit] cancels the changes - you have made and returns to RMAIL + "Major mode for editing the contents of an Rmail message. +The editing commands are the same as in Text mode, together with +two commands to return to regular Rmail: + * \\[rmail-abort-edit] cancels any changes and returns to Rmail * \\[rmail-cease-edit] makes them permanent. -This functions runs the normal hook `rmail-edit-mode-hook'. +This function runs the hooks `text-mode-hook' and `rmail-edit-mode-hook'. \\{rmail-edit-map}" (if (rmail-summary-exists) (with-current-buffer rmail-summary-buffer (rmail-summary-disable))) - (let ((rmail-buffer-swapped nil)) ; Prevent change-major-mode-hook - ; from unswapping the buffers. + ;; Prevent change-major-mode-hook from unswapping the buffers. + (let ((rmail-buffer-swapped nil)) (delay-mode-hooks (text-mode)) (use-local-map rmail-edit-map) (setq major-mode 'rmail-edit-mode) @@ -69,7 +68,7 @@ This functions runs the normal hook `rmail-edit-mode-hook'. ;; Rmail Edit mode is suitable only for specially formatted data. (put 'rmail-edit-mode 'mode-class 'special) - + (defvar rmail-old-text) (defvar rmail-old-pruned nil |