[PB] Scores Take II

[PB] Scores Take II

[Xavier Maillard]

Hello,

I still do not have clue to solve this.

If I want to read any group, I have to disable gnus-scoring. If
not done, this is what I get (bigger backtrace):

Debugger entered--Lisp error: (wrong-type-argument symbolp 5)
  symbol-name(5)
  (aref (symbol-name type) 0)
  (let* ((kill ...) (type ...) (score ...) (date ...) (extra ...) (found nil) (mt ...) (case-fold-search ...) (dmt ...) (match ...) (search-func ...)) (when extra (setq match ... search-func ...)) (cond (... ... ...) (... ... ...) (... ... ... ...) (t ... ... ... ...)))
  (while (cdr entries) (let* (... ... ... ... ... ... ... ... ... ... ...) (when extra ...) (cond ... ... ... ...)))
  (while score-list (setq alist (pop score-list) entries (assoc header alist)) (while (cdr entries) (let* ... ... ...)))
  (let ((gnus-score-index ...) (simplify ...) alike last this art entries alist articles fuzzies arts words kill) (setq gnus-scores-articles (if ... gnus-scores-articles ...) articles gnus-scores-articles) (erase-buffer) (while (setq art ...) (setq this ...) (if ... ...) (if simplify ...) (if ... ... ... ...)) (when last (insert last 10) (put-text-property ... ... ... alike)) (while score-list (setq alist ... entries ...) (while ... ...)) (when fuzzies (gnus-simplify-buffer-fuzzy) (while ... ...)) (when words (let ... ... ...)) nil)
  gnus-score-string((((touched nil) ("from" ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...))) "from" 732190 732180 nil)
  funcall(gnus-score-string (((touched nil) ("from" ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...))) "from" 732190 732180 nil)
  (setq new (funcall (nth 2 entry) scores header now expire trace))
  (if (setq new (funcall ... scores header now expire trace)) (progn (push new news)))
  (when (setq new (funcall ... scores header now expire trace)) (push new news))
  (progn (when (setq new ...) (push new news)))
  (if (< 0 (apply ... ...)) (progn (when ... ...)))
  (when (< 0 (apply ... ...)) (when (setq new ...) (push new news)))
  (while entries (setq entry (pop entries) header (nth 0 entry) gnus-score-index (nth 1 ...)) (when (< 0 ...) (when ... ...)))
  (save-excursion (set-buffer (gnus-get-buffer-create "*Headers*")) (buffer-disable-undo) (when (gnus-buffer-live-p gnus-summary-buffer) (message-clone-locals gnus-summary-buffer)) (setq gnus-current-score-file current-score-file) (when gnus-orphan-score (setq gnus-score-index ...) (gnus-score-orphans gnus-orphan-score)) (while entries (setq entry ... header ... gnus-score-index ...) (when ... ...)) (when (gnus-buffer-live-p gnus-summary-buffer) (let ... ...)) (gnus-kill-buffer (current-buffer)))
  (let* ((entries gnus-header-index) (now ...) (expire ...) (headers gnus-newsgroup-headers) (current-score-file gnus-current-score-file) entry header new) (gnus-message 7 "Scoring...") (while (setq header ...) (unless ... ...)) (save-excursion (set-buffer ...) (buffer-disable-undo) (when ... ...) (setq gnus-current-score-file current-score-file) (when gnus-orphan-score ... ...) (while entries ... ...) (when ... ...) (gnus-kill-buffer ...)) (while gnus-scores-articles (when ... ...) (setq gnus-scores-articles ...)) (let (score) (while ... ...)) (gnus-message 7 "Scoring...done"))
  (progn (let* (... ... ... ... ... entry header new) (gnus-message 7 "Scoring...") (while ... ...) (save-excursion ... ... ... ... ... ... ... ...) (while gnus-scores-articles ... ...) (let ... ...) (gnus-message 7 "Scoring...done")))
  (if (and gnus-summary-default-score scores) (progn (let* ... ... ... ... ... ... ...)))
  (when (and gnus-summary-default-score scores) (let* (... ... ... ... ... entry header new) (gnus-message 7 "Scoring...") (while ... ...) (save-excursion ... ... ... ... ... ... ... ...) (while gnus-scores-articles ... ...) (let ... ...) (gnus-message 7 "Scoring...done")))
  (while news (setq scores news news nil) (when (and gnus-summary-default-score scores) (let* ... ... ... ... ... ... ...)))
  (let (scores news) (setq gnus-orphan-score nil gnus-scores-articles nil gnus-scores-exclude-files nil scores (gnus-score-load-files score-files)) (setq news scores) (while news (setq scores news news nil) (when ... ...)))
  gnus-score-headers((((... ...)) "/home/zedek/.gnus.d/etc/scores/nnimap+gnu-rox.org:INBOX.mail.2005.08.SCORE") nil)
  (progn (gnus-score-headers score-files trace))
  (if score-files (progn (gnus-score-headers score-files trace)))
  (when score-files (gnus-score-headers score-files trace))
  (let ((score-files ...)) (when score-files (gnus-score-headers score-files trace)))
  gnus-possibly-score-headers()
  gnus-summary-read-group-1("nnimap+gnu-rox.org:INBOX.mail.2005.08" nil t nil nil nil)
  gnus-summary-read-group("nnimap+gnu-rox.org:INBOX.mail.2005.08" nil t nil nil nil nil)
  gnus-group-read-group(nil t)
  gnus-group-select-group(nil)
  gnus-topic-select-group(nil)
  call-interactively(gnus-topic-select-group)

I no longer have score files just to be sure they are not the
source problem.

Regards.
-- 
   ,--.    Xavier Maillard, Reims, France                   ,= ,-_-. =.
  / ,- )   http://www.emacsfr.org/                         ((_/)o o(\_))
  \ `-'                                                     `-'(. .)`-'
   `-.     Debian, a variant of the GNU operating system.       \_/

Re: [PB] Scores Take II

[Xavier Maillard]

Xavier Maillard <zedek <at> gnu-rox.org> writes:

> 
> Hello,
> 
> I still do not have clue to solve this.

Really nobody can try to takle this problem ?

Scoring is broken here but I guess I am alone with that problem since nobody has
reported something related to my problem. So what should I check ?

Regards.

Re: [PB] Scores Take II

[Florian Weimer]

* Xavier Maillard:

> I no longer have score files just to be sure they are not the
> source problem.

Are you sure?  Apparently, Gnus opens the following file:

/home/zedek/.gnus.d/etc/scores/nnimap+gnu-rox.org:INBOX.mail.2005.08.SCORE

Re: [PB] Scores Take II

[Matthieu Moy]

Xavier Maillard <zedek@gnu-rox.org> writes:

> Scoring is broken here but I guess I am alone with that problem since nobody has
> reported something related to my problem. So what should I check ?

Try also

  mv ~/.newsrc.eld ~/newsrc.eld.bak

-- 
Matthieu

Re: [PB] Scores Take II

[Xavier Maillard]

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

On 3 Sep 2005, Florian Weimer verbalised:

> * Xavier Maillard:
> 
> > I no longer have score files just to be sure they are not the
> > source problem.
> 
> Are you sure?  

Oh yes I am 10000% sure.

See:

,----[ ls -l /home/zedek/.gnus.d/etc/scores/ ]
| total 0
`----

> Apparently, Gnus opens the following file:

Gnus is wrong here.
-- 
 In Gruuik we trust


[-- Attachment #2: Type: application/pgp-signature, Size: 188 bytes --]

Re: [PB] Scores Take II

[Xavier Maillard]

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

On 3 Sep 2005, Matthieu Moy verbalised:

> Xavier Maillard <zedek@gnu-rox.org> writes:
> 
> > Scoring is broken here but I guess I am alone with that
> > problem since nobody has reported something related to my
> > problem. So what should I check ?
> 
> Try also
> 
> mv ~/.newsrc.eld ~/newsrc.eld.bak

Hum, this is exactly the last thing I would do :) I will try to
find something else.
-- 
.o.   Xavier Maillard            Tel: +33 6 68 04 64 37
..o  
ooo   


[-- Attachment #2: Type: application/pgp-signature, Size: 188 bytes --]

Re: [PB] Scores Take II

[drkm]

Xavier Maillard writes:

> Debugger entered--Lisp error: (wrong-type-argument symbolp 5)
>   symbol-name(5)
>   (aref (symbol-name type) 0)
>   (let* ((kill ...) (type ...) (score ...)

  It's not easy to track where the wrong value is from, because
it's in the second '...'.  Can you please make a full version of
the backtrace available somewhere on the web?  If you don't want
to make it public, you can send it on my email box.

--drkm

Re: [PB] Scores Take II

[Xavier Maillard]

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

On 4 Sep 2005, drkm verbalised:

> Xavier Maillard writes:
> 
> > Debugger entered--Lisp error: (wrong-type-argument symbolp 5)
> > symbol-name(5)
> > (aref (symbol-name type) 0)
> > (let* ((kill ...) (type ...) (score ...)
> 
> It's not easy to track where the wrong value is from, because
> it's in the second '...'. Can you please make a full version of
> the backtrace available somewhere on the web? If you don't want
> to make it public, you can send it on my email box.

This is the complete backtrace :)
-- 
.o.  | Hacker wonderland
..o  |
ooo  |


[-- Attachment #2: Type: application/pgp-signature, Size: 188 bytes --]

Re: [PB] Scores Take II

[Xavier Maillard]

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

On 4 Sep 2005, Xavier Maillard stated:

> > Try also
> > 
> > mv ~/.newsrc.eld ~/newsrc.eld.bak
> 
> Hum, this is exactly the last thing I would do :) I will try to
> find something else.

I did it. No changes.
-- 
Xavier Maillard, zedek@gnu-rox.org


[-- Attachment #2: Type: application/pgp-signature, Size: 188 bytes --]

Re: [PB] Scores Take II

[drkm]

Xavier Maillard writes:

> On 4 Sep 2005, drkm verbalised:

>> Xavier Maillard writes:

>> > Debugger entered--Lisp error: (wrong-type-argument symbolp 5)
>> > symbol-name(5)
>> > (aref (symbol-name type) 0)
>> > (let* ((kill ...) (type ...) (score ...)

>> It's not easy to track where the wrong value is from, because
>> it's in the second '...'. Can you please make a full version of
>> the backtrace available somewhere on the web? If you don't want
>> to make it public, you can send it on my email box.

> This is the complete backtrace :)

  Argh!-)  I guess it's possible to substitute the '...' by
something with some meaning.  But how?  Sorry, I don't have the
time to investigate deeper now.

--drkm

[SOLVED] (was: [PB] Scores Take II)

[Xavier Maillard]

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

On 4 Sep 2005, Xavier Maillard spake thusly:

> On 4 Sep 2005, Xavier Maillard stated:
> 
> > > Try also
> > > 
> > > mv ~/.newsrc.eld ~/newsrc.eld.bak
> > 
> > Hum, this is exactly the last thing I would do :) I will try
> > to find something else.
> 
> I did it. No changes.

I investigated more deeply. My problem came from recent addition
(by me) of BBDB (using Debian package).

The error is due to a single variable I used for ages. I
gommented it out and it now works !!

Hard to say why it is broken though since I did not investigate
deeper.

I will.

Thank you all for your help.
-- 
Hacker Wonderland      Xavier Maillard| "Stand Back! I'm a programmer!"
.0.                 zedek@gnu-rox.orgz|
..0                 (+33) 326 770 221 |   Webmaster, emacsfr.org
000                  PGP : 0x1E028EA5 |    Membre de l' APRIL


[-- Attachment #2: Type: application/pgp-signature, Size: 188 bytes --]

[SOLVED+POSSIBLE REASON] (was: [PB] Scores Take II)

[Adam Przepiórkowski]

Xavier Maillard <zedek <at> gnu-rox.org> writes:

> I investigated more deeply. My problem came from recent addition
> (by me) of BBDB (using Debian package).
> 
> The error is due to a single variable I used for ages. I
> gommented it out and it now works !!
> 
> Hard to say why it is broken though since I did not investigate
> deeper.

I've had a similar '(wrong-type-argument symbolp 5)' when entering a gnus group
and the culprit turned out to be a wrong entry in my .bbdb file, namely
something like (the name and address changed, of course):

["John" "Doe" nil nil nil nil ("\"johndoe@doe.doe.pl\"@poczta.va.com.pl")
((creation-date . "2005-09-23") (timestamp . "2005-09-23")) nil]

instead of:

["John" "Doe" nil nil nil nil ("johndoe@doe.doe.pl") ((creation-date .
"2005-09-23") (timestamp . "2005-09-23")) nil]

This entry was automatically added to .bbdb by bbdb/gnus-show-sender, because of
the following address among the recipients:

"John Doe" <"johndoe@doe.doe.pl"@poczta.va.com.pl>

HTH.

Adam P.