(rmail-edit-mode): Doc fix.

2 files changed, 32 insertions, 9 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d1d7960bd8..9ace609a8f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,27 @@
+2009-03-04  Glenn Morris  <[email protected]>
+
+	* mail/rmailedit.el (rmail-edit-mode): Doc fix.
+
+	* mail/rmailsort.el: Replace `(function (lambda' by `(lambda'.
+	(rmail-sort-by-date, rmail-sort-by-subject)
+	(rmail-sort-by-author, rmail-sort-by-recipient)
+	(rmail-sort-by-correspondent, rmail-select-correspondent)
+	(rmail-sort-by-lines, rmail-sort-by-labels, rmail-sort-messages)
+	(rmail-make-date-sortable): Doc fixes.
+	(rmail-sort-by-correspondent): Downcase correspondents.
+	(rmail-sort-by-labels): Make it work.
+	(rmail-sort-messages): Restore undo if it was initially enabled.
+	Fix bobp/bolp typo that was adding a line on every sort.
+
+	* mail/rmailsum.el (rmail-get-create-summary-buffer): Doc fix.
+	Disable undo in the summary buffer.
+	(rmail-summary-sort-by-date, rmail-summary-sort-by-subject)
+	(rmail-summary-sort-by-author, rmail-summary-sort-by-recipient)
+	(rmail-summary-sort-by-correspondent, rmail-summary-sort-by-lines)
+	(rmail-summary-sort-by-labels, rmail-sort-from-summary): Doc fixes.
+	(rmail-summary-sort-by-labels): Replace `(function (lambda'
+	by `(lambda'.
+
 2009-03-03  Sam Steingold  <[email protected]>
 
 	* progmodes/compile.el (compilation-move-to-column):
diff --git a/lisp/mail/rmailedit.el b/lisp/mail/rmailedit.el
index 46c1ab6e03..7d757793ef 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