X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fgnus-msg.el;h=e5006ecdf5f94060db1a8b6d9d0ec85ce75f52c8;hb=85093239bc794cb948ebbf5a5bd910b3d1c95cec;hp=af67d36ff144caa803d0af5e259301bc34eba4be;hpb=ea2f43b386c1bdd005351eacbecf47ed2f60fd77;p=elisp%2Fgnus.git-

diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el
index af67d36..e5006ec 100644
--- a/lisp/gnus-msg.el
+++ b/lisp/gnus-msg.el
@@ -1604,7 +1604,7 @@ The current group name will be inserted at \"%s\".")
 		 (not (gnus-group-read-only-p group)))
       (setq group (read-string "Put in group: " nil (gnus-writable-groups))))
 
-    (when (gnus-gethash group gnus-newsrc-hashtb)
+    (when (gnus-group-entry group)
       (error "No such group: %s" group))
     (save-excursion
       (save-restriction
@@ -1830,7 +1830,6 @@ this is a reply."
       (message-narrow-to-headers)
       (let ((gcc (or gcc (mail-fetch-field "gcc" nil t)))
 	    (coding-system-for-write 'raw-text)
-	    (output-coding-system 'raw-text)
 	    groups group method group-art
 	    mml-externalize-attachments)
 	(when gcc