From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 14 Aug 1994 09:56:17 +0000 (+0000)
Subject: (rmail-resend): Preserve point around expand-mail-aliases.
X-Git-Tag: emacs-19.34~7308
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=50703776274c06fb6594dc2085aefd0cd6e73ad2;p=emacs.git

(rmail-resend): Preserve point around expand-mail-aliases.
---

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 2a8713f4925..ec86f4682ed 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -2064,7 +2064,8 @@ typically for purposes of moderating a list."
 			       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))