From 23c6fe6e28b8b6f356bae60e2fc773c41cd8b540 Mon Sep 17 00:00:00 2001 From: Katsumi Yamaoka Date: Mon, 9 Dec 2013 00:35:04 +0000 Subject: [PATCH 1/1] gnus-msg.el (gnus-setup-message): Fix last commit --- lisp/gnus-msg.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el index f5045e9b3..87eb6af9e 100644 --- a/lisp/gnus-msg.el +++ b/lisp/gnus-msg.el @@ -433,12 +433,14 @@ Thank you for your help in stamping out bugs. (,buffer (buffer-name (current-buffer))) (,article (if (and (gnus-nnir-group-p gnus-newsgroup-name) gnus-article-reply) - (nnir-article-number (length gnus-article-reply)) + (nnir-article-number (or (car-safe gnus-article-reply) + gnus-article-reply)) gnus-article-reply)) (,yanked gnus-article-yanked-articles) (,group (if (and (gnus-nnir-group-p gnus-newsgroup-name) gnus-article-reply) - (nnir-article-group (length gnus-article-reply)) + (nnir-article-group (or (car-safe gnus-article-reply) + gnus-article-reply)) gnus-newsgroup-name)) (message-header-setup-hook (copy-sequence message-header-setup-hook)) -- 2.25.1