Re: Gnus code snippet for tmda dated addresses?

[Richard Cobbe <cobbe@airmail.net>]

"A. L. Meyers" <nospam.look@replyto.because.this.is.invalid> writes:

> Hi! The tmda antispam tool recommends the following code to insert
> dated addresses into USENET postings when using Gnus:
> 
> (defun tmda-dated-address ()
>   (shell-command-to-string "/path/to/tmda/bin/tmda-address -dn"))
>   (setq gnus-posting-styles
>         (message-this-is-news
>         (address tmda-dated-address)))
> 
> Alas, this appears not to work with Oort Gnus. I get error messages "no
> such function" for the functions "messeage-this-is-news" and "address".

Looks to me like there's a missing single quote (') before the parenthesis
on the 4th line.  However, simply adding the quote (to suppress evaluation)
won't work terribly well, as this value doesn't appear to correspond to the
expected values for gnus-posting-styles.  See the `Posting Styles' node of
the Gnus manual for more details.  If you want to apply TMDA dated
addresses to messages posted to all groups, something like the following
should work:

(setq gnus-posting-styles
  '((".*"                   ;; The quote is necessary!
     message-this-is-news
     (address tmda-dated-address))))

HTH,

Richard