Fix Gnus gcc header tokenization

* lisp/gnus/gnus-msg.el (gnus-summary-resend-message-insert-gcc)
(gnus-inews-do-gcc): Fix tokenization of the gcc header.

diff --git a/lisp/gnus/gnus-msg.el b/lisp/gnus/gnus-msg.el
index e88aa8f7d09480059ebc773c8892d234252fcd64..dfadfd3920159e00cf104ddc8402dc18b1d39e34 100644 (file)
--- a/lisp/gnus/gnus-msg.el
+++ b/lisp/gnus/gnus-msg.el
@@ -1305,7 +1305,7 @@ For the \"inline\" alternatives, also see the variable
   (gnus-inews-insert-gcc)
   (let ((gcc (message-unquote-tokens
               (message-tokenize-header (mail-fetch-field "gcc" nil t)
-                                       " ,")))
+                                       ",")))
        (self (with-current-buffer gnus-summary-buffer
                gnus-gcc-self-resent-messages)))
     (message-remove-header "gcc")
@@ -1572,7 +1572,7 @@ this is a reply."
          (message-remove-header "gcc")
          (widen)
          (setq groups (message-unquote-tokens
-                       (message-tokenize-header gcc " ,\n\t")))
+                       (message-tokenize-header gcc ",\n\t")))
          ;; Copy the article over to some group(s).
          (while (setq group (pop groups))
            (setq method (gnus-inews-group-method group))