From 1ad85178f47fc372899910e5d9b9f7ca9aecc711 Mon Sep 17 00:00:00 2001 From: David Engster Date: Wed, 7 Jan 2009 10:41:21 +0000 Subject: [PATCH] * gnus-msg.el (gnus-inews-do-gcc): Fix last patch to deal with simplified server definitions by converting it via g-server-to-method. --- lisp/ChangeLog | 5 +++++ lisp/gnus-msg.el | 5 ++++- 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5574a8460..255483854 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2009-01-07 David Engster + + * 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 * gnus-sum.el (gnus-summary-set-local-parameters): Always evaluate diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el index 822665dd9..229ceb44f 100644 --- a/lisp/gnus-msg.el +++ b/lisp/gnus-msg.el @@ -1677,7 +1677,10 @@ this is a reply." 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 -- 2.34.1