From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 6 Sep 1999 21:48:43 +0000 (+0000)
Subject: (rmail-retry-failure): Unconditionally move to beginning of message.
X-Git-Tag: emacs-pretest-21.0.90~6869
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2b3c5a687900ddb6a147d647937bc0f16ec3ccd3;p=emacs.git

(rmail-retry-failure): Unconditionally move to beginning of message.
---

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 04391b74cab..2094ae4312e 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -3038,8 +3038,8 @@ specifying headers which should not be copied into the new message."
     (save-excursion
       ;; Narrow down to just the quoted original message
       (if pruned
-	  (rmail-toggle-header 0)
-	(rmail-beginning-of-message))
+	  (rmail-toggle-header 0))
+      (rmail-beginning-of-message)
       (let* ((case-fold-search t)
 	     (top (point))
 	     (content-type