X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fgnus-soup.el;h=3d9782969a69229c772b9b52438076ccb14bd236;hb=a45dd507bf71d9e3fbfb6067896554323b02b643;hp=08f817610ab5bdfc0fdbb4d337b2381ae2cf055d;hpb=2c3c8d504c37c5fa0cf60370b9c0e7460972b9ef;p=elisp%2Fgnus.git-

diff --git a/lisp/gnus-soup.el b/lisp/gnus-soup.el
index 08f8176..3d97829 100644
--- a/lisp/gnus-soup.el
+++ b/lisp/gnus-soup.el
@@ -540,8 +540,7 @@ Return whether the unpacking was successful."
 	      (search-forward "\n\n")
 	      (forward-char -1)
 	      (insert mail-header-separator)
-	      (setq message-newsreader (setq message-mailer
-					     (gnus-extended-version)))
+	      (setq message-user-agent (gnus-extended-version))
 	      (cond
 	       ((string= (gnus-soup-reply-kind (car replies)) "news")
 		(gnus-message 5 "Sending news message to %s..."