From dbe3ba524d31191eb214adc6c8273d14c7dc60a2 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 2 Apr 2003 23:40:36 +0000 Subject: [PATCH] (fill-delete-newlines): Don't add a trailing space. --- lisp/textmodes/fill.el | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el index 774072ab9e2..21f38a97a0d 100644 --- a/lisp/textmodes/fill.el +++ b/lisp/textmodes/fill.el @@ -450,10 +450,7 @@ Point is moved to just past the fill prefix on the first line." (subst-char-in-region from to ?\n ?\ ) (if (and nosqueeze (not (eq justify 'full))) nil - (canonically-space-region (or squeeze-after (point)) to) - (goto-char to) - (delete-horizontal-space) - (insert-and-inherit " ")) + (canonically-space-region (or squeeze-after (point)) to)) (goto-char from)) (defun fill-move-to-break-point (linebeg) -- 2.39.2