Mercurial > emacs
changeset 37302:bf9b394286bd
(forward-sentence): Put the sentence-end
regexp in parentheses when building the regexp for searching
backwards.
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Tue, 10 Apr 2001 14:54:26 +0000 |
parents | 52b1a4dbe8f8 |
children | 3a9c22d4a66f |
files | lisp/textmodes/paragraphs.el |
diffstat | 1 files changed, 3 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/paragraphs.el Tue Apr 10 14:48:42 2001 +0000 +++ b/lisp/textmodes/paragraphs.el Tue Apr 10 14:54:26 2001 +0000 @@ -1,6 +1,6 @@ ;;; paragraphs.el --- paragraph and sentence parsing. -;; Copyright (C) 1985, 86, 87, 91, 94, 95, 96, 1997, 1999 +;; Copyright (C) 1985, 86, 87, 91, 94, 95, 96, 1997, 1999, 2000, 2001 ;; Free Software Foundation, Inc. ;; Maintainer: FSF @@ -369,7 +369,8 @@ (let ((opoint (point))) (while (< arg 0) (let ((par-beg (save-excursion (start-of-paragraph-text) (point)))) - (if (re-search-backward (concat sentence-end "[^ \t\n]") par-beg t) + (if (re-search-backward (concat "\\(" sentence-end "\\)[^ \t\n]") + par-beg t) (goto-char (1- (match-end 0))) (goto-char par-beg))) (setq arg (1+ arg)))