Path: ...!weretis.net!feeder6.news.weretis.net!i2pn.org!dodin.fr.nf!.POSTED.82-64-122-108.subs.proxad.net!not-for-mail
From: jdd <jdd@dodin.org>
Newsgroups: fr.comp.usenet.serveurs
Subject: =?UTF-8?Q?Re=3a_refuser_les_posts_d=27un_utilisateur_=28=c3=a0_sa_d?=
 =?UTF-8?Q?emande=29?=
Date: Wed, 24 Aug 2022 09:18:24 +0200
Organization: Le serveur de jdd pour fr*
Message-ID: <te4jc1$jhs$1@ns507557.dodin.fr.nf>
References: <te03sg$l3t$1@ns507557.dodin.fr.nf>
 <te04nl$lbq$2@ns507557.dodin.fr.nf> <te05mr$agk$1@shakotay.alphanet.ch>
 <te08jc$h0e$2@shakotay.alphanet.ch> <te31bp$97a$1@ns507557.dodin.fr.nf>
 <te4fh0$tbs$2@shakotay.alphanet.ch>
NNTP-Posting-Host: c3066ed76bae8bcc0e476efb157ff758
Mime-Version: 1.0
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 8bit
Injection-Date: Wed, 24 Aug 2022 07:18:25 -0000 (UTC)
Injection-Info: ns507557.dodin.fr.nf; posting-host="82-64-122-108.subs.proxad.net:82.64.122.108";
	logging-data="20028"; mail-complaints-to="abuse@dodin.fr.nf"
User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:91.0) Gecko/20100101
 Thunderbird/91.12.0
Content-Language: fr
In-Reply-To: <te4fh0$tbs$2@shakotay.alphanet.ch>
Bytes: 2623
Lines: 49

Le 24/08/2022 à 08:12, Marc SCHAEFER a écrit :
> jdd <jdd@dodin.org> wrote:
>> 1;  #<- est-ce utile?
> 
> Oui, si c'est inclus par l'autre: une lib Perl doit toujours retourner
> "vrai".

OK

> 
>> j'espère que le $config_dir est mis à jour quelque part, car la valeur
>> indiquée dans cleanfeed n'est pas du tout la bonne pour moi
>> (/usr/local/news/cleanfeed/etc), j'ai /etc/news/filter
> 
> Il se peut aussi que le cleanfeed de base ne fasse pas l'appel à ta
> fonction, voir /etc/news/filter/filter_innd.pl:
> 
>          if (defined &local_filter_first) {
>              my @result = local_filter_first();
>              return reject(@result) if $result[0];
>          }
> 
> dans la fonction: filter_art

il y est

> 
> A noter que filter_art, chez moi, n'appelle local_filter_first du
> cleanfeed.local QUE si ce n'est PAS un article de contrôle.

dans mon cas aussi, mais je cherche à filtrer un X-No, qui n'est pas 
dans un article de contrôle.

bon j'ai mis le filtre en service, on va voir.

j'ai quand même un message de warning:

 > perl -cw /etc/news/filter/cleanfeed.local
Name "main::hdr" used only once: possible typo at 
/etc/news/filter/cleanfeed.local line 5.
/etc/news/filter/cleanfeed.local syntax OK

je n'ai que ça ligne 5

if ($hdr{X-No-Dodin} eq 'yes') {

merci
jdd
-- 
mon serveur dodin.fr.nf