mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-02 11:21:42 +00:00
Code Issues Releases Activity

(rmail-reply): Don't try to add a References header when replying to

Browse Source 
mail without References or Message-Id.  (Bug#4525)
This commit is contained in:
Glenn Morris 2009-09-23 06:20:23 +00:00
parent e14f0a78d6
commit 4f02f0c989
2 changed files with 11 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2009-09-23 Glenn Morris <rgm@gnu.org>
* mail/rmail.el (rmail-reply): Don't try to add a References header when
replying to mail without References or Message-Id. (Bug#4525)
2009-09-23 Adrian Robert <Adrian.B.Robert@gmail.com>
* term/ns-win.el (ns-reg-to-script): New variable.

10
lisp/mail/rmail.el
View File

@ -3537,10 +3537,12 @@ use \\[mail-yank-original] to yank the original message into it."
(aref rmail-msgref-vector msgnum))
rmail-answered-attr-index))
nil
(list (cons "References" (if references
(concat (mapconcat 'identity references " ")
" " message-id)
message-id))))))
(if (or references message-id)
(list (cons "References" (if references
(concat
(mapconcat 'identity references " ")
" " message-id)
message-id)))))))
(defun rmail-mark-message (buffer msgnum-list attribute)
"Give BUFFER's message number in MSGNUM-LIST the attribute ATTRIBUTE.