428 |
|
|
429 |
(defcustom feedmail-nuke-body-in-fcc nil |
(defcustom feedmail-nuke-body-in-fcc nil |
430 |
"*If non-nil remove body of message in copies saved via Fcc:. |
"*If non-nil remove body of message in copies saved via Fcc:. |
431 |
If an positive integer value, leave (up to) that many lines of the |
If a positive integer value, leave (up to) that many lines of the |
432 |
beginning of the body intact. The result is that the Fcc: copy will |
beginning of the body intact. The result is that the Fcc: copy will |
433 |
consist only of the message headers, serving as a sort of an outgoing |
consist only of the message headers, serving as a sort of an outgoing |
434 |
message log." |
message log." |
845 |
(if (memq system-type '(axp-vms vax-vms)) |
(if (memq system-type '(axp-vms vax-vms)) |
846 |
(expand-file-name (concat (getenv "HOME") "[.MAIL.DRAFT]")) |
(expand-file-name (concat (getenv "HOME") "[.MAIL.DRAFT]")) |
847 |
(concat (getenv "HOME") "/mail/draft")) |
(concat (getenv "HOME") "/mail/draft")) |
848 |
"*Name of an directory where draft messages will be queued. |
"*Name of a directory where draft messages will be queued. |
849 |
Directory will be created if necessary. Should be a string that |
Directory will be created if necessary. Should be a string that |
850 |
doesn't end with a slash. Default, except on VMS, is \"$HOME/mail/draft\"." |
doesn't end with a slash. Default, except on VMS, is \"$HOME/mail/draft\"." |
851 |
:group 'feedmail-queue |
:group 'feedmail-queue |