diff options
| author | Richard M. Stallman | 1993-12-23 03:47:45 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-12-23 03:47:45 +0000 |
| commit | aea2e14ce538c98ccdbba633d428a8ca4af6e240 (patch) | |
| tree | 82ed7e09373a3298f355decb2898032781ebba6f | |
| parent | 5590a2242892b8ab542d71fa71c486b581e62dbd (diff) | |
| download | emacs-aea2e14ce538c98ccdbba633d428a8ca4af6e240.tar.gz emacs-aea2e14ce538c98ccdbba633d428a8ca4af6e240.zip | |
(fill-region-as-paragraph): Do allow breaking line at a period
followed by two spaces, in the case where we are insisting on having at
least one complete word.
| -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 bbe44f3d6fe..3ef81b87e1c 100644 --- a/lisp/textmodes/fill.el +++ b/lisp/textmodes/fill.el | |||
| @@ -179,7 +179,8 @@ From program, pass args FROM, TO and JUSTIFY-FLAG." | |||
| 179 | (or first | 179 | (or first |
| 180 | (and (not (bobp)) | 180 | (and (not (bobp)) |
| 181 | (save-excursion (forward-char -1) | 181 | (save-excursion (forward-char -1) |
| 182 | (looking-at "\\. "))))) | 182 | (looking-at "\\. ") |
| 183 | (not (looking-at "\\. ")))))) | ||
| 183 | (skip-chars-forward " ") | 184 | (skip-chars-forward " ") |
| 184 | (skip-chars-forward "^ \n") | 185 | (skip-chars-forward "^ \n") |
| 185 | (setq first nil))) | 186 | (setq first nil))) |