# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 776858177 0
# Node ID 2aa8cbd9178105cd4eae46dc00573a2a4ad00057
# Parent  dc4a53a05b98e977110b547118b5f40e616da9cc
(rmail-resend): Preserve point around expand-mail-aliases.

diff -r dc4a53a05b98 -r 2aa8cbd91781 lisp/mail/rmail.el
--- a/lisp/mail/rmail.el	Sun Aug 14 09:22:39 1994 +0000
+++ b/lisp/mail/rmail.el	Sun Aug 14 09:56:17 1994 +0000
@@ -2064,7 +2064,8 @@
 			       address
 			     (mapconcat 'identity address ",\n\t"))
 		    "\n")
-	    (expand-mail-aliases before (point)))
+	    (save-excursion
+	      (expand-mail-aliases before (point))))
 	  ;;>> Set up comment, if any.
 	  (if (and (sequencep comment) (not (zerop (length comment))))
 	      (let ((before (point))