diff options
| -rw-r--r-- | lisp/textmodes/fill.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el index 0886ecfb152..a4b515c0b65 100644 --- a/lisp/textmodes/fill.el +++ b/lisp/textmodes/fill.el | |||
| @@ -1055,7 +1055,8 @@ Also, if CITATION-REGEXP is non-nil, don't fill header lines." | |||
| 1055 | ;; Fill this paragraph, but don't add a newline at the end. | 1055 | ;; Fill this paragraph, but don't add a newline at the end. |
| 1056 | (let ((had-newline (bolp))) | 1056 | (let ((had-newline (bolp))) |
| 1057 | (fill-region-as-paragraph start (point) justify) | 1057 | (fill-region-as-paragraph start (point) justify) |
| 1058 | (or had-newline (delete-char -1)))))))) | 1058 | (if (and (bolp) (not had-newline)) |
| 1059 | (delete-char -1)))))))) | ||
| 1059 | 1060 | ||
| 1060 | (defun fill-individual-paragraphs-prefix (citation-regexp) | 1061 | (defun fill-individual-paragraphs-prefix (citation-regexp) |
| 1061 | (or (let ((adaptive-fill-first-line-regexp "") | 1062 | (or (let ((adaptive-fill-first-line-regexp "") |