(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.
1993-12-23 03:47:45 +00:00
parent 5590a22428
commit aea2e14ce5
1 changed files with 2 additions and 1 deletions
--- a/lisp/textmodes/fill.el
+++ b/lisp/textmodes/fill.el
@@ -179,7 +179,8 @@ From program, pass args FROM, TO and JUSTIFY-FLAG."
 			      (or first
 				  (and (not (bobp))
 				       (save-excursion (forward-char -1)
-						       (looking-at "\\. ")))))
+						       (looking-at "\\. ")
+						       (not (looking-at "\\.  "))))))
 		    (skip-chars-forward " ")
 		    (skip-chars-forward "^ \n")
 		    (setq first nil)))