[Emacs-diffs] Changes to emacs/lisp/textmodes/fill.el, v [EMACS_22_BASE]

[Martin Rudalics]

CVSROOT:        /sources/emacs
Module name:    emacs
Branch:         EMACS_22_BASE
Changes by:     Martin Rudalics <m061211>       07/12/26 09:07:47

Index: fill.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/textmodes/fill.el,v
retrieving revision 1.202.2.4
retrieving revision 1.202.2.5
diff -u -b -r1.202.2.4 -r1.202.2.5
--- fill.el     18 Oct 2007 13:32:36 -0000      1.202.2.4
+++ fill.el     26 Dec 2007 09:07:46 -0000      1.202.2.5
@@ -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;(B?!;:-]")
+  (or (looking-at "[ \t]*[])},A;;(B?!;:-]")
       (save-excursion
        (skip-chars-backward " \t")
        (unless (bolp)
          (backward-char 1)
-         (or (looking-at "[([{,A+,b+(B]")
+         (or (looking-at "[([{,A++(B]")
              ;; Don't cut right after a single-letter word.
              (and (memq (preceding-char) '(?\t ?\s))
                   (eq (char-syntax (following-char)) ?w)))))))
@@ -391,7 +391,7 @@
 This function is called when we are going to break the current line
 after or before a non-ASCII character.  If the charset of the
 character has the property `fill-find-break-point-function', this
-function calls the property value as a function with one arg LINEBEG.
+function calls the property value as a function with one arg LIMIT.
 If the charset has no such property, do nothing."
   (let* ((ch (following-char))
         (charset (char-charset ch))