compose-mail and posting-styles

[Richard Riley]

Can anyone tell me how to get compose-mail (C-x m)to use the default
posting-style when invoked when the current gnus "focus" is not in an
actual group summary buffer but rather in the groups buffer?

Currently I get a like this:

,----
| Debugger entered--Lisp error: (wrong-type-argument stringp nil)
|   
string-match("\\(?:DevelopmentEmail\\|e\\(?:cb\\|macs\\|xim4\\)\\|g\\(?:db\\|nus\\)\\|h\\(?:ardware\\|tml\\)\\|m\\(?:use\\|ysql\\)\\|networking\\|opengl\\|p\\(?:gp\\|hp\\|\\(?:la\\|ytho\\)n\\)\\|readers\\|security\\)"
 nil)
|   (or (string-match 
"\\(?:DevelopmentEmail\\|e\\(?:cb\\|macs\\|xim4\\)\\|g\\(?:db\\|nus\\)\\|h\\(?:ardware\\|tml\\)\\|m\\(?:use\\|ysql\\)\\|networking\\|opengl\\|p\\(?:gp\\|hp\\|\\(?:la\\|ytho\\)n\\)\\|readers\\|security\\)"
 gnus-newsgroup-name) (DE-bbdb-match-field-recipient (quote email-type) "dev"))
|   eval((or (string-match 
"\\(?:DevelopmentEmail\\|e\\(?:cb\\|macs\\|xim4\\)\\|g\\(?:db\\|nus\\)\\|h\\(?:ardware\\|tml\\)\\|m\\(?:use\\|ysql\\)\\|networking\\|opengl\\|p\\(?:gp\\|hp\\|\\(?:la\\|ytho\\)n\\)\\|readers\\|security\\)"
 gnus-newsgroup-name) (DE-bbdb-match-field-recipient (quote email-type) "dev")))
|   gnus-configure-posting-styles(nil)
|   #[nil "Âà  !)‡" [gnus-article-copy gnus-setup-message-group nil 
gnus-configure-posting-styles] 2]()
|   run-hooks(text-mode-hook message-mode-hook)
|   apply(run-hooks (text-mode-hook message-mode-hook))
|   run-mode-hooks(message-mode-hook)
|   message-mode()
|   message-pop-to-buffer("*mail*" nil)
|   message-mail(nil nil nil nil nil nil nil)
|   gnus-msg-mail(nil nil nil nil nil nil nil)
|   compose-mail(nil nil nil nil)
|   call-interactively(compose-mail nil nil)
`----

It works fine if I am in a Summary buffer in the Gnus context.

I'm assuming the nil passed to gnus-configure-posting-styles is causing
the issue with string-match. Pressing "m" in the groups buffer works
fine and uses the default posting style.

Not being much of an elisp programmer, should the line

    (let ((group (or group-name gnus-newsgroup-name ""))

include some sort of "default gnus group" name since group-name and
gnus-newsgroup-name are both nil?

Thanks for any pointer,

r.