diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/textmodes/flyspell.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2fc449aea2d..606713efeaa 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2006-10-22 martin rudalics <rudalics@gmx.at> | ||
| 2 | |||
| 3 | * textmodes/flyspell.el (flyspell-check-region-doublons): Fix last | ||
| 4 | fix. | ||
| 5 | |||
| 1 | 2006-10-23 Nick Roberts <nickrob@snap.net.nz> | 6 | 2006-10-23 Nick Roberts <nickrob@snap.net.nz> |
| 2 | 7 | ||
| 3 | * bindings.el (mode-line-mode-menu): List global minor modes | 8 | * bindings.el (mode-line-mode-menu): List global minor modes |
diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el index e452716d83d..b24124851de 100644 --- 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'." | |||
| 1475 | (flyspell-word) ; Make sure current word is checked | 1475 | (flyspell-word) ; Make sure current word is checked |
| 1476 | (backward-word 1) | 1476 | (backward-word 1) |
| 1477 | (while (and (< (point) end) | 1477 | (while (and (< (point) end) |
| 1478 | (re-search-forward "\\(\\w+\\)\\s-+\\1\\>" | 1478 | (re-search-forward "\\<\\(\\w+\\)\\>[ \n\t\f]+\\1\\>" |
| 1479 | end 'move)) | 1479 | end 'move)) |
| 1480 | (flyspell-word) | 1480 | (flyspell-word) |
| 1481 | (backward-word 1)) | 1481 | (backward-word 1)) |