Fix 'apropos-compact-layout'

* lisp/textmodes/fill.el (fill-region-as-paragraph): Fix filling
paragraphs that end at EOB without a newline.  (Bug#50974)

diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el
index 81d908c95e7709881e2297fa790a893c793549ba..decce88573b67e182e650539309057835f017ef6 100644 (file)
--- a/lisp/textmodes/fill.el
+++ b/lisp/textmodes/fill.el
@@ -768,7 +768,7 @@ space does not end a sentence, so don't break a line there."
               (setq first nil
                     linebeg (+ (point) (length actual-fill-prefix))))
            (move-to-column (current-fill-column))
-           (if (when (< (point) to)
+           (if (when (and (< (point) to) (< linebeg to))
                  ;; Find the position where we'll break the line.
                  ;; Use an immediately following space, if any.
                  ;; However, note that `move-to-column' may overshoot