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

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

diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el
index 11ddfc0e967219d9cd2413f153db64389c079e20..ce95c6f026febdc03ca225dcf3ddcfe942c7c4c9 100644 (file)
--- 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