Fix message-cross-post-followup-to group names
* lisp/gnus/message.el (message-cross-post-followup-to): Don't insert group names like "nntp+foo:zot", because those aren't valid.
This commit is contained in:
parent
22e239cb40
commit
435af8016a
1 changed files with 2 additions and 0 deletions
|
@ -2467,6 +2467,8 @@ With prefix-argument just set Follow-Up, don't cross-post."
|
|||
nil nil '("poster" . 0)
|
||||
(if (boundp 'gnus-group-history)
|
||||
'gnus-group-history))))
|
||||
(when (fboundp 'gnus-group-real-name)
|
||||
(setq target-group (gnus-group-real-name target-group)))
|
||||
(cond ((not (or (null target-group) ; new subject not empty
|
||||
(zerop (string-width target-group))
|
||||
(string-match "^[ \t]*$" target-group)))
|
||||
|
|
Loading…
Add table
Reference in a new issue