diff options
| author | Martin Rudalics <rudalics@gmx.at> | 2007-12-26 18:12:37 +0000 |
|---|---|---|
| committer | Martin Rudalics <rudalics@gmx.at> | 2007-12-26 18:12:37 +0000 |
| commit | eaa872bb860a305fb739334951698618420147c8 (patch) | |
| tree | d9d237a61b08d16662709b69eeed81710a61d4e8 /lisp/textmodes/fill.el | |
| parent | 73936494a34bc8c474eb7b315ad30ef653df5463 (diff) | |
| download | emacs-eaa872bb860a305fb739334951698618420147c8.tar.gz emacs-eaa872bb860a305fb739334951698618420147c8.tar.bz2 emacs-eaa872bb860a305fb739334951698618420147c8.zip | |
Fix regexps in fill-french-nobreak-p broken by last patch.
Diffstat (limited to 'lisp/textmodes/fill.el')
| -rw-r--r-- | lisp/textmodes/fill.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el index 42d7ea156c6..2c7329cd989 100644 --- a/lisp/textmodes/fill.el +++ b/lisp/textmodes/fill.el @@ -316,12 +316,12 @@ after an opening paren or just before a closing paren or a punctuation 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))))))) |