Possible bug in gnus-score-find-hierarchical

Possible bug in gnus-score-find-hierarchical

[Rajappa Iyer]

This refers to Gnus v5.4.62.

It seems that this function always finds the score files with the
gnus-adaptive-file-suffix. Is this by design? I'm using the following
patch so that it looks at SCORE, gnu.SCORE, gnu.emacs.SCORE etc. Is
this correct?

RCS file: /a/placebo/homes/placebo/rsi/src/master/gnus/lisp/gnus-score.el,v
retrieving revision 1.1.1.1
diff -r1.1.1.1 gnus-score.el
2499c2499
<                    (gnus-score-file-name group gnus-adaptive-file-suffix))
---
>                    (gnus-score-file-name group))

-- 
Rajappa Iyer <rsi@lucent.com>		#include <std_disclaimer.h>
	They also surf who only stand on the waves.

Re: Possible bug in gnus-score-find-hierarchical

[Lars Magne Ingebrigtsen]

Rajappa Iyer <rsi@lucent.com> writes:

> It seems that this function always finds the score files with the
> gnus-adaptive-file-suffix. Is this by design? I'm using the following
> patch so that it looks at SCORE, gnu.SCORE, gnu.emacs.SCORE etc. Is
> this correct?
> 
> RCS file: /a/placebo/homes/placebo/rsi/src/master/gnus/lisp/gnus-score.el,v
> retrieving revision 1.1.1.1
> diff -r1.1.1.1 gnus-score.el
> 2499c2499
> <                    (gnus-score-file-name group gnus-adaptive-file-suffix))
> ---
> >                    (gnus-score-file-name group))

I'm not quite sure what you're referring to here ("diff -c"!  "diff
-c"!  "diff -c"!), but it looks like this code:

    (setq all
	  (nconc
	   (mapcar (lambda (group)
		     (gnus-score-file-name group gnus-adaptive-file-suffix))
		   (setq all (nreverse all)))
	   (mapcar 'gnus-score-file-name all)))

The first mapcar uses the adaptive suffix, while the second doesn't.
Your version should give you each score file twice.

-- 
(domestic pets only, the antidote for overdose, milk.)
  larsi@gnus.org * Lars Magne Ingebrigtsen