Problem fetching parent articles with ^

[Mark Thomas <swoon@bellatlantic.net>]

[-- Attachment #1: Type: text/plain, Size: 1294 bytes --]


When in the *Summary* buffer, I have problems when I try to fetch
parent articles with ^.

For example, I'm reading gmane.emacs.gnus.general from news.gmane.org;
the first article that I see in the
  Unable to customize group in very recent Oort
thread is <4n65ss2347.fsf@lockgroove.bwh.harvard.edu>

When I press ^ to get that message's parent, I get a message about the
article being a pseudo-article.  When I look in the " *nntpd*" buffer,
I see the headers of <86wulirxo7.fsf@asfast.com>, the requested parent
article.

I have set debug-on-error to t to generate the attached back trace; I
also have included the " *nntpd*" buffer and relevant sections from my
~/.gnus.

One odd thing is that it doesn't always happen.  If I select
<uheccdavq.fsf@xpediantsolutions.com> from the
  nnoo bug - unable to open secondary nntp server when offline
thread and press ^, I see <m3el7gsy8k.fsf@quimbies.gnus.org>.
However, if I press ^ on that article I get the pseudo-article error,
and " *nntpd*" contains the headers of the parent,
<uwul9vgg0.fsf@xpediantsolutions.com>.

Thanks,

-Mark


Oort Gnus v0.13
XEmacs 21.4 (patch 11) "Native Windows TTY Support" [Lucid] (i686-pc-linux, Mule) of Mon Jan  6 2003 on svelte.home
200 main.gmane.org InterNetNews NNRP server INN 2.3.2 ready (posting ok).


[-- Attachment #2: Backtrace when pressing ^ in *Summary* --]
[-- Type: text/plain, Size: 3726 bytes --]

Signaling: (error "This is a pseudo-article")
  signal(error ("This is a pseudo-article"))
  cerror("This is a pseudo-article")
  apply(cerror "This is a pseudo-article" nil)
  error("This is a pseudo-article")
  (and (not pseudo) (gnus-summary-article-pseudo-p article) (error "This is a pseudo-article"))
  (let ((article ...) (all-headers ...) gnus-summary-display-article-function) (and (not pseudo) (gnus-summary-article-pseudo-p article) (error "This is a pseudo-article")) (save-excursion (set-buffer gnus-summary-buffer) (if ... ... ...)))
  gnus-summary-select-article(nil nil nil 48820)
  (progn (gnus-summary-select-article nil nil nil number) (throw (quote found) t))
  (if (setq number (gnus-summary-insert-subject message-id)) (progn (gnus-summary-select-article nil nil nil number) (throw ... t)))
  (when (setq number (gnus-summary-insert-subject message-id)) (gnus-summary-select-article nil nil nil number) (throw (quote found) t))
  (while --dolist-temp--12665 (setq gnus-override-method (car --dolist-temp--12665)) (gnus-check-server gnus-override-method) (when (setq number ...) (gnus-summary-select-article nil nil nil number) (throw ... t)) (setq --dolist-temp--12665 (cdr --dolist-temp--12665)))
  (let ((--dolist-temp--12665 ...) gnus-override-method) (while --dolist-temp--12665 (setq gnus-override-method ...) (gnus-check-server gnus-override-method) (when ... ... ...) (setq --dolist-temp--12665 ...)) nil)
  (catch (quote --cl-block-nil--) (let (... gnus-override-method) (while --dolist-temp--12665 ... ... ... ...) nil))
  (cl-block-wrapper (catch (quote --cl-block-nil--) (let ... ... nil)))
  (block nil (let (... gnus-override-method) (while --dolist-temp--12665 ... ... ... ...) nil))
  (dolist (gnus-override-method (gnus-refer-article-methods)) (gnus-check-server gnus-override-method) (when (setq number ...) (gnus-summary-select-article nil nil nil number) (throw ... t)))
  (catch (quote found) (dolist (gnus-override-method ...) (gnus-check-server gnus-override-method) (when ... ... ...)) (gnus-message 3 "Couldn't fetch article %s" message-id))
  (cond ((and header ...) (prog1 ... ...)) (t (catch ... ... ...)))
  (let* ((header ...) (sparse ...) number) (cond (... ...) (t ...)))
  (progn (unless (string-match "^<" message-id) (setq message-id ...)) (unless (string-match ">$" message-id) (setq message-id ...)) (let* (... ... number) (cond ... ...)))
  (if (and (stringp message-id) (not ...)) (progn (unless ... ...) (unless ... ...) (let* ... ...)))
  (when (and (stringp message-id) (not ...)) (unless (string-match "^<" message-id) (setq message-id ...)) (unless (string-match ">$" message-id) (setq message-id ...)) (let* (... ... number) (cond ... ...)))
  gnus-summary-refer-article("<86wulirxo7.fsf@asfast.com>")
  (if (gnus-summary-refer-article (gnus-parent-id ref skip)) nil (gnus-message 1 "Couldn't find parent"))
  (unless (gnus-summary-refer-article (gnus-parent-id ref skip)) (gnus-message 1 "Couldn't find parent"))
  (if (and ref (not ...)) (unless (gnus-summary-refer-article ...) (gnus-message 1 "Couldn't find parent")) (gnus-message 1 "No references in article %d" (gnus-summary-article-number)) (setq error t))
  (while (and (> n 0) (not error)) (setq header (gnus-summary-article-header)) (if (and ... ...) (save-excursion ... ... ... ...) (setq ref ...)) (if (and ref ...) (unless ... ...) (gnus-message 1 "No references in article %d" ...) (setq error t)) (decf n))
  (let ((skip 1) error header ref) (when (not ...) (setq skip ... n 1)) (while (and ... ...) (setq header ...) (if ... ... ...) (if ... ... ... ...) (decf n)) (gnus-summary-position-point) n)
  gnus-summary-refer-parent-article(1)
  call-interactively(gnus-summary-refer-parent-article)

[-- Attachment #3: Contents of ' *nntpd*' buffer when error occurs --]
[-- Type: text/plain, Size: 2602 bytes --]

211 48820 Article retrieved.
Path: main.gmane.org!not-for-mail
From: Lloyd Zusman <ljz@asfast.com>
Newsgroups: gmane.emacs.gnus.general
Subject: Re: Unable to customize group in very recent Oort
Date: Mon, 06 Jan 2003 12:32:56 -0500
Organization: FreeBSD/Linux Hippopotamus Preserve
Lines: 45
Sender: owner-ding@hpc.uh.edu
Approved: news@gmane.org
Message-ID: <86wulirxo7.fsf@asfast.com>
References: <86el7txo23.fsf@asfast.com> <m3bs2w61o5.fsf@heechee.beld.net>
NNTP-Posting-Host: main.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Trace: main.gmane.org 1041874382 28312 80.91.224.249 (6 Jan 2003 17:33:02 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Mon, 6 Jan 2003 17:33:02 +0000 (UTC)
Cc: ding@gnus.org
Return-path: <owner-ding@hpc.uh.edu>
Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 18Vb7U-0007Lx-00 for <ding-account@gmane.org>; Mon, 06 Jan 2003 18:33:00 +0100
Original-Received: from sina.hpc.uh.edu ([129.7.128.10] ident=lists) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 18Vb7k-0004dl-00; Mon, 06 Jan 2003 11:33:16 -0600
Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Mon, 06 Jan 2003 11:34:09 -0600 (CST)
Original-Received: from sclp3.sclp.com (sclp3.sclp.com [66.230.238.2]) by sina.hpc.uh.edu (8.9.3/8.9.3) with SMTP id LAA07545 for <ding@hpc.uh.edu>; Mon, 6 Jan 2003 11:33:58 -0600 (CST)
Original-Received: (qmail 3166 invoked by alias); 6 Jan 2003 17:33:00 -0000
Delivered-To: alias-ding@gnus.org
Original-Received: (qmail 3161 invoked from network); 6 Jan 2003 17:33:00 -0000
Original-Received: from home.acholado.net (HELO home) (Potamus@216.27.138.216) by 66.230.238.6 with SMTP; 6 Jan 2003 17:33:00 -0000
Original-Received: from localhost (localhost [127.0.0.1]) (uid 1001) by home with local; Mon, 06 Jan 2003 12:32:56 -0500
Original-To: Lloyd Zusman <ljz@asfast.com>
X-Face: "!ga1s|?LNLE3MeeeEYs(%LIl9q[xV9!<nimJxd1qyQRquvu5XTnZ:_5VE-G&4*EAuW"7oJLIXj'DWrJ0z@,FlwvD2PA@qhQ2R#zgsc14Klk;OSE'*;+l8p?0^nK7*X#0zg5wd^!M^2pg,M4Qd^{1viG;fa{}b.s[?g(x$45c]]=@'ZQ&]sPXl!u:hxBAv>j4#xf4!**BFW_ihlOb;:Slb>)vy>CJM<qjGM,/6C6\|{))YWm6}Q#?3om%n8
In-Reply-To: <m3bs2w61o5.fsf@heechee.beld.net> (Ted Zlatanov's message of "Sat, 04 Jan 2003 16:32:58 -0500")
User-Agent: Gnus/5.090008 (Oort Gnus v0.08) XEmacs/21.4 (Common Lisp, i386-debian-linux)
Precedence: list
X-Majordomo: 1.94.jlt7
Xref: main.gmane.org gmane.emacs.gnus.general:48820
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:48820
.

[-- Attachment #4: User settings --]
[-- Type: application/emacs-lisp, Size: 16241 bytes --]