Mercurial > emacs

diff lisp/mail/rmailedit.el @ 102407:4c603ec78d71

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(rmail-cease-edit): Use rmail-ensure-blank-line.
author Glenn Morris <rgm@gnu.org>
date Thu, 05 Mar 2009 03:45:51 +0000
parents b5125b379b62
children f4571df6b6cc
line wrap: on
line diff
--- 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