From 137ea8af631cc8ce8ccf9be6d868791dac10ca43 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Thu, 5 Mar 2009 03:44:04 +0000 Subject: [PATCH] (rmail-sort-messages): Use rmail-ensure-blank-line. --- lisp/mail/rmailsort.el | 5 +---- 1 file changed, 1 insertion(+), 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) -- 2.39.2