From: Dave Abrahams <dave@boostpro.com>
To: ding@gnus.org
Cc: Dave Abrahams <dave@boostpro.com>
Subject: [PATCH 2/5] Record information in the registry about each article retrieved
Date: Thu, 15 Mar 2012 14:23:10 -0400 [thread overview]
Message-ID: <1331835793-70228-3-git-send-email-dave@boostpro.com> (raw)
In-Reply-To: <1331835793-70228-1-git-send-email-dave@boostpro.com>
---
lisp/gnus-sum.el | 7 +++++++
1 files changed, 7 insertions(+), 0 deletions(-)
diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 8c7334a..b37562d 100644
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -12428,6 +12428,13 @@ If REVERSE, save parts that do not match TYPE."
(not (setq header (car (gnus-get-newsgroup-headers nil t)))))
() ; Malformed head.
(unless (gnus-summary-article-sparse-p (mail-header-number header))
+ (when (and (bound-and-true-p gnus-registry-enabled)
+ (not (gnus-ephemeral-group-p (car where))))
+ (gnus-registry-handle-action
+ (mail-header-id header) nil
+ (gnus-group-prefixed-name (car where) gnus-override-method)
+ (mail-header-subject header)
+ (mail-header-from header)))
(when (and (stringp id)
(or
(not (string= (gnus-group-real-name group)
--
1.7.5.4
next prev parent reply other threads:[~2012-03-15 18:23 UTC|newest]
Thread overview: 8+ messages / expand[flat|nested] mbox.gz Atom feed top
2012-03-15 18:23 [PATCH 0/5] *** Resubmit: Warping via the registry *** Dave Abrahams
2012-03-15 18:23 ` [PATCH 1/5] Allow gnus-summary-insert-subject to work in empty groups Dave Abrahams
2012-03-15 18:23 ` Dave Abrahams [this message]
2012-03-15 18:23 ` [PATCH 3/5] Add `gnus-select-group-with-message-id' Dave Abrahams
2012-03-15 18:23 ` [PATCH 4/5] Add `gnus-try-warping-via-registry()' Dave Abrahams
2012-03-15 18:23 ` [PATCH 5/5] Enable registry-warping as a fallback if warping via the current backend fails Dave Abrahams
2012-03-19 17:05 ` [PATCH 0/5] *** Resubmit: Warping via the registry *** Ted Zlatanov
2012-03-22 20:59 ` Lars Magne Ingebrigtsen
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=1331835793-70228-3-git-send-email-dave@boostpro.com \
--to=dave@boostpro.com \
--cc=ding@gnus.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).