From: sigurd@12move.de (Karl Pflästerer)
Subject: Bug in `gnus-summary-refer-thread'
Date: Sun, 09 Feb 2003 19:02:31 +0100 [thread overview]
Message-ID: <m3of5l5ohi.fsf@hamster.pflaesterer.de> (raw)
Hi,
if I use `A T' (gnus-summary-refer-thread) to fetch the whole thread I
get this error:
,----
| Signaling: (wrong-type-argument number-char-or-marker-p t)
| +(14666 t)
| (min (+ (mail-header-number ...) limit) gnus-newsgroup-end)
| (list (min (+ ... limit) gnus-newsgroup-end))
| (gnus-retrieve-headers (list (min ... gnus-newsgroup-end)) gnus-newsgroup-name (* limit 2))
| (eq (gnus-retrieve-headers (list ...) gnus-newsgroup-name (* limit 2)) (quote nov))
| (if (eq (gnus-retrieve-headers ... gnus-newsgroup-name ...) (quote nov)) (gnus-build-all-threads) (error "Can't fetch thread from backends that don't support NOV"))
| (if (eq gnus-fetch-old-headers (quote invisible)) nil (gnus-message 5 "Fetching headers for %s..." gnus-newsgroup-name) (if (eq ... ...) (gnus-build-all-threads) (error "Can't fetch thread from backends that don't support NOV")) (gnus-message 5 "Fetching headers for %s...done" gnus-newsgroup-name))
| (unless (eq gnus-fetch-old-headers (quote invisible)) (gnus-message 5 "Fetching headers for %s..." gnus-newsgroup-name) (if (eq ... ...) (gnus-build-all-threads) (error "Can't fetch thread from backends that don't support NOV")) (gnus-message 5 "Fetching headers for %s...done" gnus-newsgroup-name))
| (let ((id ...) (limit ...)) (unless (eq gnus-fetch-old-headers ...) (gnus-message 5 "Fetching headers for %s..." gnus-newsgroup-name) (if ... ... ...) (gnus-message 5 "Fetching headers for %s...done" gnus-newsgroup-name)) (gnus-summary-limit-include-thread id))
| * gnus-summary-refer-thread(nil)
| call-interactively(gnus-summary-refer-thread)
`----
I think that is because of the definition of the variable
`gnus-refer-thread-limit'
,----[ C-h v gnus-refer-thread-limit RET ]
| `gnus-refer-thread-limit' is a variable declared in Lisp.
| -- loaded from "/d/ognus/lib/xemacs/site-packages/lisp/gnus/gnus-sum.el"
|
| Value: t
|
| Documentation:
| *The number of old headers to fetch when doing A T.
| If t, fetch all the available old headers.
`----
And here in the function, `limit' is set to `t' if there is no prefix.
,----
| (defun gnus-summary-refer-thread (&optional limit)
| "Fetch all articles in the current thread.
| 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)))
| (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 (gnus-retrieve-headers
| (list (min
| (+ (mail-header-number
| (gnus-summary-article-header))
| limit)
^^^^^^
Here the wrong addition.
| gnus-newsgroup-end))
| gnus-newsgroup-name (* limit 2))
| 'nov)
| (gnus-build-all-threads)
| (error "Can't fetch thread from backends that don't support NOV"))
| (gnus-message 5 "Fetching headers for %s...done" gnus-newsgroup-name))
| (gnus-summary-limit-include-thread id)))
`----
bye
KP
--
'Twas brillig, and the slithy toves
Did gyre and gimble in the wabe;
All mimsy were the borogoves,
And the mome raths outgrabe. "Lewis Carroll" "Jabberwocky"
next reply other threads:[~2003-02-09 18:02 UTC|newest]
Thread overview: 2+ messages / expand[flat|nested] mbox.gz Atom feed top
2003-02-09 18:02 Karl Pflästerer [this message]
2003-02-11 1:12 ` Jesper Harder
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=m3of5l5ohi.fsf@hamster.pflaesterer.de \
--to=sigurd@12move.de \
/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).