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)))))))