changeset 102407:4c603ec78d71

(rmail-cease-edit): Use rmail-ensure-blank-line.
author Glenn Morris <rgm@gnu.org>
date Thu, 05 Mar 2009 03:45:51 +0000
parents 8717f0e9d25a
children 2bb42d0dca71
files lisp/ChangeLog lisp/mail/rmailedit.el
diffstat 2 files changed, 24 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Thu Mar 05 03:44:04 2009 +0000
+++ b/lisp/ChangeLog	Thu Mar 05 03:45:51 2009 +0000
@@ -1,3 +1,24 @@
+2009-03-05  Glenn Morris  <rgm@gnu.org>
+
+	* mail/rmail.el (rmail-perm-variables): rmail-overlay-list needs to be
+	buffer-local in the view buffer, not the rmail buffer.
+
+	* mail/rmailout.el (rmail-output-to-rmail-buffer): Add the new message
+	at the end of the existing messages, ensuring there is a blank line
+	between them.  (Bug#2521)
+
+	* mail/rmail.el (rmail-ensure-blank-line): New function.
+	* mail/rmailedit.el (rmail-cease-edit):
+	* mail/rmailout.el (rmail-output-as-mbox):
+	* mail/rmailsort.el (rmail-sort-messages): Use rmail-ensure-blank-line.
+
+	* mail/rmailmm.el (rmail-mime-media-type-handlers-alist)
+	(rmail-mime-attachment-dirs-alist): Doc fixes.  Fix custom-type.
+	Add version.
+	(rmail-mime-total-number-of-bulk-attachments): Doc fix.
+	(rmail-mime): Doc fix.  Use rmail-apply-in-message.
+	Disable undo in the mime buffer, mark unmodified.
+
 2009-03-04  David Reitter <david.reitter@gmail.com>
 
 	* menu-bar.el (clipboard-yank): avoid
--- a/lisp/mail/rmailedit.el	Thu Mar 05 03:44:04 2009 +0000
+++ b/lisp/mail/rmailedit.el	Thu Mar 05 03:45:51 2009 +0000
@@ -125,14 +125,11 @@
       (beginning-of-line)
       (insert ">")
       (forward-line)))
-  ;; Make sure buffer ends with a blank line
-  ;; so as not to run this message together with the following one.
+  ;; Make sure buffer ends with a blank line so as not to run this
+  ;; message together with the following one.
   (save-excursion
     (goto-char (point-max))
-    (if (/= (preceding-char) ?\n)
-	(insert "\n"))
-    (unless (looking-back "\n\n")
-      (insert "\n")))
+    (rmail-ensure-blank-line))
   (let ((old rmail-old-text)
 	(pruned rmail-old-pruned)
 	;; People who know what they are doing might have modified the