# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 799352755 0
# Node ID 462d55b842656bb129ee2ee2104cb60a8fd6af71
# Parent  2b1d5f2e99cc2128d3a106b2809690510061e3a2
(expand-mail-aliases): Use buffer-substring-no-properties.

diff -r 2b1d5f2e99cc -r 462d55b84265 lisp/mail/mailalias.el
--- a/lisp/mail/mailalias.el	Mon May 01 17:16:40 1995 +0000
+++ b/lisp/mail/mailalias.el	Mon May 01 18:25:55 1995 +0000
@@ -73,7 +73,7 @@
 		    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))))