Mercurial > emacs
comparison lisp/mail/feedmail.el @ 76123:49ec84aacf0b
(feedmail-message-id-generator, feedmail-date-generator): Fix custom types.
| author | John Paul Wallington <jpw@pobox.com> |
|---|---|
| date | Sat, 24 Feb 2007 17:23:27 +0000 |
| parents | d8a07f1f5442 |
| children | d473c33347de dd7c098af727 |
comparison
equal
deleted
inserted
replaced
| 76122:cbe7bf542ded | 76123:49ec84aacf0b |
|---|---|
| 627 that whatever you give your messages to will do it for you (e.g., most | 627 that whatever you give your messages to will do it for you (e.g., most |
| 628 configurations of sendmail). Even if the latter case is true, it | 628 configurations of sendmail). Even if the latter case is true, it |
| 629 probably won't hurt you to generate your own, and it will then show up | 629 probably won't hurt you to generate your own, and it will then show up |
| 630 in the saved message if you use Fcc:." | 630 in the saved message if you use Fcc:." |
| 631 :group 'feedmail-headers | 631 :group 'feedmail-headers |
| 632 :type '(choice (const nil) function) | 632 :type '(choice (const t) (const nil) function) |
| 633 ) | 633 ) |
| 634 | 634 |
| 635 | 635 |
| 636 (defcustom feedmail-message-id-suffix nil | 636 (defcustom feedmail-message-id-suffix nil |
| 637 "*If non-nil, used as a suffix for generating unique Message-Id: headers. | 637 "*If non-nil, used as a suffix for generating unique Message-Id: headers. |
| 676 that whatever you give your messages to will do it for you (e.g., most | 676 that whatever you give your messages to will do it for you (e.g., most |
| 677 configurations of sendmail). Even if the latter case is true, it | 677 configurations of sendmail). Even if the latter case is true, it |
| 678 probably won't hurt you to generate your own, and it will then show up | 678 probably won't hurt you to generate your own, and it will then show up |
| 679 in the saved message if you use Fcc:." | 679 in the saved message if you use Fcc:." |
| 680 :group 'feedmail-headers | 680 :group 'feedmail-headers |
| 681 :type '(choice (const nil) function) | 681 :type '(choice (const t) (const nil) function) |
| 682 ) | 682 ) |
| 683 | 683 |
| 684 | 684 |
| 685 (defcustom feedmail-fiddle-headers-upwardly t | 685 (defcustom feedmail-fiddle-headers-upwardly t |
| 686 "*Non-nil means fiddled header fields should go at the top of the header. | 686 "*Non-nil means fiddled header fields should go at the top of the header. |