(fill-region-as-paragraph): Fix previous change.

diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el
index b600cd910310c53744a053a8bd9b5bde5880da38..571e39cc8bfd2084284b5766d435c4fe07488ce9 100644 (file)
--- a/lisp/textmodes/fill.el
+++ b/lisp/textmodes/fill.el
@@ -546,9 +546,13 @@ space does not end a sentence, so don't break a line there."
                      ;; character to find the correct break point.
                      (if (not (and (eq (charset-after (1- (point))) 'ascii)
                                    (eq (charset-after (point)) 'ascii)))
-                         (fill-find-break-point (+ linebeg
-                                                   (current-left-margin)
-                                                   (length fill-prefix))))))
+                         ;; Make sure we take SOMETHING after the
+                         ;; fill prefix if any.
+                         (fill-find-break-point
+                          (save-excursion
+                            (goto-char linebeg)
+                            (move-to-column prefixcol)
+                            (point))))))
 
                ;; If the left margin and fill prefix by themselves
                ;; pass the fill-column, keep at least one word.