summaryrefslogtreecommitdiff
path: root/lisp/mail/rmailedit.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2009-03-04 04:20:13 +0000
committerGlenn Morris <rgm@gnu.org>2009-03-04 04:20:13 +0000
commit24683c51e3680440544592133c81374ed1a007d7 (patch)
tree8c00167b0e0a03cad246db55daa7b0ba02ae2fe3 /lisp/mail/rmailedit.el
parent65ad19205b90fdd29ef5786613e6a67e3ec11d4e (diff)
downloademacs-24683c51e3680440544592133c81374ed1a007d7.tar.gz
(rmail-edit-mode): Doc fix.
Diffstat (limited to 'lisp/mail/rmailedit.el')
-rw-r--r--lisp/mail/rmailedit.el17
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