(fill-delete-newlines): Don't add a trailing space.

diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el
index 774072ab9e236a3eb6820a76e331980d69bb1160..21f38a97a0d6a52bab19e6267c8748f4b9b95ddd 100644 (file)
--- 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)