* textmodes/flyspell.el (flyspell-check-region-doublons): Fix last

	fix.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2fc449aea2d6ff746a90870554162f49a041d3b9..606713efeaad4fdb39aeae9a602d9ca080652fdb 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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

diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el
index e452716d83d4e605f5a5fcfd841130d2cde8d4d5..b24124851de3941518167d7273de2fd6e99373a7 100644 (file)
--- a/lisp/textmodes/flyspell.el
+++ b/lisp/textmodes/flyspell.el
@@ -1475,7 +1475,7 @@ The buffer to mark them in is `flyspell-large-region-buffer'."
     (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))