[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
sendmail.el
From: |
Richard Stallman |
Subject: |
sendmail.el |
Date: |
Tue, 23 Aug 2016 23:05:14 -0400 |
[[[ To any NSA and FBI agents reading my email: please consider ]]]
[[[ whether defending the US Constitution against all enemies, ]]]
[[[ foreign or domestic, requires you to follow Snowden's example. ]]]
This fixes a bug I ran across today. My sources are from July,
but the bug may be present in the Emacs 25.1 code. Please check.
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index 58f708a..3d22209 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -1110,10 +1110,11 @@ mail-combine-fields
(save-restriction
;; This is just so the screen doesn't change.
(narrow-to-region (point-min) old-max)
- (goto-char old-point)
- (setq query-asked t)
- (if (y-or-n-p (format "Message contains multiple %s fields.
Combine? " field))
- (setq query-answer t))))
+ (save-excursion
+ (goto-char old-point)
+ (setq query-asked t)
+ (if (y-or-n-p (format "Message contains multiple %s fields.
Combine? " field))
+ (setq query-answer t)))))
(when query-answer
(let ((this-to-start (line-beginning-position))
this-to-end
--
Dr Richard Stallman
President, Free Software Foundation (gnu.org, fsf.org)
Internet Hall-of-Famer (internethalloffame.org)
Skype: No way! See stallman.org/skype.html.
- sendmail.el,
Richard Stallman <=