From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/15306 Path: main.gmane.org!not-for-mail From: Kim-Minh Kaplan Newsgroups: gmane.emacs.gnus.general Subject: Re: Gnus v5.6.11 is released Supersedes: Date: Wed, 10 Jun 1998 22:00:32 GMT Organization: not organized Sender: owner-ding@hpc.uh.edu Message-ID: References: NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 (generated by SEMI MIME-Edit 0.91 - "Hinomiko") Content-Type: text/plain; charset=US-ASCII X-Trace: main.gmane.org 1035154362 21397 80.91.224.250 (20 Oct 2002 22:52:42 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 22:52:42 +0000 (UTC) Return-Path: Original-Received: from gwyn.tux.org (gwyn.tux.org [207.96.122.8]) by altair.xemacs.org (8.9.0/8.9.0) with ESMTP id PAA24020 for ; Wed, 10 Jun 1998 15:11:57 -0700 Original-Received: from gizmo.hpc.uh.edu (gizmo.hpc.uh.edu [129.7.102.31]) by gwyn.tux.org (8.8.8/8.8.8) with ESMTP id SAA11272 for ; Wed, 10 Jun 1998 18:08:27 -0400 Original-Received: from sina.hpc.uh.edu (sina.hpc.uh.edu [129.7.3.5]) by gizmo.hpc.uh.edu (8.7.6/8.7.3) with ESMTP id QAS16478; Wed, 10 Jun 1998 16:40:56 -0500 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Wed, 10 Jun 1998 17:01:14 -0500 (CDT) Original-Received: from claymore.vcinet.com (claymore.vcinet.com [208.205.12.23]) by sina.hpc.uh.edu (8.7.3/8.7.3) with SMTP id RAA05461 for ; Wed, 10 Jun 1998 17:00:57 -0500 (CDT) Original-Received: (qmail 2394 invoked by uid 504); 10 Jun 1998 22:00:38 -0000 Original-Received: (qmail 2391 invoked from network); 10 Jun 1998 22:00:37 -0000 Original-Received: from sunsite.auc.dk (130.225.51.30) by claymore.vcinet.com with SMTP; 10 Jun 1998 22:00:37 -0000 Original-Received: (qmail 23218 invoked by uid 509); 10 Jun 1998 22:00:35 -0000 Original-To: ding@gnus.org Original-Path: not-for-mail Original-Newsgroups: emacs.ding Original-Lines: 53 X-Server-Date: 8 Jun 1998 02:02:44 GMT Mail-Copies-To: never X-Emacs: 20.4 "Emerald" XEmacs Lucid without mule X-Newsreader: Gnus v5.6.11/XEmacs 20.4 - "Emerald" Original-NNTP-Posting-Host: lombric.s-ip.eunet.fr Original-NNTP-Posting-Date: Thu, 11 Jun 1998 00:00:32 MET DST Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:15306 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:15306 Karl Kleinpaste writes: > 5.6.11 has done some damage to use of gnus-fetch-old-headers. [ ... ] > seems to have lost any effect at all. Mmff, looks like the patches I sent to correct some bug introduced another one... Here is a first fix. It works better but the counting is still wrong :-( Kim-Minh. --- /usr/local/lib/xemacs/gnus/lisp/gnus-sum.el-5.6.11.el Thu Jun 4 01:13:47 1998 +++ /usr/local/lib/xemacs/gnus/lisp/gnus-sum.el Mon Jun 8 03:15:04 1998 @@ -3003,7 +3003,8 @@ ;; Look through the buffer of NOV lines and find the header to ;; ID. Enter this line into the dependencies hash table, and return ;; the id of the parent article (if any). - (let (found header) + (let ((deps gnus-newsgroup-dependencies) + found header) (prog1 (save-excursion (set-buffer nntp-server-buffer) @@ -3019,8 +3020,8 @@ (when found (beginning-of-line) (and - (setq header (gnus-nov-parse-line (read (current-buffer)) - gnus-newsgroup-dependencies)) + (setq header (gnus-nov-parse-line + (read (current-buffer)) deps)) (gnus-parent-id (mail-header-references header)))))) (when header (let ((number (mail-header-number header))) @@ -3035,7 +3036,8 @@ (defun gnus-build-all-threads () "Read all the headers." - (let ((gnus-summary-ignore-duplicates t) + (let ((deps gnus-newsgroup-dependencies) + (gnus-summary-ignore-duplicates t) found header article) (save-excursion (set-buffer nntp-server-buffer) @@ -3044,8 +3046,7 @@ (while (not (eobp)) (ignore-errors (setq article (read (current-buffer))) - (setq header (gnus-nov-parse-line article - gnus-newsgroup-dependencies))) + (setq header (gnus-nov-parse-line article deps))) (when header (push header gnus-newsgroup-headers) (if (memq (setq article (mail-header-number header)) .