(expand-mail-aliases): Use buffer-substring-no-properties.

diff --git a/lisp/mail/mailalias.el b/lisp/mail/mailalias.el
index 84f1287..cedc40a 100644 (file)
--- a/lisp/mail/mailalias.el
+++ b/lisp/mail/mailalias.el
@@ -73,7 +73,7 @@ removed from alias expansions."
                    seplen (- (point) epos))
            (setq epos (marker-position end1) seplen 0))
          (let (translation
-               (string (buffer-substring pos epos)))
+               (string (buffer-substring-no-properties pos epos)))
            (if (and (not (assoc string disabled-aliases))
                     (setq translation
                           (cdr (assoc string mail-aliases))))