From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/47963 Path: main.gmane.org!not-for-mail From: jam@jamux.com (John A. Martin) Newsgroups: gmane.emacs.gnus.general Subject: Re: Trouble selecting group in recent cvs Date: Fri, 29 Nov 2002 17:54:38 -0500 Sender: owner-ding@hpc.uh.edu Message-ID: <87of88oukx.fsf@athene.jamux.com> References: <87wumxmfjt.fsf@athene.jamux.com> <84k7iwjytf.fsf@lucy.cs.uni-dortmund.de> <871y541n1p.fsf@athene.jamux.com> <84el94ie1o.fsf@lucy.cs.uni-dortmund.de> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: multipart/signed; boundary="=-=-="; micalg=pgp-sha1; protocol="application/pgp-signature" X-Trace: main.gmane.org 1038610746 30870 80.91.224.249 (29 Nov 2002 22:59:06 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Fri, 29 Nov 2002 22:59:06 +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 18Hu69-00081K-00 for ; Fri, 29 Nov 2002 23:59:01 +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 18Hu52-0000zC-00; Fri, 29 Nov 2002 16:57:52 -0600 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Fri, 29 Nov 2002 16:58:40 -0600 (CST) Original-Received: from sclp3.sclp.com (sclp3.sclp.com [209.196.61.66]) by sina.hpc.uh.edu (8.9.3/8.9.3) with SMTP id QAA01992 for ; Fri, 29 Nov 2002 16:58:19 -0600 (CST) Original-Received: (qmail 13467 invoked by alias); 29 Nov 2002 22:55:36 -0000 Original-Received: (qmail 13442 invoked from network); 29 Nov 2002 22:54:53 -0000 Original-Received: from quimby.gnus.org (80.91.224.244) by gnus.org with SMTP; 29 Nov 2002 22:54:53 -0000 Original-Received: from news by quimby.gnus.org with local (Exim 3.12 #1 (Debian)) id 18Hu7e-0003YU-00 for ; Sat, 30 Nov 2002 00:00:34 +0100 Original-To: ding@gnus.org Original-Path: not-for-mail Original-Newsgroups: gnus.ding Original-Lines: 242 Original-NNTP-Posting-Host: athene.jamux.com Original-X-Trace: quimby.gnus.org 1038610834 13669 65.222.215.34 (29 Nov 2002 23:00:34 GMT) Original-X-Complaints-To: usenet@quimby.gnus.org Original-NNTP-Posting-Date: 29 Nov 2002 23:00:34 GMT X-Attribution: jam X-Request-PGP: http://www.tux.org/~jam/jam-gpg-keys.html X-PGP-Fingerprint: 5F05 15CF 05D2 E8D3 E7FA 8C6A 504B EFD5 BFE2 5F2F Cancel-Lock: sha1:4YupGbEZ+fZ4/qJ986E+mpmKSgM= Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:47963 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:47963 --=-=-= Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: quoted-printable >>>>> "Kai" =3D=3D Kai Gro=DFjohann >>>>> "Re: Trouble selecting group in recent cvs" >>>>> Fri, 29 Nov 2002 16:36:03 +0100 Kai> jam@jamux.com (John A. Martin) writes: >>>>>> "Kai" =3D=3D Kai Gro=DFjohann >>>>>> "Re: Trouble selecting group in recent cvs" >>>>>> Fri, 29 Nov 2002 14:22:04 +0100 >> Kai> Could you load gnus-sum.el (the .el is important) and get Kai> another backtrace? I think the new one will contain more Kai> information. >> >> ,---- >> | Signaling: (void-function nil) >> | nil() >> | funcall(nil) >> | (let ((face ...)) (unless (eq face ...) (gnus-put-text-property-= excluding-characters-with-faces beg ... ... ...) (when gnus-summary-highlig= ht-line-function ...))) >> | (let* ((list gnus-summary-highlight) (beg ...) (article ...) (sc= ore ...) (mark ...) (inhibit-read-only t) (default gnus-summary-default-sco= re) (default-high gnus-summary-default-high-score) (default-low gnus-summar= y-default-low-score) (downloaded ...)) (let (...) (unless ... ... ...))) >> | gnus-summary-highlight-line() Kai> Uh. There are two instances of `funcall' in that function, Kai> and the first one invokes gnus-summary-highlight-line-0. Kai> Does your gnus-sum.el contain gnus-summary-highlight-line-0? Yes. Kai> If not, try updating from CVS. If yes, then I'm stumped. Kai> Please investigate as follows: Kai> Put point inside the definition of Kai> gnus-summary-highlight-line and type M-x edebug-defun RET. Kai> Then do stuff that reproduces the error. During execution, Kai> Emacs will show you the source code of Kai> gnus-summary-highlight-line and allows you to single-step Kai> with SPC. Do that single-stepping and report where it fails. Kai> Also report any other strange things that you might see. ,---- | ;; New implementation by Christian Limpach . | (defun gnus-summary-highlight-line () | "Highlight current line according to `gnus-summary-highlight'." | (let* ((list gnus-summary-highlight) | (beg (gnus-point-at-bol)) | (article (gnus-summary-article-number)) | (score (or (cdr (assq (or article gnus-current-article) | gnus-newsgroup-scored)) | gnus-summary-default-score 0)) | (mark (or (gnus-summary-article-mark) gnus-unread-mark)) | (inhibit-read-only t) | (default gnus-summary-default-score) | (default-high gnus-summary-default-high-score) | (default-low gnus-summary-default-low-score) | (downloaded (and (boundp 'gnus-agent-article-alist) | gnus-agent-article-alist | ;; Optimized for when gnus-summary-highlight-li= ne is called multiple times for articles in ascending order (i.e. initial g= eneration of summary buffer). | (progn=20 | (if (and (eq gnus-summary-highlight-line-down= loaded-alist gnus-agent-article-alist) | (<=3D (caar gnus-summary-highlight-l= ine-downloaded-cached) article)) | nil | (setq gnus-summary-highlight-line-downloade= d-alist gnus-agent-article-alist | gnus-summary-highlight-line-downloade= d-cached gnus-agent-article-alist)) | (let (n) | (while (and (< (caar gnus-summary-highlight= -line-downloaded-cached) article) | (setq n (cdr gnus-summary-highl= ight-line-downloaded-cached))) | (setq gnus-summary-highlight-line-downloa= ded-cached n))) | (and (eq (caar gnus-summary-highlight-line-do= wnloaded-cached) article) | (cdar gnus-summary-highlight-line-downlo= aded-cached)))))) | =3D> (let ((face (funcall (gnus-summary-highlight-line-0))-!-)) | (unless (eq face (get-text-property beg 'face)) | (gnus-put-text-property-excluding-characters-with-faces | beg (gnus-point-at-eol) 'face | (setq face (if (boundp face) (symbol-value face) face))) | (when gnus-summary-highlight-line-function | (funcall gnus-summary-highlight-line-function article face)))))) `----v ,----^ | Recent minibuffer messages (most recent first): |=20 | Result: nil | Result: nil | Result: nil | Result: t | Result: 0 =3D C-@ | Result: 0 =3D C-@ | Result: 0 =3D C-@ | Result: ?! | Result: ?! | Result: 0 =3D C-@ | Result: 0 =3D C-@ | Result: nil | Result: nil | Result: nil | Result: 368 | Result: 368 | Result: 368 | Result: 1 =3D C-a | C-c C-a not defined. | Quit | Result: (((eq mark gnus-canceled-mark) . gnus-summary-cancelled-face) ((a= nd (> score default-high) (or (eq mark gnus-dormant-mark) (eq mark gnus-tic= ked-mark))) . gnus-summary-high-ticked-face) ((and (< score default-low) (o= r (eq mark gnus-dormant-mark) (eq mark gnus-ticked-mark))) . gnus-summary-l= ow-ticked-face) ((or (eq mark gnus-dormant-mark) (eq mark gnus-ticked-mark)= ) . gnus-summary-normal-ticked-face) ((and (> score default-high) (eq mark = gnus-ancient-mark)) . gnus-summary-high-ancient-face) ((and (< score defaul= t-low) (eq mark gnus-ancient-mark)) . gnus-summary-low-ancient-face) ((eq m= ark gnus-ancient-mark) . gnus-summary-normal-ancient-face) (downloaded . gn= us-agent-downloaded-article-face) ((and (> score default-high) (eq mark gnu= s-unread-mark)) . gnus-summary-high-unread-face) ((and (< score default-low= ) (eq mark gnus-unread-mark)) . gnus-summary-low-unread-face) ((eq mark gnu= s-unread-mark) . gnus-summary-normal-unread-face) ((and (> score default-hi= gh) (memq mark (list gnus-downloadable-mark gnus-undownloaded-mark))) . gnu= s-summary-high-unread-face) ((and (< score default-low) (memq mark (list gn= us-downloadable-mark gnus-undownloaded-mark))) . gnus-summary-low-unread-fa= ce) ((and (memq mark (list gnus-downloadable-mark gnus-undownloaded-mark)) = (memq article gnus-newsgroup-unreads)) . gnus-summary-normal-unread-face) (= (memq mark (list gnus-downloadable-mark gnus-undownloaded-mark)) . gnus-sum= mary-normal-read-face) ((> score default-high) . gnus-summary-high-read-fac= e) ((< score default-low) . gnus-summary-low-read-face) (t . gnus-summary-n= ormal-read-face)) | Generating summary... | Fetching headers for nnmaildir:sg-dc...done | Fetching headers for nnmaildir:sg-dc... | Retrieving newsgroup: nnmaildir:sg-dc... | Edebug: gnus-summary-highlight-line | Loading lazy-lock...done | Loading lazy-lock... | Loading gnus-sum.el...done | Loading gnus-sum.el... | Symbol's function definition is void: nil | Generating summary... | Fetching headers for nnmaildir:sg-dc...done | Loading sort...done | Loading sort... | Fetching headers for nnmaildir:sg-dc... | Loading gnus-ml...done | Loading gnus-ml... | Retrieving newsgroup: nnmaildir:sg-dc... | Checking new news...done | Opening nntp server on news.gnus.org...done | Opening nntp server on news.gnus.org... | nnmh: Reading incoming mail (no new mail)...done | nnmh: Reading incoming mail from file... | Opening nnmh server...done | Opening nnmh server... | Opening nndoc server on gnus-help...done | Opening nndoc server on gnus-help... | Checking new news... | No new newsgroups | Reading active file from archive via nnfolder...done | Reading active file from archive via nnfolder... | Opening nnfolder server on archive...done | Opening nnfolder server on archive... | Reading active file from archive via nnfolder... | Opening nnmaildir server...done | Opening nnmaildir server... | Reading active file via nnmaildir... | Reading active file via nnnil...done | Reading active file via nnnil... | Reading active file via nnnil... | Reading /home/jam/.newsrc.eld... | Loading bbdb-gnus...done | Loading bbdb-gnus... | Loading gnus-agent...done | Loading gnus-agent... | Loading regexp-opt...done | Loading regexp-opt... | Loading edebug...done | Loading edebug... | Loading /home/jam/.xemacs/lisp/boxquote...done | Loading /home/jam/.xemacs/lisp/boxquote... | Loading /home/jam/.xemacs/lisp/smiley...done | Loading /home/jam/.xemacs/lisp/smiley... | Reading directory /home/jam/...done | Reading directory /home/jam/... | Reading directory /home/jam/.saves-*...done | Reading directory /home/jam/.saves-*... | Loading font...done | Loading font... `---- I'm too clumbsy to nail it down clearly but I think, in ,---- | (defun gnus-summary-highlight-line-0 () | (if (and (eq gnus-summary-highlight-line-trigger=20 | gnus-summary-highlight) | gnus-summary-highlight-line-cached) | gnus-summary-highlight-line-cached | (setq gnus-summary-highlight-line-trigger gnus-summary-highlight | gnus-summary-highlight-line-cached | (let* ((cond (list 'cond)) | (c cond) | (list gnus-summary-highlight)) | (while list | (setcdr c (cons (list (caar list) (list 'quote (cdar list))= ) nil)) | (setq c (cdr c) | list (cdr list))) | (gnus-byte-compile (list 'lambda nil cond)))))) `---- the while is exited with nil. It is for sure nil over the first few iterations. I can't seem to get edebug to run up to a breakpoint and show the value coming out of the loop. For example, SPACE doesn't seem to work here for me. jam --=-=-= Content-Type: application/pgp-signature -----BEGIN PGP SIGNATURE----- iD8DBQA95/A1UEvv1b/iXy8RAgTgAJ40GkSnxP4jXDe+lOicQfXkzWoJ7ACdEv1w SavMKrErHKZ33yMn3R28IE4= =lB07 -----END PGP SIGNATURE----- --=-=-=--