From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/73044 Path: news.gmane.org!not-for-mail From: Julien Danjou Newsgroups: gmane.emacs.gnus.general Subject: Re: A T does not work in nnimap Date: Wed, 13 Oct 2010 15:55:39 +0200 Message-ID: References: <874ocrwjxu.fsf@andy.bu.edu> <87mxqjvuy8.fsf@andy.bu.edu> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: multipart/signed; boundary="=-=-="; micalg=pgp-sha1; protocol="application/pgp-signature" X-Trace: dough.gmane.org 1286978162 25146 80.91.229.12 (13 Oct 2010 13:56:02 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Wed, 13 Oct 2010 13:56:02 +0000 (UTC) Cc: ding@gnus.org To: Andrew Cohen Original-X-From: ding-owner+M21416@lists.math.uh.edu Wed Oct 13 15:56:01 2010 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from util0.math.uh.edu ([129.7.128.18]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1P61oG-0000hY-62 for ding-account@gmane.org; Wed, 13 Oct 2010 15:56:00 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by util0.math.uh.edu with smtp (Exim 4.63) (envelope-from ) id 1P61o6-0000EA-7E; Wed, 13 Oct 2010 08:55:50 -0500 Original-Received: from mx1.math.uh.edu ([129.7.128.32]) by util0.math.uh.edu with esmtps (TLSv1:AES256-SHA:256) (Exim 4.63) (envelope-from ) id 1P61o4-0000Dv-P7 for ding@lists.math.uh.edu; Wed, 13 Oct 2010 08:55:48 -0500 Original-Received: from quimby.gnus.org ([80.91.231.51]) by mx1.math.uh.edu with esmtp (Exim 4.72) (envelope-from ) id 1P61o2-0002JP-JB for ding@lists.math.uh.edu; Wed, 13 Oct 2010 08:55:48 -0500 Original-Received: from coquelicot-s.easter-eggs.com ([213.215.37.94]) by quimby.gnus.org with esmtp (Exim 3.36 #1 (Debian)) id 1P61o1-0007Yo-00 for ; Wed, 13 Oct 2010 15:55:45 +0200 Original-Received: from cigue.easter-eggs.fr (cigue.easter-eggs.fr [10.0.0.33]) by rose.easter-eggs.fr (Postfix) with ESMTPS id F39221428D; Wed, 13 Oct 2010 15:55:38 +0200 (CEST) Original-Received: from jdanjou by cigue.easter-eggs.fr with local (Exim 4.72) (envelope-from ) id 1P61ny-0001Lh-39; Wed, 13 Oct 2010 15:55:42 +0200 Mail-Followup-To: Andrew Cohen , ding@gnus.org In-Reply-To: <87mxqjvuy8.fsf@andy.bu.edu> (Andrew Cohen's message of "Tue, 12 Oct 2010 19:43:11 -0400") User-Agent: Gnus/5.110011 (No Gnus v0.11) Emacs/24.0.50 (gnu/linux) X-Spam-Score: -1.9 (-) List-ID: Precedence: bulk Xref: news.gmane.org gmane.emacs.gnus.general:73044 Archived-At: --=-=-= Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable On Wed, Oct 13 2010, Andrew Cohen wrote: > OK here is a first pass at modifying gnus-summary-refer-thread to work > with imap. It seemed like a good idea to factor out a thread-searching > function for nnimap, so I did.=20 Looks good. The only problem I see is that when I press A T, I then get *only* the thread I'm reading. It kicks all the other messages out of the *Summary* buffer. :-( > @@ -8828,28 +8829,35 @@ If LIMIT (the numerical prefix), fetch that many = old headers instead > of what's specified by the `gnus-refer-thread-limit' variable." > (interactive "P") > (let ((id (mail-header-id (gnus-summary-article-header))) > + (refs (split-string (or > + (mail-header-references (gnus-summary-article-header)) ""))) > (limit (if limit (prefix-numeric-value limit) > gnus-refer-thread-limit))) > - (unless (eq gnus-fetch-old-headers 'invisible) > - (gnus-message 5 "Fetching headers for %s..." gnus-newsgroup-name) > - ;; Retrieve the headers and read them in. > - (if (eq (if (numberp limit) > - (gnus-retrieve-headers > - (list (min > - (+ (mail-header-number > - (gnus-summary-article-header)) > - limit) > - gnus-newsgroup-end)) > - gnus-newsgroup-name (* limit 2)) > - ;; gnus-refer-thread-limit is t, i.e. fetch _all_ > - ;; headers. > - (gnus-retrieve-headers (list gnus-newsgroup-end) > - gnus-newsgroup-name limit)) > - 'nov) > - (gnus-build-all-threads) > - (error "Can't fetch thread from back ends that don't support NOV")) > - (gnus-message 5 "Fetching headers for %s...done" gnus-newsgroup-na= me)) > - (gnus-summary-limit-include-thread id))) > + (if (string=3D (car (gnus-group-method gnus-newsgroup-name)) > "nnimap") I'm not sure such a backend check is welcome here. Isn't there a more generic way to handle that? =2D-=20 Julien Danjou // =E1=90=B0 http://julien.danjou.info --=-=-= Content-Type: application/pgp-signature -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.10 (GNU/Linux) iEYEARECAAYFAky1ulsACgkQpGK1HsL+5c14CACePpo/GIio+hgE/5UQjSY3595A MrsAn1f438nAwiCb90YlMAN7uoG7sD6d =X0Cd -----END PGP SIGNATURE----- --=-=-=--