(fill-nobreak-p): Fix first two rules to skip backward only

space (instead of space and period) before looking at sentence end.

1 files changed, 6 insertions, 5 deletions

diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el
index 11ddfc0e967..ce95c6f026f 100644
--- a/lisp/textmodes/fill.el
+++ b/lisp/textmodes/fill.el
@@ -344,13 +344,14 @@ and `fill-nobreak-invisible'."
      ;; it at the end of the line.
      (and sentence-end-double-space
           (save-excursion
-            (skip-chars-backward ". ")
-            (looking-at "\\. \\([^ ]\\|$\\)")))
+            (skip-chars-backward " ")
+            (and (eq (preceding-char) ?.)
+                 (looking-at " \\([^ ]\\|$\\)"))))
      ;; Another approach to the same problem.
      (save-excursion
-       (skip-chars-backward ". ")
-       (and (looking-at "\\.")
-            (not (looking-at (sentence-end)))))
+       (skip-chars-backward " ")
+       (and (eq (preceding-char) ?.)
+            (not (progn (forward-char -1) (looking-at (sentence-end))))))
      ;; Don't split a line if the rest would look like a new paragraph.
      (unless use-hard-newlines
        (save-excursion