Mercurial > emacs
comparison lisp/gnus/message.el @ 111430:b75e6634a171
gnus-int.el, nnimap.el, nnir.el: More improvements to thread-referral.
message.el (message-send-mail): Don't insert courtesy messages if the message already has List-Post and List-ID messages.
gnus-ems.el (gnus-put-image): Use a blank text as the insertion string to avoid making the From headers syntactically invalid.
| author | Katsumi Yamaoka <yamaoka@jpl.org> |
|---|---|
| date | Sun, 07 Nov 2010 00:22:06 +0000 |
| parents | 733acab855e4 |
| children | 60f509c70b61 |
comparison
equal
deleted
inserted
replaced
| 111429:249a1455856a | 111430:b75e6634a171 |
|---|---|
| 4480 ;; non-ASCII characters. -- jh | 4480 ;; non-ASCII characters. -- jh |
| 4481 (when | 4481 (when |
| 4482 (save-restriction | 4482 (save-restriction |
| 4483 (message-narrow-to-headers) | 4483 (message-narrow-to-headers) |
| 4484 (and news | 4484 (and news |
| 4485 (not (message-fetch-field "List-Post")) | |
| 4486 (not (message-fetch-field "List-ID")) | |
| 4485 (or (message-fetch-field "cc") | 4487 (or (message-fetch-field "cc") |
| 4486 (message-fetch-field "bcc") | 4488 (message-fetch-field "bcc") |
| 4487 (message-fetch-field "to")) | 4489 (message-fetch-field "to")) |
| 4488 (let ((content-type (message-fetch-field | 4490 (let ((content-type (message-fetch-field |
| 4489 "content-type"))) | 4491 "content-type"))) |