344 |
;; it at the end of the line. |
;; it at the end of the line. |
345 |
(and sentence-end-double-space |
(and sentence-end-double-space |
346 |
(save-excursion |
(save-excursion |
347 |
(skip-chars-backward ". ") |
(skip-chars-backward " ") |
348 |
(looking-at "\\. \\([^ ]\\|$\\)"))) |
(and (eq (preceding-char) ?.) |
349 |
|
(looking-at " \\([^ ]\\|$\\)")))) |
350 |
;; Another approach to the same problem. |
;; Another approach to the same problem. |
351 |
(save-excursion |
(save-excursion |
352 |
(skip-chars-backward ". ") |
(skip-chars-backward " ") |
353 |
(and (looking-at "\\.") |
(and (eq (preceding-char) ?.) |
354 |
(not (looking-at (sentence-end))))) |
(not (progn (forward-char -1) (looking-at (sentence-end)))))) |
355 |
;; Don't split a line if the rest would look like a new paragraph. |
;; Don't split a line if the rest would look like a new paragraph. |
356 |
(unless use-hard-newlines |
(unless use-hard-newlines |
357 |
(save-excursion |
(save-excursion |