Mercurial > emacs

changeset 101218:854925519fc6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(sentence-end): Accept non-break space.
author Richard M. Stallman <rms@gnu.org>
date Fri, 16 Jan 2009 00:43:27 +0000
parents 4e5a2a1d41a5
children fef91f9718dc
files lisp/textmodes/paragraphs.el
diffstat 1 files changed, 4 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/paragraphs.el	Thu Jan 15 23:58:00 2009 +0000
+++ b/lisp/textmodes/paragraphs.el	Fri Jan 16 00:43:27 2009 +0000
@@ -183,14 +183,15 @@
 must be followed by two spaces, with perhaps some closing delimiters
 in between.  See Info node `(elisp)Standard Regexps'."
   (or sentence-end
-      (concat (if sentence-end-without-period "\\w  \\|")
+      ;; We accept non-break space along with space.
+      (concat (if sentence-end-without-period "\\w[ \u00a0][ \u00a0]\\|")
 	      "\\("
 	      sentence-end-base
               (if sentence-end-double-space
-                  "\\($\\| $\\|\t\\|  \\)" "\\($\\|[\t ]\\)")
+                  "\\($\\|[ \u00a0]$\\|\t\\|[ \u00a0][ \u00a0]\\)" "\\($\\|[\t \u00a0]\\)")
               "\\|[" sentence-end-without-space "]+"
 	      "\\)"
-              "[ \t\n]*")))
+              "[ \u00a0\t\n]*")))
 
 (defcustom page-delimiter "^\014"
   "Regexp describing line-beginnings that separate pages."