changeset 73480:93f756e426b8

* textmodes/flyspell.el (flyspell-check-region-doublons): Fix last fix.
author Chong Yidong <cyd@stupidchicken.com>
date Mon, 23 Oct 2006 13:59:44 +0000
parents 0c7cbc22f015
children e9c680a7e7cc
files lisp/ChangeLog lisp/textmodes/flyspell.el
diffstat 2 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Mon Oct 23 11:49:48 2006 +0000
+++ b/lisp/ChangeLog	Mon Oct 23 13:59:44 2006 +0000
@@ -1,3 +1,8 @@
+2006-10-22  martin rudalics  <rudalics@gmx.at>
+
+	* textmodes/flyspell.el (flyspell-check-region-doublons): Fix last
+	fix.
+
 2006-10-23  Nick Roberts  <nickrob@snap.net.nz>
 
 	* bindings.el (mode-line-mode-menu): List global minor modes
--- a/lisp/textmodes/flyspell.el	Mon Oct 23 11:49:48 2006 +0000
+++ b/lisp/textmodes/flyspell.el	Mon Oct 23 13:59:44 2006 +0000
@@ -1475,7 +1475,7 @@
     (flyspell-word)     ; Make sure current word is checked
     (backward-word 1)
     (while (and (< (point) end)
-		(re-search-forward "\\(\\w+\\)\\s-+\\1\\>"
+		(re-search-forward "\\<\\(\\w+\\)\\>[ \n\t\f]+\\1\\>"
 				   end 'move))
       (flyspell-word)
       (backward-word 1))