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

2bc9b0c7 · Richard M. Stallman · 3b114205 · 2bc9b0c7
Commit 2bc9b0c7 authored May 01, 1995 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

lisp/mail/mailalias.el lisp/mail/mailalias.el +1 -1

No files found.
--- 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))))