Changes committed gnus/lisp (ChangeLog gnus-msg.el)

"David Engster" <[email protected]> Wed, 07 Jan 2009 11:41:21 +0100
Newsgroups gmane.emacs.gnus.commits
Message-ID <[email protected]>
Modified: ChangeLog gnus-msg.el

* gnus-msg.el (gnus-inews-do-gcc): Fix last patch to deal with
simplified server definitions by converting it via g-server-to-method.


Index: ChangeLog
diff -u gnus/lisp/ChangeLog:7.1968 gnus/lisp/ChangeLog:7.1969
--- ChangeLog:7.1968	Tue Jan  6 23:11:07 2009
+++ ChangeLog	Wed Jan  7 11:41:21 2009
@@ -1,3 +1,8 @@
+2009-01-07  David Engster  <[email protected]>
+
+	* gnus-msg.el (gnus-inews-do-gcc): Fix last patch to deal with
+	simplified server definitions by converting it via g-server-to-method.
+
 2009-01-06  Katsumi Yamaoka  <[email protected]>
 
 	* gnus-sum.el (gnus-summary-set-local-parameters): Always evaluate
Index: gnus-msg.el
diff -u gnus/lisp/gnus-msg.el:7.70 gnus/lisp/gnus-msg.el:7.71
--- gnus-msg.el:7.70	Tue Jan  6 16:25:17 2009
+++ gnus-msg.el	Wed Jan  7 11:41:21 2009
@@ -1677,7 +1677,10 @@
 				    group method t t))))
 		(gnus-message 1 "Couldn't store article in group %s: %s"
 			      group (gnus-status-message method)))
-	      (when (gnus-native-method-p method)
+	      (when (stringp method)
+		(setq method (gnus-server-to-method method)))
+	      (when (and (listp method)
+			 (gnus-native-method-p method))
 		(setq group (gnus-group-short-name group)))
 	      (when (and group-art
 			 ;; FIXME: Should gcc-mark-as-read work when