Add X-Hashcash to the end of mail headers
* lisp/mail/hashcash.el (mail-add-payment): Move headers to the end of the headers.
This commit is contained in:
parent
5ee3990de6
commit
f43914b4d0
1 changed files with 1 additions and 0 deletions
|
@ -308,6 +308,7 @@ Set ASYNC to t to start asynchronous calculation. (See
|
|||
(save-excursion
|
||||
(save-restriction
|
||||
(message-narrow-to-headers)
|
||||
(goto-char (point-max))
|
||||
(let ((to (hashcash-strip-quoted-names (mail-fetch-field "To" nil t)))
|
||||
(cc (hashcash-strip-quoted-names (mail-fetch-field "Cc" nil t)))
|
||||
(ng (hashcash-strip-quoted-names (mail-fetch-field "Newsgroups"
|
||||
|
|
Loading…
Add table
Reference in a new issue