Re: X-No-Archive

[Steven L Baur <steve@xemacs.org>]

Samuel Tardieu <sam@inf.enst.fr> writes:

> Lars, could it be possible to add a binding to the message mode to
> automatically insert a X-No-Archive: header into a post or a mail[1]?

How about adding it to `message-default-headers'?

(setq message-default-headers "X-No-Archive: yes\n")

Another possibility is adding something to message-header-setup-hook.
With some help from Lars, my hook looks like this: (to put in a
`Mail-Copies-To: never' only when posting to a mailing list or newsgroup)

(defun steves-message-header-setup-hook ()
  (let ((group (or gnus-newsgroup-name "")))
    (when (or (message-fetch-field "newsgroups")
              (gnus-group-find-parameter group 'to-address)
              (gnus-group-find-parameter group 'to-list))
      (insert "Mail-Copies-To: never\n"))))

> This convention is being used by many archiving software to prevent
> automatic archiving.

The only 100% reliable way not to be archived somewhere is to not
post.  This is either a good thing or a bad thing, I haven't decided
yet.
-- 
steve@calag.com baur
Unsolicited commercial e-mail will be billed at $250/message.