Gnus development mailing list
 help / color / mirror / Atom feed
From: Robert Epprecht <epprecht@sunweb.ch>
Cc: p_oster_2000@yahoo.com
Subject: subscribe to new group with agent
Date: 16 May 2001 16:52:27 +0200	[thread overview]
Message-ID: <86k83hxs5w.fsf@i2d.home> (raw)

In April there was a thread in gnu.emacs.gnus (same subject)
about subscribing to huge newsgroups with the Agent. Sometimes
you might want to bypass the download of all the headers if you
intend to catch up after that anyway. 

In <m3vgoo7lfm.fsf.p_oster_2000.yahoo.com@clara.net> "Poster 2000"
sent a piece of code which let's you limit the download to a number
of the most recent messages.  As I have found this code very helpful
I asked him for permission to send his code here. Here it is:

/-----------------------------------------------------------------
|
|  I have had this problem with a couple of large groups I was reading
|  once. I came up with the following which seems to work sometimes.
|  
|  (defun gnus-catchup-limited (offset)
|    "catches up to N in the past"
|    (interactive "p")
|    (setq NAME (gnus-group-group-name))
|    (save-excursion
|      (gnus-group-read-group 1 t NAME)
|      (setq END (- gnus-newsgroup-end offset))
|      (setq START (cdar(nth 2 (gnus-get-info NAME))))
|      (gnus-summary-exit)
|      (setq ITEMS nil)
|      (while (>= END START)
|        (setq ITEMS (cons END ITEMS))
|        (setq END (- END 1)))
|      (gnus-group-make-articles-read NAME ITEMS)))
|  
|  It catches up whatever group is under point to the last N article
|  numbers or it is supposed to. It seems to fail if it can not fetch the
|  first, or is it last article ie C-u 1 RET fails.
|  
\-----------------------------------------------------------------

Couldn't something like this be included in Gnus?

Robert Epprecht


                 reply	other threads:[~2001-05-16 14:52 UTC|newest]

Thread overview: [no followups] expand[flat|nested]  mbox.gz  Atom feed

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=86k83hxs5w.fsf@i2d.home \
    --to=epprecht@sunweb.ch \
    --cc=p_oster_2000@yahoo.com \
    /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).