From 435af8016ade677262931fd7c4cf7aa54b226828 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Tue, 9 Feb 2016 10:34:59 +1100 Subject: [PATCH] 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 file changed, 2 insertions(+) diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index 27cae74c755..ed0422c1f4d 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))) -- 2.39.5