# HG changeset patch # User Richard M. Stallman # Date 833516222 0 # Node ID 9a31b0d0c38a1a8f01bba153c85a93b09f0b0138 # Parent 08ce5fa97ce3e481bc695f695418e7ed0a52f283 (fill-individual-paragraphs): Don't get stuck if no newline at the end of the region. diff -r 08ce5fa97ce3 -r 9a31b0d0c38a lisp/textmodes/fill.el --- a/lisp/textmodes/fill.el Thu May 30 23:11:14 1996 +0000 +++ b/lisp/textmodes/fill.el Fri May 31 04:17:02 1996 +0000 @@ -828,7 +828,10 @@ (point)))) fill-prefix-regexp (regexp-quote fill-prefix))) (forward-line 1) - (move-to-left-margin) + (if (bolp) + ;; If forward-line went past a newline, + ;; move further to the left margin. + (move-to-left-margin)) ;; Now stop the loop if end of paragraph. (and (not (eobp)) (if fill-individual-varying-indent