summaryrefslogtreecommitdiff
path: root/lisp/mail
diff options
context:
space:
mode:
authorGerd Moellmann <gerd@gnu.org>2000-02-07 23:27:14 +0000
committerGerd Moellmann <gerd@gnu.org>2000-02-07 23:27:14 +0000
commit77e38f8bbbf3574fc3dac7597b6875779ced8bec (patch)
tree6d3bbda038f2eac6d4e5e170bd199d4a3377c206 /lisp/mail
parent3af38f6c44611b163cfe49ffd79ec77ff91f9b21 (diff)
downloademacs-77e38f8bbbf3574fc3dac7597b6875779ced8bec.tar.gz
(rmail-retry-failure): Use
rmail-beginning-of-message before rmail-toggle-header, because the former toggles headers.
Diffstat (limited to 'lisp/mail')
-rw-r--r--lisp/mail/rmail.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 46240dbabc6..9110825a244 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -1,6 +1,6 @@
;;; rmail.el --- main code of "RMAIL" mail reader for Emacs.
-;; Copyright (C) 1985,86,87,88,93,94,95,96,97,1998
+;; Copyright (C) 1985,86,87,88,93,94,95,96,97,98,2000
;; Free Software Foundation, Inc.
;; Maintainer: FSF
@@ -3038,9 +3038,9 @@ specifying headers which should not be copied into the new message."
bounce-start bounce-end bounce-indent resending)
(save-excursion
;; Narrow down to just the quoted original message
+ (rmail-beginning-of-message)
(if pruned
(rmail-toggle-header 0))
- (rmail-beginning-of-message)
(let* ((case-fold-search t)
(top (point))
(content-type