Mercurial > emacs
comparison lisp/gnus/message.el @ 57561:505c55fe8dc9
Revision: miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-621
Merge from gnus--rel--5.10
Patches applied:
* miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-51
- miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-52
Update from CVS
* miles@gnu.org--gnu-2004/gnus--rel--5.10--patch-53
Merge from emacs--cvs-trunk--0
2004-10-15 Reiner Steib <Reiner.Steib@gmx.de>
* lisp/gnus/pop3.el (pop3-leave-mail-on-server): Describe possible problems
in the doc string.
* lisp/gnus/message.el (message-ignored-news-headers)
(message-ignored-supersedes-headers)
(message-ignored-resent-headers)
(message-forward-ignored-headers): Improve custom type.
2004-10-15 Simon Josefsson <jas@extundo.com>
* lisp/gnus/pop3.el (top-level): Don't require nnheader.
(pop3-read-timeout): Add.
(pop3-accept-process-output): Add.
(pop3-read-response, pop3-retr): Use it.
2004-10-11 Reiner Steib <Reiner.Steib@gmx.de>
* lisp/gnus/message.el (message-bury): Use `window-dedicated-p'.
2004-10-15 Reiner Steib <Reiner.Steib@gmx.de>
* man/gnus.texi (New Features): Add 5.11.
* man/message.texi (Resending): Remove wrong default value.
* man/gnus.texi (Mail Source Specifiers): Describe possible problems
of `pop3-leave-mail-on-server'. Add `pop3-movemail' and
`pop3-leave-mail-on-server' to the index.
2004-10-15 Katsumi Yamaoka <yamaoka@jpl.org>
* man/message.texi (Canceling News): Add how to set a password.
author | Miles Bader <miles@gnu.org> |
---|---|
date | Sun, 17 Oct 2004 14:29:01 +0000 |
parents | f7785a1e8cf8 |
children | 645f020dcc8a |
comparison
equal
deleted
inserted
replaced
57560:9f3d14375fe1 | 57561:505c55fe8dc9 |
---|---|
253 "^NNTP-Posting-Host:\\|^Xref:\\|^[BGF]cc:\\|^Resent-Fcc:\\|^X-Draft-From:\\|^X-Gnus-Agent-Meta-Information:" | 253 "^NNTP-Posting-Host:\\|^Xref:\\|^[BGF]cc:\\|^Resent-Fcc:\\|^X-Draft-From:\\|^X-Gnus-Agent-Meta-Information:" |
254 "*Regexp of headers to be removed unconditionally before posting." | 254 "*Regexp of headers to be removed unconditionally before posting." |
255 :group 'message-news | 255 :group 'message-news |
256 :group 'message-headers | 256 :group 'message-headers |
257 :link '(custom-manual "(message)Message Headers") | 257 :link '(custom-manual "(message)Message Headers") |
258 :type 'regexp) | 258 :type '(repeat :value-to-internal (lambda (widget value) |
259 (custom-split-regexp-maybe value)) | |
260 :match (lambda (widget value) | |
261 (or (stringp value) | |
262 (widget-editable-list-match widget value))) | |
263 regexp)) | |
259 | 264 |
260 (defcustom message-ignored-mail-headers | 265 (defcustom message-ignored-mail-headers |
261 "^[GF]cc:\\|^Resent-Fcc:\\|^Xref:\\|^X-Draft-From:\\|^X-Gnus-Agent-Meta-Information:" | 266 "^[GF]cc:\\|^Resent-Fcc:\\|^Xref:\\|^X-Draft-From:\\|^X-Gnus-Agent-Meta-Information:" |
262 "*Regexp of headers to be removed unconditionally before mailing." | 267 "*Regexp of headers to be removed unconditionally before mailing." |
263 :group 'message-mail | 268 :group 'message-mail |
269 "*Header lines matching this regexp will be deleted before posting. | 274 "*Header lines matching this regexp will be deleted before posting. |
270 It's best to delete old Path and Date headers before posting to avoid | 275 It's best to delete old Path and Date headers before posting to avoid |
271 any confusion." | 276 any confusion." |
272 :group 'message-interface | 277 :group 'message-interface |
273 :link '(custom-manual "(message)Superseding") | 278 :link '(custom-manual "(message)Superseding") |
274 :type 'regexp) | 279 :type '(repeat :value-to-internal (lambda (widget value) |
280 (custom-split-regexp-maybe value)) | |
281 :match (lambda (widget value) | |
282 (or (stringp value) | |
283 (widget-editable-list-match widget value))) | |
284 regexp)) | |
275 | 285 |
276 (defcustom message-subject-re-regexp | 286 (defcustom message-subject-re-regexp |
277 "^[ \t]*\\([Rr][Ee]\\(\\[[0-9]*\\]\\)*:[ \t]*\\)*[ \t]*" | 287 "^[ \t]*\\([Rr][Ee]\\(\\[[0-9]*\\]\\)*:[ \t]*\\)*[ \t]*" |
278 "*Regexp matching \"Re: \" in the subject line." | 288 "*Regexp matching \"Re: \" in the subject line." |
279 :group 'message-various | 289 :group 'message-various |
532 | 542 |
533 (defcustom message-ignored-resent-headers "^Return-receipt\\|^X-Gnus\\|^Gnus-Warning:\\|^>?From " | 543 (defcustom message-ignored-resent-headers "^Return-receipt\\|^X-Gnus\\|^Gnus-Warning:\\|^>?From " |
534 "*All headers that match this regexp will be deleted when resending a message." | 544 "*All headers that match this regexp will be deleted when resending a message." |
535 :group 'message-interface | 545 :group 'message-interface |
536 :link '(custom-manual "(message)Resending") | 546 :link '(custom-manual "(message)Resending") |
537 :type 'regexp) | 547 :type '(repeat :value-to-internal (lambda (widget value) |
548 (custom-split-regexp-maybe value)) | |
549 :match (lambda (widget value) | |
550 (or (stringp value) | |
551 (widget-editable-list-match widget value))) | |
552 regexp)) | |
538 | 553 |
539 (defcustom message-forward-ignored-headers "^Content-Transfer-Encoding:\\|^X-Gnus" | 554 (defcustom message-forward-ignored-headers "^Content-Transfer-Encoding:\\|^X-Gnus" |
540 "*All headers that match this regexp will be deleted when forwarding a message." | 555 "*All headers that match this regexp will be deleted when forwarding a message." |
541 :version "21.1" | 556 :version "21.1" |
542 :group 'message-forwarding | 557 :group 'message-forwarding |
543 :type '(choice (const :tag "None" nil) | 558 :type '(repeat :value-to-internal (lambda (widget value) |
559 (custom-split-regexp-maybe value)) | |
560 :match (lambda (widget value) | |
561 (or (stringp value) | |
562 (widget-editable-list-match widget value))) | |
544 regexp)) | 563 regexp)) |
545 | 564 |
546 (defcustom message-ignored-cited-headers "." | 565 (defcustom message-ignored-cited-headers "." |
547 "*Delete these headers from the messages you yank." | 566 "*Delete these headers from the messages you yank." |
548 :group 'message-insertion | 567 :group 'message-insertion |