From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/49283 Path: main.gmane.org!not-for-mail From: Danny Siu Newsgroups: gmane.emacs.gnus.general Subject: Re: Gnus lies about downloaded state Date: Wed, 15 Jan 2003 17:21:03 -0800 Organization: Adobe Systems Incorporated Sender: owner-ding@hpc.uh.edu Message-ID: NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: main.gmane.org 1042680149 26338 80.91.224.249 (16 Jan 2003 01:22:29 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Thu, 16 Jan 2003 01:22:29 +0000 (UTC) Return-path: Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 18Yyjj-0006qW-00 for ; Thu, 16 Jan 2003 02:22:27 +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 18YykV-0002Uj-00; Wed, 15 Jan 2003 19:23:15 -0600 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Wed, 15 Jan 2003 19:24:10 -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 TAA11065 for ; Wed, 15 Jan 2003 19:23:53 -0600 (CST) Original-Received: (qmail 48036 invoked by alias); 16 Jan 2003 01:22:53 -0000 Original-Received: (qmail 48031 invoked from network); 16 Jan 2003 01:22:53 -0000 Original-Received: from smtp-relay-1.adobe.com (192.150.11.1) by 66.230.238.6 with SMTP; 16 Jan 2003 01:22:53 -0000 Original-Received: from inner-relay-2.corp.adobe.com (inner-relay-2 [153.32.1.52]) by smtp-relay-1.adobe.com (8.12.3/8.12.3) with ESMTP id h0G1MNiM021023 for ; Wed, 15 Jan 2003 17:22:24 -0800 (PST) Original-Received: from mailsj-v1.corp.adobe.com (mailsj-dev.corp.adobe.com [153.32.1.192]) by inner-relay-2.corp.adobe.com (8.12.3/8.12.3) with ESMTP id h0G1MI4W029894 for ; Wed, 15 Jan 2003 17:22:18 -0800 (PST) Original-Received: from GIGI.corp.adobe.com ([153.32.155.49]) by mailsj-v1.corp.adobe.com (Netscape Messaging Server 4.15 v1 Jul 11 2001 16:32:57) with ESMTP id H8S95600.36A for ; Wed, 15 Jan 2003 17:22:18 -0800 Original-To: ding@gnus.org X-Mailer: Oort Gnus v0.13 X-Location: Hong Kong X-Face: fHBvLrQQW(GRz#RNTAN(,')p8NGv}{6dMh\:?%*D\+8hgkiA_dub1@\,Y"r5'a8C(8e~cGG(WFTU\OlAqI[B?V7m'ZGkquvZ/d k~E"A"@WK;0mLF&\%W1kIC]O"z#/>YNUefE1%5/NUX;ml]@$nW;05Z9uZ/CqTz]A)+`1ROuF~||pG= k>Zi@hE- X-Emacs: 21.2.1 Mail-Followup-To: ding@gnus.org User-Agent: Gnus/5.090013 (Oort Gnus v0.13) Emacs/21.2 (i386-msvc-nt5.0.2195) Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:49283 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:49283 Kevin Greiner writes: Kevin> Well, the good news is that you and Danny are reporting consistent Kevin> results. The bad news is that we've narrowed the problem to Kevin> gnus-sum! Kevin> What value do you have for gnus-summary-mark-positions? (It's Kevin> buffer local to the summary buffer.) gnus-summary-mark-positions's value is ((download . 8) (score . 2) (replied . 1) (unread . 0)) Kevin> You should see (download . #) where # is the column number where Kevin> you expect to see the +/- download mark. Kevin> If that looks right, try adding this statement to the beginning of Kevin> gnus-summary-insert-line Kevin> (princ (format "%s %s\n" gnus-tmp-current undownloaded (get-buffer Kevin> "**scratch**"))) nil t nil t This is strange. gnus-summary-insert-line only called twice? I have ~250 unread articles. and Why article number is nil? hmmm... Kevin> This will print the article number and download status (downloaded Kevin> ==> nil / undownloaded ==> t) to the scratch buffer. Kevin> After displaying the summary, check scratch to see if the download Kevin> flag matches what is displayed. By your descriptions it should not Kevin> match. Kevin> Pls send me the value of your gnus-format-specs. ((summary-dummy " %(|---------------------------|%) %S\n" (progn (insert " ") (gnus-put-text-property (point) (progn (insert "|---------------------------|") (point)) gnus-mouse-face-prop gnus-mouse-face) (insert " " gnus-tmp-subject "\n"))) (summary-mode "Gnus: %g [%A] %Z" (concat (format "Gnus: %s [%d] %s" (gnus-short-group-name gnus-tmp-group-name) gnus-tmp-article-number gnus-tmp-unread-and-unselected))) (summary "%U%R%z%5N%O %(%8&user-date; %~(pad 2)~(max 2)~(ignore \"1\")t%[%5k:%* %-20,20n%] %B%s%)\n" (let (gnus-position) (insert (format "%c%c%c%5d%c " gnus-tmp-unread gnus-tmp-replied gnus-tmp-score-char (aref gnus-tmp-header 0) gnus-tmp-downloaded)) (gnus-put-text-property (point) (progn (insert (format "%8s %2s%c%5s:" (gnus-user-date (aref gnus-tmp-header 3)) (let* ((val (eval (let ((val (eval (let ((val (eval (int-to-string (gnus-summary-number-of-articles-in-thread (and (boundp 'thread) (car thread)) gnus-tmp-level))))) (if (equal val "1") "" val))))) (if (> (string-width val) 2) (gnus-correct-substring val 0 2) val)))) (need (- 2 (string-width val)))) (if (> need 0) (concat (make-string need 32) val nil) val)) gnus-tmp-opening-bracket (gnus-summary-line-message-size gnus-tmp-header))) (setq gnus-position (point)) (insert (format " %-20s%c %s%s" (let* ((val (eval (if (> (string-width gnus-tmp-name) 20) (gnus-correct-substring gnus-tmp-name 0 20) gnus-tmp-name))) (need (- 20 (string-width val)))) (if (> need 0) (concat nil val (make-string need 32)) val)) gnus-tmp-closing-bracket gnus-tmp-thread-tree-header-string gnus-tmp-subject-or-nil)) (point)) gnus-mouse-face-prop gnus-mouse-face) (insert "\n") (if gnus-position (gnus-put-text-property gnus-position (1+ gnus-position) 'gnus-position t)))) (group-mode "Gnus: %%b {%M%:%S}" (concat (format "Gnus: %%b {%s%s%s}" gnus-tmp-news-method gnus-tmp-colon gnus-tmp-news-server))) (group "%m%M%S%P%2L [.%~(ignore 0)-3U !%~(ignore 0)-3T] %4y: %(%-20uG%) %20ue\n" (progn (insert (format "%c%c%c%s%2d [.%-3s !%-3s] %4s: " (gnus-group-new-mail gnus-tmp-group) gnus-tmp-marked-mark gnus-tmp-subscribed gnus-group-indentation gnus-tmp-level (let* ((val (eval (let ((val (eval (int-to-string (gnus-number-of-unseen-articles-in-group gnus-tmp-group))))) (if (equal val "0") "" val)))) (need (- 3 (string-width val)))) (if (> need 0) (concat nil val (make-string need 32)) val)) (let* ((val (eval (let ((val (eval (int-to-string (gnus-range-length (cdr (assq 'tick gnus-tmp-marked))))))) (if (equal val "0") "" val)))) (need (- 3 (string-width val)))) (if (> need 0) (concat nil val (make-string need 32)) val)) gnus-tmp-number-of-unread)) (gnus-put-text-property (point) (progn (insert (format "%-20s" (gnus-user-format-function-G gnus-tmp-header))) (point)) gnus-mouse-face-prop gnus-mouse-face) (insert (format " %20s\n" (gnus-user-format-function-e gnus-tmp-header))))) (version . "21.2.1") (article-mode "Gnus: %g [%w] %S%m" (concat (format "Gnus: %s [%s] %s%s" (gnus-short-group-name gnus-tmp-group-name) (gnus-article-wash-status) gnus-tmp-subject (gnus-article-mime-part-status))))) Kevin> Kevin -- Danny Siu