Mercurial > emacs
changeset 79631:f83a4361c7e2
Fix regexps in fill-french-nobreak-p broken by last patch.
author | Martin Rudalics <rudalics@gmx.at> |
---|---|
date | Wed, 26 Dec 2007 18:12:37 +0000 |
parents | cfeb5ceccfc0 |
children | 145a45ea4769 |
files | lisp/textmodes/fill.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/fill.el Wed Dec 26 17:29:34 2007 +0000 +++ b/lisp/textmodes/fill.el Wed Dec 26 18:12:37 2007 +0000 @@ -316,12 +316,12 @@ mark such as `?' or `:'. It is common in French writing to put a space at such places, which would normally allow breaking the line at those places." - (or (looking-at "[ \t]*[])},A;;(B?!;:-]") + (or (looking-at "[ \t]*[])},A;,b;(B?!;:-]") (save-excursion (skip-chars-backward " \t") (unless (bolp) (backward-char 1) - (or (looking-at "[([{,A++(B]") + (or (looking-at "[([{,A+,b+(B]") ;; Don't cut right after a single-letter word. (and (memq (preceding-char) '(?\t ?\s)) (eq (char-syntax (following-char)) ?w)))))))