gnus-posting-styles and nnml-current-group

["Taso N. Devetzis" <devetzis@snet.net>]

Consider the following:

(setq gnus-posting-styles
      '((".*"
	 (name "Bill Clinton")
	 (address "clinton@usa.com"))
	((and message-this-is-mail (equal nnml-current-group "clinton"))
	 (address "clinton@usa.com"))
	((and message-this-is-mail (equal nnml-current-group "private"))
	 (address "clinton_private@usa.com"))
	))

My intention was to set the headers as appropriate when replying to
messages in the various groups, and for this purpose the variable
works fine.

When I'm in the *Group* buffer, however, and begin composing a new
message, the posting style is set according to the last group I was in
before exiting to the *Group* buffer (/nnml-current-group/ remains
set, as one would expect).  I would like the posting style to be
something else in this case (specifically the ".*" default style).
I'm about to hack something up using variables like /current-buffer/
and the like, but thought I'd ask here first.

Thanks.

/taso