[Emacs-diffs] emacs-25 435af80: Fix message-cross-post-followup-to group names

[Lars Ingebrigtsen]

branch: emacs-25
commit 435af8016ade677262931fd7c4cf7aa54b226828
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    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.
---
 lisp/gnus/message.el |    2 ++
 1 files changed, 2 insertions(+), 0 deletions(-)

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 27cae74..ed0422c 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -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)))