(rmail-sort-messages): Use rmail-ensure-blank-line.

1 files changed, 1 insertions, 4 deletions

diff --git a/lisp/mail/rmailsort.el b/lisp/mail/rmailsort.el
index cfc93985719..39244669928 100644
--- a/lisp/mail/rmailsort.el
+++ b/lisp/mail/rmailsort.el
@@ -220,10 +220,7 @@ Numeric keys are sorted numerically, all others as strings."
           (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)