(flyspell-get-word): Return string without

properties.

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 58407876833..6b7ad6f8081 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2001-02-16  Dave Love  <fx@gnu.org>
+
+        * textmodes/flyspell.el (flyspell-get-word): Return string without
+        properties.
+
 2001-02-16  Eli Zaretskii  <eliz@is.elta.co.il>
 
         * generic.el (generic-find-file-regexp): Doc fix.
diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el
index b1290c9cb8c..707315a0232 100644
--- a/lisp/textmodes/flyspell.el
+++ b/lisp/textmodes/flyspell.el
@@ -1221,7 +1221,7 @@ Word syntax described by `ispell-dictionary-alist' (which see)."
       (progn
         (setq start (match-beginning 0)
               end (point)
-              word (buffer-substring start end))
+              word (buffer-substring-no-properties start end))
         (list word start end)))))
 
 ;*---------------------------------------------------------------------*/