# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1236224644 0
# Node ID 8717f0e9d25a71c0bf2178e83fa4d210b0cb8f5e
# Parent  7289f3ee79965756ee18aaec6880fa8013240253
(rmail-sort-messages): Use rmail-ensure-blank-line.

diff -r 7289f3ee7996 -r 8717f0e9d25a lisp/mail/rmailsort.el
--- a/lisp/mail/rmailsort.el	Thu Mar 05 03:43:32 2009 +0000
+++ b/lisp/mail/rmailsort.el	Thu Mar 05 03:44:04 2009 +0000
@@ -220,10 +220,7 @@
 	  (insert-buffer-substring
 	   (current-buffer) (nth 2 msginfo) (nth 3 msginfo))
 	  ;; The last message may not have \n\n after it.
-	  (unless (bolp)
-	    (insert "\n"))
-	  (unless (looking-back "\n\n")
-	    (insert "\n"))
+	  (rmail-ensure-blank-line)
 	  (delete-region (nth 2 msginfo) (nth 3 msginfo))
 	  ;; Is current message?
 	  (if (nth 1 msginfo)